Дано натуральное число n. Можно ли представить его в виде суммы двух квадратов натуральных чисел?

[Сеня]

Дано натуральное число n. Можно ли представить его в виде суммы двух квадратов натуральных чисел? Если можно, то указать все пары x, y таких натуральных чисел, что n=x2+y2.

[Sazary]

Вроде работает:

uses crt;
var n,x,y,sk : integer;
begin
clrscr;
write('Vvedite n: ');
readln(n);
writeln;
sk := round(sqrt(n));
for x:=0 to sk-1 do
  begin
  for y:=x to sk do
   if sqr(x)+sqr(y) = n then
    writeln(x,'^2 + ',y,'^2 = ',n);
  end;

readln;
end.

[Сеня]

БлагодарюБ ещё можно?

[AlDelta]

Нельзя.
Закрыто.