В ПАСКАЛЕ! написать программу которая по номеру месяца выдает заглавие следующего

Сделаем массив строкового типа, в который поместим наименования месяцев. Их всего 12, означает и частей в нем будет 12:
var mesyacy: array [1..12] of string;
Когда пользователь будет вводить число, необходимо учесть, что он может ввести больше, чем 12 и меньше, чем один.
Чтоб это предупредить, запишем:
readln(m);
if (m lt; 1) and (m gt; 12) then
writeln(Ошибка ввода)
else
begin
if (m = 1) then
writeln (mesyacy[12])
else
writeln (mesyacy[m + 1]) выводится будет элемент, номер которого увеличен на один.
end;