Помогите построить блок-схему для программы 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
writeln(i,^2 + ,j,^2 = ,i * i + j * j);
end.

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

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.