Двумерный массив 10х10 заполнен случайными числами от 0 до 100 вывести начальный массив и заменить 1 строку на единицы вторую на двойки и так далее а после заменить диагонали на 0

beginvar m := MatrRandom(10,10,0,100); ('Начальный массив:').Println; m.Println; m.Fill((i,j)->(i=j)or(i=9-j)?0:i+1); ('Изменённый массив:').Println; m.Println; end.

Пример работы: