Составьте программу, выясняющую, есть ли в двухмерном массиве А(N,M) строки, сумма элементов которых есть отрицательное число ( ПАСКАЛЬ!)
P.S. нужно, чтобы эта программа запустилась в с++
Очень срочно!
P.S. нужно, чтобы эта программа запустилась в с++
Очень срочно!
More Questions From This User See All
Answers & Comments
===== PascalABC.NET =====
begin
var (n, m) := ReadInteger2('Введите n и m:');
var a := MatrRandom(n, m, -99, 99);
a.Println;
if a.Rows.Select(r -> r.Sum).Any(s -> s < 0) then
Print('Есть')
else
Print('Нет')
end.