Ввести номер месяца и вывести название времени года. Пример: Введите номер месяца 4 весна

Напишите программу на языке паскаль

Question

Информатика

Ростяна

14 февраля, 19:39

Ввести номер месяца и вывести название времени года. Пример: Введите номер месяца 4 весна

Напишите программу на языке паскаль

+4

Ответы (1)

Знаете ответ на вопрос?

Веденя · Answer 1

Var a: byte;

begin

writeln ('Введите номер месяца:') ;

readln (a) ;

case a of

1, 2, 12: writeln ('Зима') ;

3 ... 5: writeln ('Весна') ;

6 ... 8: writeln ('Лето') ;

9 ... 11: writeln ('Осень')

else writeln ('Ошибка') ;

end;

end.

Ввести номер месяца и вывести название времени года. Пример: Введите номер месяца 4 веснаНапишите программу на языке паскаль

Ввести номер месяца и вывести название времени года. Пример: Введите номер месяца 4 весна

Напишите программу на языке паскаль