Автор: alle 25.05.2004 9:20
Помогите решить задачу!
Нужно переставить элементы побочной диагонали квадратной матрицы в обратном порядке.
Заранее благодарен!
Автор: virt 25.05.2004 10:34
Код
for i:=1 to n div 2 do
begin
vr:=a[i,n-i+1];
a[i,n-i+1]:=a[n-i+1,i];
a[n-i+1,i]:=vr
end;