Регистрация
Войти
Стать экспертом Правила
Информатика

Помогите пожалуйста! найти количество положительных и количество отрицательных элементов матрицы 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-gt;x).Where(x-gt;xlt;0).Count;
  var kp:=a.Rows.SelectMany(x-gt;x).Where(x-gt;xgt;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 положительных

21
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам