|

Задание: Требуется перевести пятибалльную оценку в ее
наименование: 5-"отлично", 4-"хорошо",
3-"удовлетворительно", 2-
"неудовлетворительно".
Program Marks_1;
var N: integer;
Begin
Writeln('Введите оценку');
ReadLn(N);
if N=5 Then Writeln('Отлично');
if N=4 Then Writeln('Хорошо');
if N=3 Then Writeln('Удовлетворительно');
if N=2 Then Writeln(Неудовлетворительно'')
Else Writeln('Неверная оценка');
End.
Вы уже, наверное, представили,
насколько этот подход однообразный и утомительный. Язык Паскаль предоставляет
для этих целей другую управляющую структуру (оператор выбора case), которая
позволяет построить ветвление по ряду условий в форме, более удобной для чтения
программ.
Оператор выбора
позволяет выбрать одно из нескольких возможных продолжений программы.
Параметром, по которому осуществляется выбор, служит так называемый ключ выбора
(или селектор) - выражение любого типа (кроме типов REAL и STRING).
Оператор caseСтруктура оператора выбора такова:case <ключ выбора> of<список выбора>[else <операторы>]end;
Program Marks_2;Оператор выбора работает следующим образом. Сначала вычисляется значение выражения, стоящее после зарезервированного слова case, а затем выполняется оператор (или составной оператор), соответствующий результату вычисления выражения.
var N: integer;
Begin
Writeln('Введите оценку');
ReadLn(N);
Сase N 0f
5: Writeln('Отлично');
4: Writeln('Хорошо');
3: Writeln('Удовлетворительно');
2: Writeln(Неудовлетворительно'')
Else Writeln('Неверная оценка');
End;
Этапы выполнения задания.
I.Определение исходных данных: переменная n.II. Определение результатов: вывод названия поры года.III. Алгоритм решения задачи.1. Ввод исходных данных2. Проверяем чему равно n и соответственно выводим название поры года.
IV. Описание переменных:
Переменная n типа inreger.
V. Программа:
ПРАКТИЧЕСКАЯ РАБОТА >>>>>
САМОСТОЯТЕЛЬНАЯ РАБОТА >>>>>
Комментариев нет:
Отправить комментарий