Вообщем есть массив
A:array[0..5,0..5] of real;
При A[i,j]:=a[j,i] не работает
может кто нибудь что нибудь посоветует
Все работает, только циклы надо делать не
for i := 0 to n do, а ограничиться
for j := 0 to n do begin ...
for i := 0 to n do
for j := i to n do begin ...