Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Составить программы на Паскаль которая по номеру месяца определит его название.

Ответ оставил Гость

Var
m:integer;
begin
read (m);
case m of
1: write (Январь);
2: write (Февраль);
3: write (Март);
4: write (Апрель);
5: write (Май);
6: write (Июнь);
7: write (Июль);
8: write (Август);
9: write (Сентябрь);
10: write (Октябрь);
11: write (Ноябрь);
12: write (Декабрь);
end;
end.