Двумерный массив 10х10 заполнен случайными числами - вопрос №1343354710100100 от Sasha1234679 02.02.2022 20:21

Question

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

Sasha1234679 · Answer

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.

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

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