Помогите построить блок-схему для программы Pascal:var n, i, j: integer;begin read(n);...

Question

Помогите построить блок-схему для программы Pascal:
var
n, i, j: integer;
begin
read(n);
for i := 1 to n - 1 do
for j := i to n - 1 do
if i * i + j * j <= n then<br> writeln(i,'^2 + ',j,'^2 = ',i * i + j * j);
end.

Answer 1

А как ты написал программу без блок-схемы?