Оператор case в PascalABC.NET. Как использовать?

Оператор case в PascalABC.NET используется для сопоставления значения некоторого выражения с константными значениями. ru.wikibooks.org Он выполняет одно действие из нескольких в зависимости от значения выражения-переключателя. pascalabc.net pascalabc.miraheze.org

Синтаксис:

case переключатель of   список выбора 1: оператор1;   ...   список выбора N: операторN;   else список операторов end.                                                                          pascalabc.net                                                                                               pascalabc.miraheze.org                       

Переключатель представляет собой выражение порядкового или строкового типа, а списки выбора содержат константы совместимого по присваиванию типа. pascalabc.net pascalabc.miraheze.org

Оператор работает: если в одном из списков выбора найдено текущее значение переключателя, то выполняется оператор, соответствующий данному списку. pascalabc.net pascalabc.miraheze.org Если же значение переключателя не найдено ни в одном списке, то выполняется список операторов по ветке else или, если ветка else отсутствует, оператор case не выполняет никаких действий. pascalabc.net pascalabc.miraheze.org

Пример использования:

case Country of   'Россия': Capital := 'Москва';   'Франция': Capital := 'Париж';   'Италия': Capital := 'Рим';   else Capital := 'Страна отсутствует в базе данных'; end;                                                                          pascalabc.net                                                                                               pascalabc.miraheze.org                       

Списки выбора не должны пересекаться. pascalabc.net pascalabc.miraheze.org Например, следующий фрагмент case i of 2,5: write(1); 4..6: write(2); end; приведёт к ошибке компиляции. pascalabc.net pascalabc.miraheze.org