Помогите пожалуйста очень надо "С клавиатуры вводится число,выдать ** экран месяц ему...

0 голосов
49 просмотров

Помогите пожалуйста очень надо "С клавиатуры вводится число,выдать на экран месяц ему соответствующий !!!!"


Информатика (31 баллов) | 49 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

 var n:integer;
begin
  repeat
     read(n);
 until n=>1 and n<=12 ;<br>case n of
  1: writeln('Январь');
  2: writeln('Февраль');
  3: writeln('Март');
  4: writeln('Апрель');
  5: writeln('Май');
  6: writeln('Июнь);
  7: writeln('Июль');
  8: writeln('Август');
  9: writeln('Сентябрь');
  10: writeln('Октябрь');
  11: writeln('Ноябрь');
  12: writeln('Декабрь');
end;
end.











(13.9k баллов)