2015-06-05
289
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 (попытка записать вещественное число в переменную целого типа) |
