Объявить двумерный массив 4x4.Заполнить случайными числами (-10;10). Вывести массив .Отыскать

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

Задать свой вопрос
1 ответ

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 -gt; t[0]);

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

 a.Println(4)

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт