С помощью этого оператора можно выбрать вариант из любого количества вариантов. Структура этого оператора в Turbo Pascal:
case S of C1:Instruction1; C2:Instruction2; CN: InstructionN; else Instruction end;
Пример.
case I of 0, 2, 4, 6, 8: WriteLn('Четная цифра'); 1, 3, 5, 7, 9: WriteLn('Нечетная цифра'); 10..100: WriteLn('Число от 10 до 100'); else WriteLn('Отрицательное число или больше 100') end;
Оператором может являться не только простой оператор, но также составной и пустой операторы.
Пример.
case CODE of 1 : for i := 1 to 5 do writeln (‘*******‘); 2 : begin {составной оператор} x:=sqr(y-1); writeln (x); end; 3 : {пустой оператор}
end;
Задание: написать программу в соответствии с выбранным вариантом. Ответить на контрольные вопросы. Составить отчет.
Написать алгоритм, позволяющий получить словесное наименование школьных оценок.
Написать алгортм, классифицирующий треугольники (остроугольные, прямоугольные, тупоугольные), если даны углы.
По номеру дня недели вывести его название.
В зависимости от того введена ли открытая скобка или закрытая, напечатать "открытая круглая скобка" или "закрытая фигурная скобка". (Учитывать круглые, квадратные, фигурные скобки).
В зависимости от введённого символа L, S, V программа должна вычислять длину окружности; площадь круга; объём цилиндра.
По введенному числу от 0 до 15 вывести название цвета, соответствующего этому коду.
Определить, является ли введенная буква русского алфавита гласной.
Придумайте шуточный тест с выдачей шуточных результатов(не менее 5 вопросов в тесте).
Напишите программу, которая по введенному числу из промежутка 0..24, определяет время суток.
Контрольные вопросы:
1. Чем отличается линейный алгоритм от ветвления?
2. Какие ключевые слова используются в Паскале для организации ветвления? Что находится между ними?
3. Как оформлять текст программы, чтобы он был понятнее?
4. Перечислите типы используемых операторов в вашей программе.