Пожалуйста помогите составить блок-схему Program Z3;var i,N : byte; S : real;beginwriteln('Введите N =');readln(N);S := 0;for i :=1 to N dos:=s+i;writeln('S= ', S);readlnend.
Программа для сложения натуральных чисел