Question

Найти пять наименьших натуральных чисел N таких, что N^2 = А^2 + В^2 + С^2, где А, В и С неравные друг другу натуральные числа.

Answer 1

var N: Integer;
begin
  N:=0;
  for var i:=1 to 5 do
  begin
     N:=i*i+(i+1)*(i+1)+(i+2)*(i+2);
     writeln(N);
  end;   
end.

Answer 2

А можно в виде структурной схемы этот алгоритм построить?
И еще один нюанс, ^2 это значит степень 2, то есть в квадрате.
Спасибо.

Answer 3

Структурную схему не обещаю, но попытаюсь. А вторую степень я реализовала умножив число на самого себя.