Помогите построить блок-схему для программы 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.

Правильный ответ на вопрос 👍 «Помогите построить блок-схему для программы Pascal: var n, i, j: integer; begin read (n) ; for i : = 1 to n - 1 do for j : = i to n - 1 do ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!