Напишите программу, которая вводит номер месяца и выводит название времени года на английском языке. При вводе неверного номера месяца должно быть выведено слово 'NO'.

Входные данные
Входная строка содержит единственное число – номер месяца (возможно, неверный).

Выходные данные
Нужно вывести название времени года (на английском языке), соответствующее введённому номеру месяца ('winter' – зима, 'spring' – весна, 'summer' – лето, 'autumn' – осень). Если введён неверный номер месяца, программы должна вывести слово 'NO'.
ДЛЯ ABCpascal !!!

Для решения задачи на языке ABCpascal нужно воспользоваться оператором условного перехода case или if для определения времени года по номеру месяца. Кроме того, нужно обработать ситуацию, когда номер месяца введён неверно (например, меньше 1 или больше 12). Вот пример кода, который решает эту задачу:

pascal
program SeasonByMonth;
var
    month: integer;
begin
    readln(month);
    
    case month of
        1, 2, 12: writeln('winter');
        3, 4, 5: writeln('spring');
        6, 7, 8: writeln('summer');
        9, 10, 11: writeln('autumn');
    else
        writeln('NO');
    end;
end.

Объяснение работы программы

1. Чтение номера месяца:

   • Программа считывает значение month как целое число, введённое пользователем.

2. Проверка и вывод времени года:

   • С помощью оператора case проверяется значение переменной month.
   • Если значение равно 1, 2 или 12, программа выводит winter (зима).
   • Если значение равно 3, 4 или 5, программа выводит spring (весна).
   • Если значение равно 6, 7 или 8, программа выводит summer (лето).
   • Если значение равно 9, 10 или 11, программа выводит autumn (осень).

3. Обработка неверного ввода:

   • Если month не попадает в диапазон от 1 до 12, срабатывает блок else, и программа выводит NO, указывая на ошибочный ввод.

Примеры работы программы

• Ввод: 3 → Вывод: spring
• Ввод: 8 → Вывод: summer
• Ввод: 13 → Вывод: NO