Натуральное число называется автоморфным, если оно равно последним цифрам своего квадрата. например, 25^2 = 625. напишите программу, которая получает натуральное число n и выводит на экран все автоморфные числа, не превосходящие n. пример: введите n: 1000 1*1=1 5*5=25 6*6=36 25*25=625 76*76=5776

//pascalabc.net 3.0 function check(x: integer): boolean; begin var tmp : = x * x; result : = true; repeat if tmp mod 10 < > x mod 10 then result : = false; tmp : = tmp div 10; x : = x div 10; until (x = 0) or not(result); end; begin var n : = readinteger('введите n: '); range(1, n).where(x -> check((x -> x.tostring + '*' + x.tostring + '=' + (x * x).tostring).println(newline) e nd.

27: 2=13       \1 13: 2=6         \1 6: 2=3           \0 3: 2=1           \1                     \1. 27(10)=11011(2).

20 - 25 = -5

-5 в десятичной системе