var
a, b, c: integer;
begin
write('введите номер месяца - ');
readln(a);
case a of
1, 2, 12:
begin
writeln('время года - зима');
if (a = 1) or (a = 12) then write('кол-во дней - 31') else write('кол-во дней - 28')
end;
3, 4, 5:
begin
writeln('время года - весна');
if (a = 3) or (a = 5) then write('кол-во дней - 31') else write('кол-во дней - 30')
end;
6, 7, 8:
begin
writeln('время года - лето');
if (a = 7) or (a = 8) then write('кол-во дней - 31') else write('кол-во дней - 30')
end;
9, 10, 11:
begin
writeln('время года - осень');
if (a = 9) or (a = 11) then write('кол-во дней - 30') else write('кол-во дней - 31')
end;
else write('введен неправильный номер месяца');
end;
end.