prosze o pomoc bo zdurnialem juz calkiem :P
otrzymuje komunikat
unit1.pas(69,39) Fatal: Syntax error, "OF" expected but "[" found
przy tablicy jednowymiarowej wszystko bylo wporzadku
czemu nie chce przyjac "array[1..5, 1..4] of Integer"
procedure sortowanie(var Tab : array[1..5, 1..4] of Integer; indeks : Integer);
Var
i, j,z : Integer; //zmienne dla petli
l, m : Integer; //zmienne z dlugoscia
temp : Integer; //zmienna tymczasowa
begin
l := 5; //Przypisanie dlugosci tablicy
m := l - 1; //Ustalenie maksymalnej ilosci przejsc
for i := 1 to m do
for j := i + 1 to l do
if Tab[j,indeks] > Tab[i,indeks] then //Porównanie dwóch elementów tablicy
begin
for z := 1 to 4 do
begin
temp := Tab[i,z]; //Rozpoczęcie zamiany elementów
Tab[i,z] := Tab[j,z];
Tab[j,z] := temp; //Koniec zamiany elementów
end;
end;
end;