else, причем ветвь else в операторе Case необяза-
тельна. Использованные здесь зарезервированные слова
Case, of,
else, end имеют смысл вариант, из, иначе, конец.
Выражение, играющее роль селектора, должно принадлежать
порядковому типу данных (то есть типу, имеющему конечное число
значений). Например: Integer, Boolean, Char.
Кроме одиночных констант, в вариантах оператора Case могут
использоваться диапазоны значений и списки. Например:
Case x of
1..5: S
1
;
2, 3, 8: S
2
;
4, 6, 9..13: S
3
else S
4
end;
Составной оператор
Составной оператор представляет собой группу из произвольно-
го числа операторов, отделенных друг от друга точкой с запятой,
и ограниченную операторными скобками – зарезервированными
словами в языке ПаскальАВС –
begin и end:
1
2
n
begin S ; S ; ...; S
end;
Поэтому приведенный оператор можно мысленно представить в
таком виде: (S
1
; S
2
; … S
n
). Составной оператор используется в том
случае, если необходимо выполнить последовательность операто-
ров внутри какой-либо конструкции как единое целое.
Примеры выполнения заданий
Пример 1. Составьте блок-схему (рис. 3.4) и напишите програм-
му решения следующей задачи: определите большее из двух целых
чисел X и Y.
43
PROGRAM Primer_1;
var X : Integer; {Пер-
вый аргумент}
Y Integer;
{Второй аргумент}
Bolshee: Inte-
ger; {Результат}
BEGIN
Write ('Введите пер-
вое число: ');
ReadLn (X);
Write ('Введите вто-
рое число: '); ReadLn
(Y);
If X>=Y
then Bolshee:=X
else Bolshee:=Y;
WriteLn ('Результат:
',Bolshee)
END.
Рис. 3.4
Do'stlaringiz bilan baham: |