Ответы на вопрос:
Var mosquito : integer; day, sum : integer; begin day : = 1; mosquito : = 12; sum : = 0; repeat mosquito : = trunc(mosquito * 1.2) + 2; day : = day +1; sum : = sum + mosquito; writeln(' day mosquito sum); until sum > 100; writeln(day); end
Популярно: Информатика
-
margogalaxowa01.10.2021 23:31
-
yadlos3807.12.2021 09:29
-
Smertnik959501.02.2023 11:53
-
dbjshsg01.12.2021 06:55
-
Madwoman1724.06.2021 06:57
-
Madgik200007.06.2021 07:09
-
Светило111Науки20.06.2023 17:35
-
xxxxxxxxxxxxxxx22814.06.2022 10:46
-
Дидар290113.06.2021 00:27
-
ArseniyRich06.03.2022 21:40