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

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

Question

Информатика

Даша

25 марта, 15:42

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

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

+3

Ответы (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 весна

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