Pascal ABC
Задание 11. Программа - меню.
Может возникнуть ситуация, когда нужно создать меню программы. То есть при создании программы нужно предусмотреть разные варианты работы, выбираемые пользователем. Примером может служить программа вычисления площадей геометрических фигур: прямоугольник, прямоугольный треугольник, круг, трапеция. Для этого нужно создать управляющую часть программы - ее меню.
Прежде всего, нужно обеспечить вывод на экран подсказки для выбора нужной фигуры. Короче, на экране должно появиться сообщение типа:
Далее программа должна выполнять действия, согласно выбранному номеру фигуры. Не плохо бы предусмотреть вариант, когда был введён некорректный номер фигуры, в этом случае программа должна вывести на экран соответствующее сообщение.
Задание: составьте блок схему программы, и саму программу. Все вводимые значения должны быть целочисленными, результат - реальным. При введении некорректного номера фигуры должно появиться соответствующее сообщение.
Примерный текст фрагмента программы приведён ниже, но в нем не выполнены некоторые условия задания. Подумайте над тем как можно иначе выполнить меню программы.
var a,b,c,n : integer; s : real; begin cls; Writeln(‘ МЕНЮ’); Writeln(‘ ’); Writeln(‘ 1-прямоугольник’); Writeln(‘ 2-треугольник’); Writeln(‘ 3-круг’); Writeln(‘ 4-трапеция’); Writeln(‘ ’); Write(‘Введите номер фигуры ’);ReadLn (n); If n=1 then begin cls; Writeln(‘Площадь прямоугольника'); Write(‘A= ‘); ReadLn(a); Write(‘B= ‘); ReadLn(b); S:=a*b; end; If n=1 then begin cls; Writeln(‘Площадь треугольника’); Write(‘A= ‘); ReadLn(a); Write(‘B=‘); ReadLn(b); S:=a*b/2; end; . . . . . . Writeln(‘ S= ’,S); End. |
Задание 12. Программа - меню (продолжение).
Для осуществления операции выбора действий существует специальный оператор. Информацию о нём и вариантах применения можно получить по ссылкам:
Используя оператор "CASE ... OF ... составьте программу-меню, используя условие предыдущего задания. При создании программы учите особенности оператора:
- Порядкова переменная после ключевого слова CASE должна быть целочисленной, что задаётся в строке описания.
- После порякдвого номера (целочисленной метки) 1:, 2:... может использоваться только один оператор, т.е. возникает необходимость использования составного оператора.
Ответ должен быть предоставлен на форуме
|