Одномерный массив

[spani]

Доброго времени суток!
Очень прошу Вас помочь. Нужно составить программу по блок-схеме. Одномерный массив, в оболочке Delphi. Условие задачи: Разместить элементы массива из 8 целых чисел в обратном порядке.
Блок-Схема: http://rghost.ru/46559066 . С Delphi сталкиваюсь в первый раз. Вот что у меня вышло:

procedure TForm1.Button1Click(Sender: TObject);

var
i:Integer;
A:array [1..8] of integer;
begin
for i:=1 to 8 do
begin

A[i]:=StrToInt(Memo1.Lines);
for i:=7 to 8
t:=a[i];
a[i]:=a[9-i];
a[9-i]:=t
for i:=1 to 8
Memo2 lines.Add(IntToStr(a[i]));
end;

end.

[zetrix]

>> Нужно составить программу по блок-схеме
и
>>Разместить элементы массива из 8 целых чисел в обратном порядке

Противоречивые условия, т.к. программа написанная по предложенной блоксхеме не выполнит поставленную задачу.

В предложенном коде, написанном по блок схеме, очевидные ошибки:
произвольно разбросанные begin...end. В рамках процедуры TForm1.Button1Click кол-во begin и end не равно.

Сталкиваетесь с делфи первый раз? Ноу проблем, пишите на паскале/с++/basic. С переводом поможем.