Выполнение процедуры readLn отличается от read только тем, что после считывания значений и присваивания их параметрам происходит переход к новой строке.
Пример 3.
var n, m : byte; Набрать значения n, r и m можно в одной
r : real; строке, ,
begin или в разных строках,
read(n,r); .
read(m); Результаты будут одинаковы:
... {операторы}
end. .
Пример 4.
var n, m : byte; Если набрать значения n, r и m,
r : real; или
begin ,
readLn(n,r); то значение 131 переменной m не будет присвоено, так как ожидается ввод значения m с новой строки.
read(m);
... {операторы} Правильный ввод:
end. или
.
27 164
gf
Процедуру readLn можно использовать для ввода символьных данных после числовых.
Пример 5.
var n, m : byte;
с1, с2 : char;
gf
begin
readLn(n,r); Допустимый ввод: или
read(c1, c2); .
... {операторы}
end.
Символьные значения вводятся с новой строки.
Процедуру readLn можно вызвать без параметров. В этом случае, если в буфере нет символа новой строки, выполнение программы приостанавливается до нажатия клавиши перехода к новой строке (Enter).
Ввод символьных строк будет рассмотрен в разделе «Строковый тип».
13. СТАНДАРТНЫЙ ВЫВОД
Вывод на дисплей выполняют процедуры write и writeLn.
Синтаксическая диаграмма вызова процедуры write:
Процедура write вычисляет и выводит на экран значения выражений, перечисленных в качестве параметров. Выражения могут быть числовыми, символьными, логическими и строковыми.
123k
12 3 k
Вывод начинается с текущей позиции курсора на экране. После вывода значения курсор помещается за последним выведенным символом, и вывод следующего значения начнется с этой позиции. Никаких разделителей между выводимыми значениями не предусмотрено. Поэтому оператор write(12, 3,‘k’) выведет строку . Для разделения значений можно предусмотреть вывод пробелов между ними. Так, оператор
12 3 k
write(12,’ ‘,3, ‘ ‘, ‘k’) выведет .
Значения типа real выводятся в форме с плавающей точкой в следующем виде:
Количество цифр после точки - 10. Общее число позиций, занимаемых вещественным числом, при этом равно 17. Например, оператор
-1.2345000000E+02
write(-123.45) выведет .
Процедура writeLn выполняется так же, как и write, но после вывода значений переводит курсор в начало новой строки. WriteLn можно использовать и без параметров для перехода к новой строке.