Question

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

Answer 1

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