Помогите пожалуйста! найти количество положительных и количество отрицательных элементов матрицы Z(9,6) срочно очень надо программирование!!!!!!!!!!! помогите!

Помогите пожалуйста! найти количество положительных и количество отрицательных элементов матрицы Z(9,6) срочно очень надо программирование!!!!!!!!!!! помогите!
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.2, сборка 1367 от 20.12.2016 // Внимание! Если программа не работает, обновите версию! begin   Writeln('*** Исходный массив 9x6 ***');   var a:=MatrRandom(9,6,-50,50); a.Println(4);   Writeln(4*a.ColCount*'-');   var kn:=a.Rows.SelectMany(x->x).Where(x->x<0).Count;   var kp:=a.Rows.SelectMany(x->x).Where(x->x>0).Count;   Writeln(kn,' отрицательных, ',kp,' положительных') end. Пример *** Исходный массив 9x6 ***  -47  37  23 -34 -33   0  -17  -5  13  -9   0 -46  -41  31  41 -30 -24  49   39  50  13   4  19  14  -17 -12 -24  22  -9 -44  -27  17 -44 -35  -4  32   26  -5  49  -7 -28 -25  -15  -9  13  25 -26 -29  -40 -24  -4  50  33 -45 ------------------------ 31 отрицательных, 21 положительных
Не нашли ответ?
Ответить на вопрос
Похожие вопросы