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

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Осень