Дана квадратная матрица порядка M. Обнулить элементы матрицы, лежащие выше побочной...

Question

Дана квадратная матрица порядка M. Обнулить элементы матрицы, лежащие выше побочной диагонали. Условный оператор не использовать. Pascal ABC

Answer 1

For i:=1 to m-1 do
for j:=i+1 to m do
a[i,j]:=0;