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

Программа Паскаль

Помогите пожалуйста. Заранее СПАСИБО

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программа не работает, обновите версию!

begin

 var m := Arr('Зима', 'Зима', 'Весна', 'Весна', 'Весна', 'Лето',

     'Лето', 'Лето', 'Осень', 'Осень', 'Осень', 'Зима');

 var k := ReadInteger('Введите номер месяца:') - 1;

 if k.InRange(0, 11) then Println(m[k])

 else Println('Недопустимый номер месяца')

end.

Введите номер месяца: 11

Осень