Предмет: Информатика,
автор: yulia02072000
Напишите прогрумму, которая по месяцу, будет выводить его название
1-январь
2-февраль и тд
Помогиите
Ответы
Автор ответа:
0
var
a:integer;
begin
write('Введите номер месяца:');read(a);
case a of
1: write('Январь');
2: write('Февраль');
3: write('Март');
4: write('Апрель');
5: write('Май');
6: write('Июнь');
7: write('Июль');
8: write('Август');
9: write('Сентябрь');
10: write('Октябрь');
11: write('Ноябрь');
12: write('Декабрь');
end;
end.
a:integer;
begin
write('Введите номер месяца:');read(a);
case a of
1: write('Январь');
2: write('Февраль');
3: write('Март');
4: write('Апрель');
5: write('Май');
6: write('Июнь');
7: write('Июль');
8: write('Август');
9: write('Сентябрь');
10: write('Октябрь');
11: write('Ноябрь');
12: write('Декабрь');
end;
end.
Похожие вопросы
Предмет: Литература,
автор: karimageev83
Предмет: Қазақ тiлi,
автор: kramkristina664
Предмет: Литература,
автор: Аноним
Предмет: Математика,
автор: Elena1231
Предмет: Математика,
автор: Ruzina