разработать блок схему для решения задачи(составить программу вычисления суммы квадратов всех натуральных чисел от 1 до 20)

program summa;

uses crt;

var  i : integer;sum: real;beginsum:=0;for i:=1 to 20 do beginsum:=sum+ sqr(i);end;Writeln('Summa =', sum);end.

Вот тебе программа на паскале . Она находит сумму квадратов всех натуральных чисел от 1 до 20. вот блок схема. Блок схему скину на мыло. Напиши мне его и я тебе скину