Вопрос 19.Процедура ввода данных.

С помощью оператора присваивания переменным даются числовые значения. Таким образом, исходная информация (т.е. то, что дано в задаче) вводится в компьютер. Однако в этом способе есть существенный недостаток. Например, составлена программа для исходных данных а=2, в=3. Чтобы исполнить программу при других значениях а и в, необходимо вносить исправления в саму программу, что может привести к новым синтаксическим ошибкам. Чтобы исправить этот недостаток, в языке программирования Pascal существует специальная процедура ввода исходной информации в компьютер.

Формат записи процедуры ввода следующий:

Readln ( список ) ;

В этой процедуре Readln – служебное слово (в переводе обозначает «читать»), список может содержать только имена переменных, разделенных запятой.

Компьютер, дойдя при выполнении программы до процедуры Readln, приостанавливает дальнейшее выполнение и ждет, пока на экране не будут с помощью клавиатуры набраны числовые значения для тех переменных, которые находятся в списке. Числовые значения можно перечислять через пробел и через нажатие клавиши Enter. Компьютер читает эти числовые значения и автоматически присваивает их тем переменным, которые записаны в списке, в порядке их записи в процедуре. Исходя из этого, при вводе числовых значений необходимо выполнять следующие правила:

1.Числовое значение и переменная, которой это значение присваивается должны быть одного типа.

2.Числовые значения должны идти в том же порядке, что и соответственные им переменные в списке.

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

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

Пример. Пусть имеется a км b м. Перевести эту величину в м.

Program a2;

Var a, b, c : Integer;

{a – количество исходных км, b—количество исходных метров}

{c – полученное количество метров}

Begin

Writeln(‘Ввести количество км и м’);

Readln(a, b);

C:= a*1000 + b;

Writeln(a, ‘км и’, b, ‘м=’, c, ’м’ );

End.

Для теста возьмем следующие исходные данные:

а = 5 км, b = 367 м, с=5367 м.

Запустим программу на выполнение. Выполнение начинается со строки Var. Здесь происходит объявление переменных a, b, c – что это значит. В памяти компьютера отводится место для хранения значений переменных a, b, c, кроме этого компьютер помнит, что в данные переменные должны поступить целые числа.

Далее идут комментарии, которые программа при выполнении игнорирует.

Затем выполняется процедура Writeln(‘Ввести количество км и м’); - на экране появится текст, написанный между апострофами.

Затем выполняется процедура Readln(a,b); , которая выполнение программы приостановит. Программист должен с помощью клавиатуры набрать числа 5 и 367 (через пробел) и нажать клавишу Enter. Компьютер прочитает эти числа и отправит число 5 в переменную а, а число 367 в переменную b.

Далее будет выполнен оператор c:=a*1000+b;. Этот оператор сначала вычислит значение a*1000+b, а затем полученное числовое значение отправит в переменную с.

Затем будет выполнена процедура Writeln(a, ‘ км и ‘, b, ‘ м= ’,c, ‘ м’);, которая выведет на экран следующее сообщение 5 км и 367 м = 5367 м.