12.1. Ввод числовых данных

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

Пример 1.

var n:word; Набрать значенияnиrможно в одной

r :real; строке,,

begin или в разных строках,

read(n,r);

... {операторы} .

end.

12.2. Ввод символьных данных

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

Пример 2.

var c1,c2 : char; При вводе (междуa иb- пробел)

begin получим с1=‘a’,

read(c1,c2); c2= #32 (пробел).

{операторы}Символ‘b’остается в буфере.

end.

12.3. Процедура readLn

Выполнение процедуры 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;

b

27

164

gf

egin

readLn(n,r); Допустимый ввод: или

read(c1, c2); .

... {операторы}

end.

Символьные значения вводятся с новой строки.

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

Ввод символьных строк будет рассмотрен в разделе «Строковый тип».

13. Стандартный вывод

Вывод на дисплей выполняют процедуры write и writeLn.

Синтаксическая диаграмма вызова процедуры write:

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

В

12 3 k

123k

ывод начинается с текущей позиции курсора на экране. После вывода значения курсор помещается за последним выведенным символом, и вывод следующего значения начнется с этой позиции. Никаких разделителей между выводимыми значениями не предусмотрено. Поэтому операторwrite(12, 3,‘k’) выведет строку . Для разделения значений можно предусмотреть вывод пробелов между ними. Так, оператор

w

12 3 k

rite(12,’ ‘,3,‘ ‘, ‘k’)выведет .

Значения типа real выводятся в форме с плавающей точкой в следующем виде:

(| )<цифра>.<цифра>{<цифра>}E(+|)<цифра><цифра> (1)

Количество цифр после точки 10. Общее число позиций, занимаемых вещественным числом, при этом равно 17. Например, оператор

w

1.2345000000E+02

rite(123.45) выведет .

Процедура writeLnвыполняется так же, как иwrite, но после вывода значений переводит курсор в начало новой строки.WriteLn можно использовать и без параметров для перехода к новой строке.