Developing.ru

помогите с программкой срочно надо! Квадраты некоторых трёхзначных чисел оканчиваются тремя цифрами, которые и составляют исходные числа. Написать программу поиска таких чисел (6252 = 390625).

пример неудачный =)

for i:=100 to 999 do
if sqr(i) mod 1000 = i
then writeln(i);

Интересно, догадаются, какого типа должно быть i