Оператор выбора «CASE…ELSE»

Октябрь 14, 2009 / Автор AlexR / Рубрики Новости, Учебник по паскалю / Ответ

Данный оператор применяется вместо нескольких операторов условия. Общий вид:

Case <выражение> of

<список констант 1>:<оператор 1>;

…

< список констант n>:<оператор n>;

[Else <оператор>]

End;

Если значение выражения равно одной из констант (из списков от 1 до n), то выполняется соответствующий ей (константе) оператор, затем управление передается за пределы оператора выбора. Если же значение не равно ни одной константе, то управление передается по ветке «else», если же и этой ветки нет, то «case» не выполняет никаких действий.

Список констант может состоять из одной или несколько констант. Между константами должна стоять запятая. В Pascal ABC. NET и в Turbo Pascal можно указать промежуток констант например: 2..5.

Важно! Списки констант не должны пересекаться! То есть элементы списков не должны совпадать, и по значению, и по содержанию.

Например: Ввести число от 1 до 12, исходя из его значения, вывести на экран соответственно: месяц зимы, месяц весны, лета или осени…

program month;
var m: integer;
begin
  write ('Введите число:');
  readln (m);
  case m of
    12,1..2: writeln ('Это месяц зимы');
    3..5: writeln ('Это месяц весны');
    6..8: writeln ('Это месяц лета')
    else writeln ('Это месяц осени')
  end
end.

Вернуться к оглавлению

Теги: , , , ,

Комментарии закрыты.