Напишите пожалуйста программу в Паскале:Написать программу,которая по номеру месяца выводит название следующего за ним месяца(с помощью оператора case) Например: если я ввожу 2 должно выйти март
Напишите пожалуйста программу в Паскале:Написать программу,которая по номеру месяца выводит название следующего за ним месяца(с помощью оператора case) Например: если я ввожу 2 должно выйти март
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
Month: 1..12; //Номер месяца(число от 1 до 12)
begin
writeln('Введите номер месяца');
readln(Month);
case Month of
1: writeln('Февраль');
2: writeln('Март');
3: writeln('Апрель');
4: writeln('Май');
5: writeln('Июнь');
6: writeln('Июль');
7: writeln('Август');
8: writeln('Сентябрь');
9: writeln('Октябрь');
10: writeln('Ноябрь');
11: writeln('Декабрь');
12: writeln('Январь');
end;
end.