Нужно написать простенькую программу в паскаль, заранее ) : найти наибольшую степень 3 не превышающую заданного числа m
229
435
Ответы на вопрос:
Var i: integer; n,m: longint; begin write('введите натуральное m: '); read(m); n: =1; repeat n: =3*n; inc(i) until n> m; writeln('3^',i-1,' = ',n div 3,' не превышает ',m) end. тестовые решения: введите натуральное m: 1 3^0 = 1 не превышает 1 введите натуральное m: 3 3^1 = 3 не превышает 3 введите натуральное m: 54652341 3^16 = 43046721 не превышает 54652341
32 детей с одинаковым удовольствием играют и в квесты, и в симуляторы.
Объяснение:
Из 90 семиклассников играют в игры:
90-8=82.
"Игродетей":
55+59=114.
114-82=32 детей с одинаковым удовольствием играют и в квесты, и в симуляторы.
Удачи!
Популярно: Информатика
-
SanyaVetka23.01.2020 01:42
-
AnnKJ12.03.2020 11:48
-
NikoBellic9924.10.2022 03:00
-
vvvlll102.08.2020 19:51
-
Strelok7206.04.2022 21:24
-
karolina00000021.11.2022 19:12
-
dron4ik22608.05.2022 20:41
-
ЭлинаКутлуюлова13.09.2022 12:03
-
svyara809.02.2023 18:30
-
Fukci03.01.2022 15:38