Ответы на вопрос:
program NUMKVART;
var MESIATZ: 1..12;
begin
write ('Введите номер месяца года – ');
read (MESIATZ);
case MESIATZ of
1, 2, 3: writeln ('Первый квартал');
4, 5, 6: writeln ('Второй квартал');
7, 8, 9: writeln ('Третий квартал');
10, 11, 12: writeln ('Четвертый квартал');
end;
end.
var MESIATZ: 1..12;
begin
write ('Введите номер месяца года – ');
read (MESIATZ);
case MESIATZ of
1, 2, 3: writeln ('Первый квартал');
4, 5, 6: writeln ('Второй квартал');
7, 8, 9: writeln ('Третий квартал');
10, 11, 12: writeln ('Четвертый квартал');
end;
end.
Популярно: Другие предметы
-
данил193131.05.2020 16:44
-
PowerSell01.03.2020 18:36
-
yan2005byp06ne205.10.2020 13:53
-
ougodnikovaa20.10.2020 20:55
-
lGeneralll01.01.2022 12:28
-
kiorav20.03.2021 16:55
-
kilala0006.06.2022 22:25
-
lllJenyalll08.05.2023 06:53
-
anastasia53817.01.2022 20:22
-
НастяБлог08.07.2020 18:41