Форум «Всё о Паскале» > Задача: квадратная матрица

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;

Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.