позязя по информатике))) утром за четверть оценки высталяют!
Составьте программу, которая будет находить числа - палиндромы из заданного промежутка.
280
466
Ответы на вопрос:
ответ: 428
нашел с программы
var x, l, m, i: integer; begin for i : = 4096 downto 1 do begin l : = 0; m : = 1; x : = i; while x > 0 do begin inc(l); m : = m *(x mod 8); x : = x div 8; end; if (l = 3) and (m = 120) then begin writeln('x = ', i); break; end; end; readln; end.
Популярно: Информатика
-
joshwa7723.03.2023 12:24
-
GoRussia22820.05.2022 06:38
-
KenDipp04.08.2022 23:00
-
danila11042005103.07.2021 10:57
-
DmitriyTF226.03.2023 12:09
-
onaleman14.01.2020 16:20
-
Aaaalisa14.06.2020 01:01
-
FRIEND15125.12.2022 19:39
-
botuguruur09.04.2021 11:50
-
KirochkaMirina25.04.2021 00:16