Дата некоторого дня определяется двумя натуральными числами: m(порядковый номер месяца) и n(число). по заданным m и n определить дату предыдущего дня (принять, что m и n не определяют 1 января).
162
476
Ответы на вопрос:
Const mont: array [1..12] of integer = (31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31); var m, n: integer; begin write('m = '); readln(m); write('n = '); readln(n); if ((m=1) and (n=1)) or (m< 1) or (n< 1) or (m> 12) or (n> mont[m]) then writeln('неопределенная дата') else if n=1 then begin m: =m-1; n: =mont[m]; writeln(n, '-ое число ', m, '-ый месяц') end else begin n: =n-1; writeln(n, '-ое число ', m, '-ый месяц') end; end.
Популярно: Информатика
-
handofkremlin29.10.2021 10:10
-
funfup26.11.2021 19:39
-
чек721.03.2022 02:59
-
Maryna0324.02.2023 05:41
-
FullDown02.01.2020 06:44
-
vzlomhanter23015.05.2023 23:45
-
milanamva0013.03.2022 11:42
-
anastasiyademy101.03.2020 13:28
-
Søphia25.09.2022 10:40
-
tigertuborg07.08.2022 07:04