Регистрация
1985alla
02.02.2023 19:20
Информатика
Есть ответ 👍

Найдите остаток от деления числа 1231234155 на 8

181
380
Посмотреть ответы 2

Ответы на вопрос:

енот252
енот252
4,8(31 оценок)

0.375

nastyasuhomlinova
nastyasuhomlinova
4,4(52 оценок)
Var   n, i, m: longint;   s1, s2: string;   l1: integer; begin   write('введите натуральное число: ');   readln(n);   writeln('автоморфные числа: ');   for i : = 1 to n do   begin       m : = sqr(i);       str(i, s1);       l1 : = length(s1);       str(m, s2);       if s1 = copy(s2, length(s2) - l1 + 1, l1) then writeln(i)   end end. тестовое решение: введите натуральное число: 10000 автоморфные числа: 1 5 6 25 76 376 625 9376

Популярно: Информатика