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



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

1

Ответы и объяснения

2013-12-16T17:59:01+04:00
Var a:byte;
begin
read(a);
if (a<3) or (a=12) then write('зима') else
if (a<6) then write (весна'') else
if (a<9) then write ('лето') else write ('осень');
end.