Паскаль. По номеру месяца вывести название следующего вывода.

1
например?
Поэтому я сюда и обратилась. Задание непонятно.

Ответы и объяснения

2013-12-18T21:37:18+04:00
Var a:byte;
begin
if a=1 then write ('Январь'); if a=1 then write ('Февраль'); if a=1 then write ('Март'); if a=1 then write ('Апрель'); 
if a=1 then write ('Май');if a=1 then write ('');if a=1 then write ('');if a=1 then write ('');
if a=1 then write ('');if a=1 then write ('');if a=1 then write ('');if a=1 then write ('');
end.
месяцы доставишь