В данном случае необходимо ввести сначала два действительных числа через пробел. Переменной с присваивается значение, равное первому введенному числу, а переменной d – значение, равное второму введенному числу. После ввода этих значений курсор переходит на начало новой строки (за это отвечает ln, следующий за словом Read). Далее требуется ввести еще два целых числа, которые будут присвоены значениям переменных i и k соответственно.

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

Как вы могли заметить, такая организация работы не совсем удобна, т. к. нужно помнить, значения каких переменных нужно ввести. При большом их количестве легко запутаться.

Гораздо удобнее для ввода значений переменных организовать диалог с компьютером. Для этого непосредственно перед каждым оператором ввода переменной нужно поставить оператор вывода Write

для вывода на экран поясняющего текста:

Write (‘X=’); Readln(X);

Write (‘Z=’); Readln(Z);

или

Write (‘Введите значение А > ’); Readln(A);

Предпочтительно использовать именно такой ввод переменных с клавиатуры.

Пример 2.3. Организация ввода переменных. program primer;

var X,Z,Sum: real; begin

Write (‘X=’); Readln(X);

Write (‘Z=’); Readln(Z); Sum:=X+Z;

Writeln (‘Сумма равна ’, Sum:10:2); end.

2.3. Оператор безусловного перехода

Оператор безусловного перехода goto означает «перейти к» и применяется в случаях, когда после выполнения некоторого оператора надо выполнить не следующий по порядку, а какой-либо другой, отмеченный меткой, оператор.

19

Общий вид: goto <метка>;

Метка объявляется в разделе описания меток и состоит из имени

иследующего за ним двоеточия. Имя метки может содержать цифровые

ибуквенные символы, максимальная длина имени ограничена 127 знаками. Раздел описания меток начинается зарезервированным словом Label, за которым следует имя метки.

Пример 2.4. Использование меток. program primer;

label 999, metka; begin

…

goto 999;

…

999: write (‘ Имя’);

…

goto metka;

…

metka: write(‘Фамилия’);

…

end.

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

ссоблюдением следующих правил:

•следует стремиться применять операторы перехода для передачи управления только вниз (вперед) по тексту программы;

•расстояние между меткой и оператором перехода на нее не должно превышать одной страницы текста (или высоты экрана дисплея).

2.4. Пустой оператор

Пустой оператор не содержит никаких символов и не выполняет никаких действий. Используется для организации перехода к концу блока в случаях, если необходимо пропустить несколько операторов, но не выходить из блока. Для этого перед зарезервированным словом end ставятся метка и двоеточие.

20