Ответы на вопрос:
// с использованием массива в pascalabc.net версия 3 сборка 1150 var a: array [1..12] of integer: =(31,29,31,30,31,30,31,31,30,31,30,31); n: integer; str: string; begin writeln('введи номер месяца'); readln(n); if a[n]=31 then str: =' день' else str: =' дней'; writeln('в месяце под номером ',n,' ',a[n],str); end.
Популярно: Информатика
-
Dyrochka2228.09.2022 10:29
-
Тппсхп01.06.2023 07:21
-
nastiarozhko22.12.2022 00:32
-
vegyan000025.10.2020 22:26
-
aigulkordai29.08.2022 04:07
-
Zexory30.10.2022 04:23
-
Семма010628.09.2022 09:10
-
Tanya20141115.12.2021 07:10
-
polina19a20.04.2022 13:05
-
Jackichan8924.09.2020 05:23