I. Печать целых чисел.

Пусть А=45, В=123, тогда при выполнении Writeln (А, В); значения А и В сольются в одно число:

45123

Чтобы разделить числа, используют форматы печати, определяя для каждой переменной количество позиций в строке. Оно записывается после имени переменной через ":". Таким образом, оператор можно записать так: Writeln (A:4, B:6); и на экране значения будут напечатаны в виде

_ _45_ _ _123

II. Печать дробных чисел.

Дробное число в памяти компьютера представлено в стандартном виде: целая часть числа - это 1 цифра, не равная 0, остальные цифры записываются в дробную часть. Чтобы исходное число сохранило свое значение, его следует домножить на 10 в соответствующей (положительной или отрицательной) степени. Выражение "умножить на 10 в степени" компьютер записывает одним символом "Е". В дробной части - 10 цифр. Таким образом, число 1243,563 будет иметь вид 1.2435630000Е+03,

число 0,0000345 будет иметь вид 3.4500000000Е-05.

Такая запись называется "число с плавающей точкой". Именно в этом виде и будет напечатано значение любой переменной X типа real, если в программе выполняется оператор Writeln (X);

Чтобы напечатать дробное число в привычном нам виде, который называется "число с фиксированной точкой", следует указать для него форматы печати, которые выбираем по своему желанию:

Writeln ( <имя>: <колич. всех знаков>: <колич. знаков на дроб.часть> );

ПРИМЕР: пусть Х=1243,563, тогда

Writeln (X:8:2); ==> _1234.56

Writeln (X:13:5); ==> _ _ _1234.56300

Writeln (X:10:3); ==> _ _1234.563

ЗАДАЧА. Ввести с клавиатуры значение массы тела m. Считая g=9,8, найти вес тела P.

Комментарий: при решении задачи после умножения получится дробное число, поэтому печатать его будем с "фиксированной точкой": всего 7 знаков, в том числе и десятичная точка, из них 2 цифры - дробная часть.

Решение.

Program Ves;

const g=9.8; { константа g – ускорение свободного падения}

var m:integer; {переменная m – масса тела}

begin

Write ('Введи массу '); {приглашение ввести значение массы}

Readln (m); {с клавиатуры вводится число и записывается в m}

Writeln ('Веc=',m*g:7:2); {результат m*g печатается «с фиксированной точкой»}

Readln {задержка в диалоговом режиме}

end.

САМОСТОЯТЕЛЬНО: Введя с клавиатуры площадь и одну сторону прямоугольника, найти длину другой стороны.

Д/З. Папа, воспитывая сына-двоечника, изнашивает в год 3 ремня. Ввести с клавиатуры количество изношенных папой ремней, определить: какой класс закончил сын.

Урок №4. ОПЕРАТОР ПРИСВАИВАНИЯ.

Промежуточная переменная.

Очень часто при решении задач выполняются промежуточные вычисления, которые не указываются в ответе, но участвуют в получении окончательного результата. (Например, нахождение скорости катера по течению реки при вычислении пройденного по течению расстояния; нахождение дискриминанта при решении квадратного уравнения). Такие вычисления запоминаются в промежуточных переменных.

Промежуточные переменные должны быть объявлены так же, как и переменные с исходными данными, в разделе Var. Значения они получают не с клавиатуры, а с помощью оператора присваивания. Этот оператор имеет вид:

<имя переменной> := <значение>;

Здесь "значением" может быть конкретное число, имя другой переменной или выражение соответствующего типа. Например, переменной типа integer можно присвоить лишь целочисленное значение и нельзя - дробное. Однако переменной типа real можно присваивать и дробные, и целые значения.