Оператор вызова процедуры ввода (чтения) данных

обеспечивает ввод данных для последующей их обработки программой.

 

Read (параметр1, параметр2, …, параметрN)

где параметр1, параметр2, …, параметрN – переменные допустимых типов данных.

 

Числовой (целый, вещественный)	Считывается одно число соответствующего формата и значение его присваивается переменной параметр1. Знаки пробела или перевода строки перед числом игнорируются
Символьный (Char)	Считывается один символ и его значение присваивается переменной параметр1.
Строковый (String)	При длине N строковой переменной параметр1 считывается N символов.

Правила выполнения оператора вызова процедуры Read

 

· Для числовых значений параметр1, параметр2, …, параметрN набираются на клавиатуре минимум через один пробел.

· После набора данных для одного оператора вызова процедуры Read нажимается клавиша ввода Enter.

· Значения переменных должны вводиться в строгом соответствии с синтаксисом языка Turbo Pascal. Если соответствие нарушено, то возникают ошибки ввода-вывода.

· Строковые (String) значения при вводе лучше всего располагать в отдельной строке.

 

Пример

Var A: Integer;

B: Char;

C: Real;

Begin

Read (A, B, C);

End.

 

Набираем на клавиатуре:

 

234R 15.7358 <Enter>

 

Оператор вызова процедуры ввода (чтения) строки

обеспечивает ввод данных для последующей их обработки программой.

 

ReadLn (параметр1, параметр2, …, параметрN)

 

Сравнение операторов вызова процедур Read и ReadLn

 

Общие свойства:	· Считывает значение в переменные в том порядке, в каком они указаны в списке ввода. · Считывание прекращается после того, как все переменные этого списка получат значения.
Отличие:
Read	после выполнения курсор находится в той же строке, компьютер готов к считыванию из очередной позиции текущей строки.
ReadLn	после выполнения курсор перемещается на начало следующей строки.

Примеры

 

Var A: Char;

B: Integer;

C: Real;

Read (a, b, c) ReadLn (a, b, c)

 

Вводимая информация	Результат выполнения процедур
S <пробел> 35 <пробел> -47.82 <Enter>	a = S b = 35 c = -47.82
S <Enter> 35 <Enter> -47.82 <Enter>	a = S b = 35 c = -47.82
S <пробел> 35 <пробел> -47.82 <пробел> 7 <Enter>	a = S b = 35 c = -47.82

Read (a, b, c);

Read (d);

 

	<пробел>		<пробел>		<Enter>		<Enter>
a		b		c		d

 

ReadLn (a, b, c);

Read (d);

 

	<пробел>		<пробел>		<пробел>		<Enter>
a		b		c		d

 

 

Read (a); Read (b); Read (c);

1-ый способ

 

<пробел>

<пробел>

<Enter>

 

2-ой способ

 

	<Enter>
	<Enter>
	<Enter>

ReadLn (a); ReadLn (b); ReadLn (c);

1-ый способ

 

<пробел>

<пробел>

<Enter>

 

2-ой способ

 

	<Enter>
	<Enter>
	<Enter>

Оператор вызова процедуры вывода

Выдает на экран значения параметр1, параметр2, …, параметрN в стандартной форме.

 

Write (параметр1, параметр2, …, параметрN)

Выдает на экран значения параметр1, параметр2, …, параметрN в стандартной форме и в заключение выполняет перевод курсора в первую позицию новой строки.

 

WriteLn (параметр1, параметр2, …, параметрN)

 

где параметр1, параметр2, …, параметрN - переменная, константа, выражение любого допустимого типа (целый, вещественный, логический, символьный, строковый, диапазон и др.).

Примеры

A:= 1; B:= 2; C:= 3;

Write (A); Write (B); Write (C);

 

Write (A,B,C);

 

WriteLn (A); WriteLn (B); WriteLn (C);

 

 

WriteLn (A,B,C);

 

 

WriteLn (B, '@', A, 'сумма', C+A);

 

 

@

с

у

м

м

а

 

Форматный вывод

 

1. Параметры определения ширины поля для параметра при печати

Write (параметр1: длина, параметр2: длина, …)

 

Длина – целое выражение, определяющее общий размер поля для вывода параметра.

 

Пример

A:= 10; B:= 2; C:= 100;

 

WriteLn (A, B, C);

 

 

WriteLn (A:2, B:2, C:4);

 

 

WriteLn (A, B:2, C:2);

 

 

X:= 421.53;

WriteLn (X);

 

.

E

+

 

X:= -421.53;

WriteLn (X);

 

-

.

E

+

 

X:= 421.53;

WriteLn (X: 8);

 

.

E

+

 

 

2. Параметр определения числа знаков после десятичной точки при печати

Write (параметр1: длина: количество, …)

Количество – целое выражение, определяющее, сколько цифр после десятичной точки выводить для числа с фиксированной точкой.

X:= 421.53;

WriteLn (X: 7: 2);

 

.

WriteLn (X: 9: 4);

 

.

WriteLn (X: 6: 4);

 

.

 

Оператор условия If

 

 

Оператор условия If выполняется следующим образом:

 

· Вычисляется логическое выражение (булевый тип: True, False),

· Если значение логического выражения есть True (истина), выполняется <Оператор-1>, указанный после Then,

· Если значение логического выражения есть False (ложь), выполняется <Оператор-2>, указанный после Else.