write(список_вывода);
writeln(список_вывода);
Где:
список_вывода разделенные запятыми имена переменных, строковые константы или выражения.
Примеры:
write(sum);
write('Press
writeln('x1=', x1, ' x2=', x2);
writeln(pound,' фунтов =', pound*0.453, ' кг.');
Форматированный вывод
В строке вывода после имени переменной или выражения через двоеточие можно задать формат вывода значения.
Для целых и строковых значений формат задает ширину поля вывода количество позиций на экране, которое резервируется для вывода значения переменной.
В общем виде форматированный вывод целых и строковых значений задается так:
имя:n
Где:
имя имя переменной , значение которой надо вывести на экран;
n ширина поля вывода (целая константа).
Форматированный вывод вещественных значений в общем виде задается так:
имя:n:m
Где:
имя имя переменной;
n ширина поля вывода (целая константа);
m количество цифр дробной части.
Примеры:
writeln('x1=', x1:9:3, 'x2=', x2:9:3); // x1 и x2 вещественного типа
writeln(name:15, salary:12:3); // переменная name строковая, salary вещественная
writeln(pound:5:2,' фунтов =', pound*0.453:6:3, ' кг.'); // выражение pound*0.453 вещественного типа
Ввод данных с клавиатуры
Ввод данных с клавиатуры обеспечивает инструкция readln, которая в общем виде записывается так:
readln(имя);
Где:
имя имя переменной, значение которой надо получить от пользователя во время работы программы.
Примеры:
readln(name);
readln(salary);
ВНИМАНИЕ! При вводе вещественных значений в качестве десятичного разделителя следует использовать точку. Если при вводе вещественного значения вместо точки будет введена запятая, ошибка (исключение) не возникает, но дробная часть будет отброшена.
Инструкция присваивания
Инструкция присваивания выглядит так:
имя := выражение;
Где:
имя имя переменной или элемента массива;
выражение выражение, значение которого присваивается переменной или элементу массива.
Выражение состоит из операндов и операторов. Операнды это объекты, над которыми выполняется действие, операторы символы, обозначающие действия.
В качестве операнда выражения могут использоваться константы, переменные, элементы массивов, функции.
Примеры:
k := 0;
x:=x1;
x:=x+dx;
x:=x+0.05;
n := Round((x1-x2)/dx);
m := Random(6);
Арифметические операторы
Арифметические операторы:
+ сложение
- вычитание
* умножение
/ деление
DIV целая часть частного
MOD остаток от деления как целое
Оператор + применим к операндам строкового типа. Результат применения оператора "сложение" к операндам строкового типа конкатенация (объединение) строк-операндов.
Примеры:
name := 'Bart' + ' ' + 'Simpson';
name := FirstName + ' ' + LastName;
В приведенных инструкциях предполагается, что переменные name, FirstName и LastName строкового типа.
Приоритет операторов
Значение выражения вычисляется слева направо, при этом следует учитывать, что операторы умножения и деления имеют более высокий приоритет, чем операторы сложения и вычитания.
Для задания нужной последовательности вычисления значения выражения следует использовать скобки.
Выбор действия (инструкция if )
Выбор действия в зависимости от выполнения некоторого условия реализуется при помощи инструкции if.
Инструкция выбора одного из двух возможных вариантов действия записывается так:
if условие then
// здесь инструкции, которые должны быть выполнены,
// если условие выполняется (истинно)
else
// здесь инструкции, которые должны быть выполнены,
// если условие НЕ выполняется (ложно)
end;
Пример:
if t = 1 then
r := r1+r2;
else
r := r1*r2/(r1+r2);
end;
Если при выполнении условия надо выполнить некоторое действие, а в случае, если условие не выполняется, это действие надо пропустить и перейти к следующей инструкции программы, то инструкция if записывается так:
if условие then
// здесь инструкции, которые будут выполнены,
// если условие выполняется (истинно)
end;
Пример:
if a[i] < a[i+1] then
b:=a[i];
a[i]:=a[i+1];
a[i+1]:=b;
end;
Множественный выбор
Множественный выбор (выбор одного действия из нескольких возможных) осуществляется при помощи вложенных инструкций if.
Приведенные ниже инструкции показывают, как можно реализовать выбор одного действия из четырех возможных вариантов.
if условие1 then
// здесь инструкции, которые будут выполнены,
// если условие1 истинно
else
if условие2 then
// здесь инструкции, которые будут выполнены,
// если уловие1 ложно, а условие2 истинно
else
if условие3 then
// здесь инструкции, которые будут выполнены,
// если условия условие1 и условие2 ложны, а условие3 истинно
else
// здесь инструкции, которые будут выполнены,
// если ни одно из условий условие1, условие2 или условие3
// НЕ выполняется
end;
end;
end;
Пример:
if n = 1 then
material :='Алюминий';
density := 2.7;
else
if n = 2 then
material :='Медь';
density := 8.9;
else
if n = 3 then
material :='Сталь';
density := 7.856;
else
material :='Пластик';
density := 1.9;
end;
end;
end;
Условие
Условие это выражение логического типа, которое может принимать одно из двух значений: Истина или Ложь.
Различают простое и сложное условия.
Простое условие
Простое условие в общем виде записывается так:
op1 оператор_сравнения op2
Где:
op1 и op2 сравниваемые операнды, в качестве которых могут выступать константы, переменные, функции или выражения.
Операторы сравнения:
= равно
> больше
>= больше или равно
< меньше
<= меньше или равно
!= не равно
Примеры простых условий:
a[i+1] < a[i]
d != 0
pos(' ', st) = 1
name = 'simpson'
Сложное условие
Сложное условие в общем виде записывается так:
усл1 логический_оператор усл2
Где:
усл1 и усл2 выражения логического типа, в качестве которых могут выступать простые или сложные условия.
Логические операторы:
AND логическое И
OR логическое ИЛИ
NOT логическое НЕ
Примеры сложных условий:
x >= x1 AND x <= x2
NOT((x < x1) OR (x > x2))
sum >=1000 and sum <10000
name = 'Bart' OR name = 'Homer'
Цикл for
Инструкция цикла for в общем виде записывается так:
for сч := start to finish do
// инструкции, которые надо выполнить несколько раз
end;
Где:
сч счетчик циклов (переменная целого типа);
start и finish выражения целого типа (в простейшем случае целые константы), определяющие, соответственно, начальное и конечное значение счетчика циклов.
Примеры:
for i:=1 to 10 do
writeln(i:2, ' Hello, World!');
end;
for i:=1 to n do
writeln(i:2, ' Hello, World!');
end;
Цикл While
Инструкция цикла While (цикл с предусловием) в общем виде записывается так:
while условие do
// здесь инструкции, которые будут выполняться до тех пор,
// пока условие истинно
end;
Где:
условие простое или сложное условие выполнения инструкций, находящихся между словами do и end.
Пример:
i := 1;
while i <= 10 do
writeln(i:2, ' Hello, World!');