ВХОД

МЕТОДИЧЕСКИЕ РАЗРАБОТКИ ПО КУРСУ ИНФОРМАТИКИ

"ПРОГРАММИРОВАНИЕ НА ЯЗЫКЕ PASCAL"

Начало > Глава V. Автоморфные числа

ГЛАВА V

АЛГОРИТМ

Автоморфные числа

Числа, у которых квадрат числа оканчивается на само число. Пример: 5 → 25, 6 → 36, 25 → 625, 76 → 5776.




p:=1; {p - порядок цифр}
for ch:=n to m do {n, m - интервал чисел}
    begin

    while p<=ch do p:=p*10;

    if sqr(ch) mod p=ch then
      write(ch, 'автоморфное число');

    end;




 

 

 

 

Copyright ©2011 Nika A.S.
Hosted by uCoz