Срочно помогите плз Перевести введенный номер месяца года (1,2...12) в его название...

0 голосов
14 просмотров

Срочно помогите плз
Перевести введенный номер месяца года (1,2...12) в его название (январь,февраль...декабрь)


Информатика (33 баллов) | 14 просмотров
Дан 1 ответ
0 голосов

Var mn: array[1..12] of string = ('январь','февраль','март',
        'апрель','май','июнь','июль','август','сентябрь',
        'октябрь','ноябрь','декабрь');
    n: integer;
begin
  write('номер месяца: ');  readln(n);
  write(mn[n]);
end.



(9.7k баллов)
0

можешь объяснить где что?