Дано натуральное число n. Найти тройки x, y, z таких натуральных чисел, что n=x2+y2+z2 Получить результат при n=166
Дано натуральное число n.
Найти тройки x,
y,
z
таких натуральных чисел, что
n=x2+y2+z2
Получить результат при n=166
Гость
Ответ(ы) на вопрос:
Гостьvar x,y,z,n:integer;
begin
writeln('Введите n');
readln(n)
;for x:=1 to n do
begin
for y:=1 to n do
begin
for z:=1 to n do
begin
if (sqr(x)+sqr(y)+sqr(z)=n)then writeln('x=',x,' y=',y,' z=',z);
end;
end;
end;
end.
Не нашли ответ?
Похожие вопросы