По заданному числу (1-12)вывести название соответствующего месяца решить задачу в

По заданному числу (1-12)вывести название соответствующего месяца решить задачу впаскале 1 постановка задачи Величины:N-месяц исходные данные :N результат: Текстовое сообщение(наименование месяцев) 2.Формализация Алг??? Перем.??? Начало Вывод(введите месяц N= '); Ввода(N) program PROJECT var??? begin??? заполните знаки вопроса
Гость
Ответ(ы) на вопрос:
Гость
Var     a: array[1..12]of string := ('январь', 'февраль', 'март', 'апрель', 'май', 'июнь', 'июль', 'авгус', 'сентябрь', 'октябрь', 'ноябрь', 'декабрь');     k: integer; begin     readln(k);     writeln(a[k]); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы