Автоморфные числа натуральное число называется автоморфным , если оно равно последним цифрам своего квадрата. например 25²=625 . напишите программу, которая находит все автоморфные числа на отрезке [a , b ] . входные данные входная строка содержит два натуральных числа – значения a и b , разделённых пробелами. гарантируется, что a ≤ b . выходные данные программа должна вывести в одну строчку все автоморфные числа на отрезке [ a , b ] , разделив их пробелами. если таких чисел нет, программа должна вывести число -1. примеры входные данные 20 100 выходные данные 25 76
таня1697
1
07.06.2019 20:50
43
Другие вопросы по теме Информатика
krasota33
19.03.2021 11:18
shakirqasanov
19.03.2021 11:18
Еля24
19.03.2021 11:19
vasilyukandrey
19.03.2021 11:20
ОпятьДЗ
19.03.2021 11:21
тёмая
19.03.2021 11:21
BlackPorshe2356
21.04.2021 10:14
edeeeeeeffer
21.04.2021 10:15
lol1025
19.06.2019 16:30
котик957
01.12.2021 20:13
Популярные вопросы
- Поставьте глаголы в нужную форму the Present Simple or the Present...
3 - Местные условия климата - это...
2 - Узнай, будет ли пара чисел (0;6) решением уравнения 5x+2y−12=0 ? ответ:...
3 - 2. Қуаныштың мәтінін қалпына келтіріп жаз.Қажетті сөздер: ғарышкеме,...
2 - Можете ещё написать построение ...
2 - Установите соответствующие между понятиями и их определениями к каждому...
1 - Асқар Алтай прописка әңгімесінің тақырыбын табу....
3 - Написать сочинение характеристика Снегурочки из пьесы сказки а.н....
3 - Ученик 6 а класса в рамках проекта туган жерге тагзым на школьном...
3 - НУ Цели сторон - Ледовое побоище...
1
begin
readln(a, b);
a1:=a;
k:=0;
while a<>0 do
begin
a:=a div 10;
k:=k+1;
end;
x:=1;
for i:=1 to k do
x:=x*10;
q:=-1;
for i:=a1 to b do
if i=((i*i) mod x) then
begin
write(i, ' ');
q:=i;
end;
if q=-1 then write(q);
end.