Помогите пожалуйста!
Пользователь вводит число , если это число равно 1 , то это январь, если равно 2 , то это февраль, если 3 , то это март.... и т.д. 12 месяцев

var month:integer;begin writeln('Введите номер месяца(1-12): '); readln(month); case month of 1:writeln('Январь'); 2:writeln('Февраль'); 3:writeln('Март'); 4:writeln('Апрель'); 5:writeln('Май'); 6:writeln('Июнь'); 7:writeln('Июль'); 8:writeln('Август'); 9:writeln('Сентябрь'); 10:writeln('Октябрь'); 11:writeln('Ноябрь'); 12:writeln('Декабрь'); else writeln('Неверно введён номер месяца!'); end;end.