Write a program that, by the number of the month, gives the name of the month following it with m = 1

Let’s create an array of string type, into which we will place the names of the months. There are only 12 of them, which means there will be 12 elements in it:
var mesyacy: array [1..12] of string;
When the user enters a number, you need to take into account that he can enter more than 12 and less than one.
To prevent this, we write down:
readln (m);
if (m <1) and (m> 12) then
writeln (‘Input error’)
else
begin
if (m = 1) then
writeln (mesyacy [12])
else
writeln (mesyacy [m + 1]) – the item whose number is increased by one will be displayed.
end;