Question

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

Answer 1

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

Answer 2

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

Answer 3

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

Answer 4

Понимаю(

Answer 5

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

Answer 6

Пожалуйста.