Здравствуйте, уважаемые эксперты! Прошу вас ответить на следующий вопрос:

cоставить блок-схему по программе
Найдите сумму первого и последнего, второго и предпоследнего и
т.д. элементов массива A(N).. Выведите суммы на экран.
собственно программа ниже
[code lang=pascal h=200]const
n=10;
var
a:array[1..n]of integer;
b:integer;
begin
{создаем массив}
for b:=1 to n do
begin
a[b]:=random(100);
write(a[b]:4);
end;
writeln;
{выводим результат}
for b:=1 to n div 2 do
write(a[b]+a[n-b+1]:4);
writeln;
end.[/code]