Регистрация
misha515
03.09.2022 08:32
Информатика
Есть ответ 👍

Ввести с клавиатуры число из интервала 1…12 и напечатать соответствующий ему месяц года. Если этот месяц - июль, дополнительно с Где Вы желаете провести отпуск? ". Предусмотреть ответ на ввод числа, не попадающего в интервал 1…12.

Оператор switch,case

171
197
Посмотреть ответы 2

Ответы на вопрос:

lshellter
lshellter
4,4(23 оценок)

var m:integer;

   t:string;

begin

 readln(m);

 case m of

   1: writeln('Январь');

   2: writeln('Февраль');

   3: writeln('Март');

   4: writeln('Апрель');

   5: writeln('Май');

   6: writeln('Июнь');

   7: begin

     writeln('Где вы желаете провести отпуск?');

     readln(t);

     writeln('Июль вы проведете ',t);

   end;

   8: writeln('Август');

   9: writeln('Сентябрь');

   10: writeln('Октябрь');

   11: writeln('Ноябрь');

   12: writeln('Декабрь');

 else

   writeln('Введено некорректное число');

 end;

end.

113456890
113456890
4,6(92 оценок)
C: \document\seminar\info\form\lesson.htm

Популярно: Информатика