Напишите блок схему по коду Паскаль
var a,p:real;

i,n:integer;

Begin

read(a,n);

p:=1;

for i:= 0 to n-1 do

p:=p*(a+i);

writeln(p);

End.

Можете написать блок схему ещё одной задаче?

Могу, но не стану. Вы же понимаете, что это делается в специальной программе и требует массу времени.

Понимаю(

Спасибо за этот ответ

Пожалуйста.

блдок-схема находится во вложении