9. Пример программы

Теперь у нас уже достаточно знаний, чтобы составить первую работа­ющую программу. Пусть это будет программа, которая находит сумму двух чисел.

Program Summa;	заголовок программы
Var a, b, s : Integer;	описание переменных
Begin	начало программы
a := 7;	определение начальных значений
b := 15;
s := a + b;	вычисление суммы
Writeln (s);	печать результата на экран
End.	конец программы

Оператор writeln выводит результат на экран. О нём рассказано в следующей главе.

3. Операторы ввода и вывода.

Для общения компьютера с человеком или, по-другому, диалога, необходимо, чтобы программа выводила на экран разную информацию и запрашивала данные. Для этого существуют операторы ввода (readln) и вывода (write) данных. Оформлять программы нужно для того, чтобы пользователь всегда знал, в каком состоянии находится компьютер: ожидает он ввод или производит расчёты. Согласитесь, что не очень приятно сидеть перед чёрным экраном монитора и думать: «Что же тебе от меня надо?»

1. Оператор ввода Readln

Используя оператор Readln можно вводить значения переменных с клавиатуры во время работы программы. Вот как надо использовать этот оператор:

Readln (<список переменных>);

Здесь <список переменных> – одна или несколько переменных, разделенные запятыми. Например:

Readln (a);

Readln (x, y);

В первом случае компьютер будет запрашивать ввод одной переменной. Как только при выполнении программы компьютер встретит этот оператор, работа приостановится и компьютер будет ждать ввода значения переменной с клавиатуры. После того как значение введено, надо нажать клавишу ENTER. Во втором случае компьютер будет ожидать ввод двух чисел. Их значения нужно ввести на одной строчке через пробел³. Нарисуем две колонки и будем выполнять фрагмент программы. Слева – колонка с текстом программы. Справа – результаты выполнения каждой строчки.

Program Read_demo;
Var p,s,t: integer;
Begin
p := 0;	p = 0
Readln (p);	С клавиатуры введено число 14
p := p + 1;	p = 15
Readln (p, t);	С клавиатуры введено: 20 30
s := p + t;	s = 20 + 30 =50.
End.

Как видите, введенные с клавиатуры значения присваивается указанной переменной, а старое её значения начисто пропадает.

Оператор readln по своему характеру – молчаливый оператор. Он ничего не выводит на экран перед началом своей работы. Просто молча ждёт, когда пользователь догадается, что надо что-то вводить. Поэтому, чтобы ему было веселее, его надо использовать в паре с оператором write, который выведет на экран просьбу ввести нужные данные.