Question

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

Answer 1

Program yrok;
var a:integer;
begin
writeln ('Введите месяц');
readln(a);
if a=1
then writeln('январь')
else if a=2
then writeln('Февраль')
else if a=3
then writeln('Март')
else if a=4
then writeln('Апрель')
else if a=5
then writeln('Май')
else if a=6
then writeln('Июнь')
else if a=7
then writeln('Июнь')
else if a=8
then writeln('Август')
else if a=9
then writeln('сентябрь')
else if a=10
then writeln('октябрь')
else if a=11
then writeln('ноябрь')
else if a=12
then writeln('декабрь')
else writeln('такого месяца нет');
end.

Answer 2

Для перевода введенного номера месяца года (от 1 до 12) в его название, можно использовать следующую таблицу:

| Номер месяца | Название месяца | |--------------|-----------------| | 1 | Январь | | 2 | Февраль | | 3 | Март | | 4 | Апрель | | 5 | Май | | 6 | Июнь | | 7 | Июль | | 8 | Август | | 9 | Сентябрь | | 10 | Октябрь | | 11 | Ноябрь | | 12 | Декабрь |

Например, если введен номер месяца 3, то соответствующее название месяца будет "Март".

Примечание: Предоставленные выше данные основаны на общепринятом календаре и являются стандартными для большинства стран. Однако, в некоторых культурах и регионах могут использоваться другие названия месяцев.