Question

напишите программу по блок схеме пожалуйста​

Answer 1

Ответ:

var a, i:integer;

begin

 a:=1;

for i:=1 to 5 do

 a:=a+i;

 writeln (a);

end.