Паскаль.Программа для нахождения чисел квадрата трёхзначного числа.

[vmilyoshin]

Помогите справится с поставленной задачей:
Квадрат трехзначного числа оканчивается тремя цифрами, которые составляют взятое число. Разработать схему алгоритма и написать программу для нахождения всех таких чисел.
Я что то не въеду с чего начать.

[vmilyoshin]

Неужели на форуме изчесли опытные программисты.

[Hacker19_90]

Ну а если так

program forum;
var
    i: longint;
begin
    for i := 100 to 999 do
    begin
        if (sqr(i) mod 1000) = i) then
           write (i:4);
        end;
end.

[vmilyoshin]

Задачу нужно решить методом перебора.

[evg_m]

Задачу нужно решить методом перебора.

for i := 100 to 999 do

перебор ВСЕХ трехзначных чисел