Помогите пожалуйста очень надо "С клавиатуры вводится число,выдать на экран месяц ему соответствующий !!!!"
var n:integer;
begin
repeat
read(n);
until n=>1 and n<=12 ;
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.
Оцени ответ
