Напишите программу по блок схеме пожалуйста
На паскале?
да
Ответ:
var a, i:integer;
begin
a:=1;
for i:=1 to 5 do
a:=a+i;
writeln (a);
end.