Выдает ошибку Array type required!

[LIEN]

Добрго времни суток! Будте добры помгоите пожалуйста разобраться! Я в программировании полный лох... а тут такая проблема. При запуске выдает ошибку "Array type required" и красным выделяет строку:

procedure TForm1.Button4Click(Sender: TObject);
var
Q,X,C,P,H,F,K,Z:real;
j:integer;
begin
for j:=1 to 10 do begin

Q[j,1]:=strtofloat(stringGrid1.Cells[j,1]);
X[j,2]:=strtofloat(stringGrid1.Cells[j,2]);
C[j,3]:=strtofloat(stringGrid1.Cells[j,3]);
P[j,1]:=strtofloat(stringGrid2.Cells[j,1]);
H[j,2]:=strtofloat(stringGrid2.Cells[j,2]);
F[j,3]:=strtofloat(stringGrid2.Cells[j,3]);
stringGrid3.Cells[j,0]:=stringGrid1.Cells[j,0];
end;
end;
for j:=1 to 10 do begin
C:=Q[j,1]*X[j,2];
F:=P[j,1]*H[j,2];
end;
for j:=1 to 10 do begin
K:=Q[j,1]-P[j,1];
Z:=C[j,3]-F[j,3];
end;
end.
Зараннее благодарна!

[DM_bite]

Q,X,C,P,H,F,K,Z:real;

Причем тут Q? Q имеет тип real и к массиву вообще никакого отношения не имеет, а вы пытаетесь какие-то индексы к нему прицепить.
P.s.: Да и вообще, бред это какой-то...

[LIEN]

бред?? а нам это на паре выдали... сказали исправить ошибки и усе.... черт... ну лан... все равно спасибо!

[Kotofff]

Наверное тебе нужно поправить тут :

var
Q,X,C,P,H,F,K,Z:array[1..10,1..3] of real;

Размерность можно поправить в зависимости от задачи ...

[LIEN]

)) Kotofff бесконечно благодарна!!!!!!

[DM_bite]

Наверное тебе нужно поправить тут :

Верно.Эти идентификаторы и есть массивы(их объявили неверно).А я чето прицепился к другому.

[LIEN]

А..... пардон... после внесенных изменений он тогда выделяет строку
C:=Q[j,1]*X[j,2]
и пишет ошибку Incompatible types "Array" and "Extended"!!!!!

[Stilet]

А C отдельно обьяви как real )

[LIEN]

Stilet а так он тогда ведь выдаст что С два раза объявлена...

[__STDC__]

О_О надо ее объявить ВМЕСТО той..