Составить блок схему

Question

Составить блок схему

---

Answer 1

Составил блок схему и программу
var i,n:integer; y, s:real;beginwrite('Введите n');readln(n);for i:=1 to n do s:= s + ((i + 2)/2);y:= s + 3;write(y:3);end.

---