Вопрос, который вызвал трудности
Натуральные числа а, b, с называются числами Пифагора, если выполняется условие а2 + b2 = с2. Напечатать все числа Пифагора (программа Паскаль)
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме «ЕГЭ (школьный)». Ваш вопрос звучал так: Натуральные числа а, b, с называются числами Пифагора, если выполняется условие а2 + b2 = с2. Напечатать все числа Пифагора (программа Паскаль)
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
var
a,b,n:integer;
begin
readln(n);
for a:=1 to n-1 do
for b:=1 to n-1 do
if (sqrt (a*a+b*b)=int( sqrt (a*a+b*b))) and( sqrt (a*a+b*b)<n) then writeln (a,,b,,trunc(sqrt(a*a+b*b)));
end.
a,b,n:integer;
begin
readln(n);
for a:=1 to n-1 do
for b:=1 to n-1 do
if (sqrt (a*a+b*b)=int( sqrt (a*a+b*b))) and( sqrt (a*a+b*b)<n) then writeln (a,,b,,trunc(sqrt(a*a+b*b)));
end.