ВОПРОС ПО DELFHI СРОЧНО пожалуйстя

[zevs 12]

Все элементы матрицы X (n x n), лежащие выше главной диагонали, заменить количеством элементов с дробной частью, стоящих в четных столбцах

Не могу заменить элементы матрицы X (n x n), лежащие выше главной диагонали, как это сделать ((((


вот какие соображения были, приложение оконное

for i:= 1 to n do
for j:= 0 to i+1 do begin
x1[i,j]:=k;
end;

[Mad_Cat]

for i:= 1 to n do
for j:= i to n do begin

[zevs 12]

не работает ну спасибо все равно))