Дан двумерный массив . Заменить минимальный элемент суммой всех элементов.
Текст программы в Pascal.
Ответы
Ответ дал:
1
begin
var (m, n) := ReadInteger2('Число строк и столбцов:');
var a := MatrRandom(m, n, -99, 99);
a.Println(5);
Writeln;
var t := a.ElementsWithIndices.MinBy(p -> p[0]);
a[t[1], t[2]] := a.ElementsByRow.Sum;
a.Println(5)
end.
Приложения:
Похожие вопросы
1 год назад
1 год назад
1 год назад
2 года назад
2 года назад