Простые операторы в Turbo Pascal 7

07.09.2018

Операторы языка описывают некоторые алгоритмические действия, которые необходимо выполнить для решения задачи. Тело программы можно представить как последовательность таких операторов. Идущие друг за другом операторы программы разделяются точкой с запятой.

Все операторы языка Паскаль можно разбить на две группы: простые и структурированные.

Простыми являются те операторы, которые не содержат в себе других операторов. К ним относятся:

оператор присваивания; обращение к процедуре; оператор безусловного перехода GOTO; пустой оператор.

Обращение к процедуре будет рассмотрено в п. 10.1, остальные - в данном разделе.

Free Pascal Урок 7: Оператор if...then...else и простые условия

5.1.1. Оператор присваивания

С помощью этого оператора переменной или функции присваивается значение выражения. Для этого используется знак присваивания := , слева от которого записывается имя переменной или функции, которой присваивается значение, а справа - выражение, значение которого вычисляется перед присваиванием.

Допустимо присваивание значений переменным и функциям любого типа, за исключением типа файл. Тип выражения и тип переменной (или функции) должны быть совместимы для присваивания (см. п. 9.3). 1

Пример.

X := Y;

Z :=А + В;

Res := (I>0) and (I I := Sqr(J) + I * К;

5.1.2. Оператор безусловного перехода GOTO. Использование меток

Оператор GOTO позволяет изменить стандартный последовательный порядок выполнения операторов и перейти к выполнению программы, начиная с заданного оператора. Оператор, на который происходит переход, должен быть помечен меткой. Эта же метка должна быть указана и в операторе GOTO. Метки, используемые в Turbo Pascal, могут быть двух типов:

целым числом в пределах от 0 до 9999; обычным идентификатором.

Все используемые метки должны быть перечислены в разделе объявления меток, начинающемся зарезервированным словом label, например:

label 1, 2, Metka;

Одной меткой можно пометить только один оператор. Метка от помеченного оператора отделяется двоеточием.

Использовать оператор GOTO следует крайне осторожно. Широкое его применение без особых на то оснований ухудшает понимание логики работы программы. Безусловный переход можно осуществлять далеко не из каждого места программы и не в любое место программы. Так, нельзя с помощью этого оператора перейти из основной программы в подпрограмму или выйти из подпрограммы, не рекомендуется осуществлять переход внутрь структурированного оператора, т. к. он может дать неправильный результат, и т. д. Более подробно о таких ограничениях см. [1].

Пример. Найти частное от деления целых чисел.

program EXAMPLE4;
label
Out;	{описание метки}
var
X, Y, Res: Integer;
begin
Write('Введите делимое: ');	{вывод сообщения на экран}
ReadLn(X);	{чтение числа}
Write('Введите делитель: ');	{вывод сообщения на экран}
ReadLn(Y);	{чтение числа}
if Y = 0 then
begin	{Составной оператор, см. п. 5.2.1}
WriteLn('Деление на ноль!');
goto Out;	{выход при нулевом делителе}
end;
Res:=X div Y;
WriteLn('Частное равно: ',Res);
Out:	{метка "пустого" оператора}
end.

5.1.3. Пустой оператор

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