Процедуры ввода

Read(Пр1, [,Пр2,..., Прn ]) – считывает одно или более значений из текстового файла в одну или более переменных.

Каждый параметр Пр№ является переменной символьного, строкового, целого или вещественного типа.

Процедура останавливает выполнение программы до тех пор, пока пользователь не введёт с клавиатуры требуемое количество значений и нажмёт <Enter>. Числовые значения при вводе должны разделяться пробелом (<Space>) или окончанием строки (клавиша <Enter>). При считывании строковых и символьных значений символ пробел считается частью вводимой строки, а не разделительным символом.

Readln(Пр1, [,Пр2,..., Прn]) – данная процедура является расширением процедуры Rеаd. После выполнения процедуры Rеаd процедура Rеаdln делает пропуск всех введённых с клавиатуры символов до начала следующей строки.

Пример использования процедур ввода:

Рассмотрим по шагам выполнение следующей программы:

program Rd;

var

r:real; i,i2:integer; c: char; s:string[3];

begin

read(c,r,i,i2);

read(i);

readln(s,r);

read(i);

end.

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

Таблица 5 ­– Пошаговое выполнение процедур ввода

Выполняемый оператор	Вводимое пользователем с клавиатуры	Состояние переменных
r	i	i2	c	s
read(c,r,i,i2);	234.5 3 22<Enter>	34.5			’2’	’’
33 101<Enter>	34.5			’2’	’’
read(i);	программа не останавливается для ввода данных	34.5			’2’	’’
readln(s,r);	st2.25 2.3 13<Enter>	0.25			’2’	’st2’

Окончание таблицы 5

Выполняемый оператор	Вводимое пользователем с клавиатуры	Состояние переменных
read(i);	2.5<Enter>	Ошибка: invalid numeric format (попытка записать вещественное число в переменную целого типа)