Объявить двумерный массив 4x4.заполнить случайными числами (-10; 10). вывести массив .найти наименьший элемент и заменить его 0.вывести массив.

kristina761 kristina761    2   02.10.2019 22:00    2

Ответы
Nikita120102 Nikita120102  10.09.2020 22:54
PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018Внимание! Если программа не работает, обновите версию!

begin

 Writeln('*** Исходный массив ***');

 var a := MatrRandom(4, 4, -10, 10);

 a.Println(4);

 Writeln('*** Полученный массив ***');

 var e := a.ElementsWithIndexes.MinBy(t -> t[0]);

 a[e[1], e[2]] := 0;

 a.Println(4)

end.


Объявить двумерный массив 4x4.заполнить случайными числами (-10; 10). вывести массив .найти наименьш
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика