Оператор безусловного перехода

Общий вид оператора:

GOTO <метка>

где GOTO (идти к) – служебное слово; <метка> - целое число без знака, определяемое в разделе LABEL как метка оператора. Оператор GOTO производит передачу управления к оператору,помеченному указанной меткой.

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

Логические отношения

Для задания условий в логическом операторе IF могут

Таблица 1.

Математическое обозначение	Название	Обозначение в программе
	НЕТ (отрицание)	NOT
	И (логическое умножение)	AND
	ИЛИ (логическое сложение)	OR

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

Отношения, стоящие слева и справа от знака логической операции должны быть заключены в скобки, поскольку логические операции имеют более высокий приоритет и выполняются в следующем порядке: в первую очередь NOT, а затем AND, а операция OR в последнюю очередь.

Например, 0<X<=1 можно записать с помощью логической операции AND

(Х>0)AND(X<=1)

Это логическое выражение имеет значение истинно, если истинны оба выражения, написанные в круглых скобках. Иначе выражение ложно.

Например, если Х<6 либо Х=6, можно записать с помощью логической операции, то есть логическое выражение,

(X=6)OR(X<6)

которое читается так: имеет значение истинно, если хотя бы одно из этих выражений истинно, иначе ложно.

Например, X>1, но Х<>6, можно записать с помощью логической операции NOT:

(Х>1)AND(X NOT 6),

имеет значение истина, если оба выражения истины, иначе ложь.

Например, составить программу вычисления У:

PROGRAM VY;

VAR

A: INTEGER; B, Y: REAL;

BEGIN

READ (A, B);

IF (A>=0) AND (A<5) THEN

Y: =A*A-B;

ELSE IF (B=0.5) OR (B=0.7) THEN Y: =A+B;

ELSE Y: =B*B;

WRITELN (‘Y=’, Y);

END.