Вопрос пользователя:
Вывести все 3хзначные числа, квадрат которого заканчивается этим же числом (например: 376^2=141376)
Илюха отвечает:
Pascal (гдето так…)
program treska;
var a,i,k,b,b2,b3:integer;
begin
for i:=100 to 999 do
begin
a:=sqr(i);
k:=a-i;
b:=a-k;
if i=b then write (i,’ ‘);
end;
readln
end.