• Определить,сколько элементров матрицы превышает число 2(Паскаль)

Ответы 2

  • .........................................
    answer img
  • // PascalABC.NET 3.2, сборка 1399 от 08.03.2017// Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('Количество строк в матрице:');  var m:=ReadInteger('Количество столбцов в матрице:');  Writeln('*** Исходная матрица [',n,',',m,'] ***');  var a:=MatrRandom(n,m,-99,99);   a.Println(4); Writeln(4*a.ColCount*'-');  Write('Количество элементов, превышающих 2, равно ');  Writeln(a.Rows.SelectMany(x->x).Where(x->x>2).Count)end.Пример:Количество строк в матрице: 4Количество столбцов в матрице: 7*** Исходная матрица [4,7] ***  46  81 -90 -42  -7  -2 -16 -32 -12  16 -46 -54 -85  97  26  98  77  68 -21  47 -63  27   8  -1  54 -46 -52  52----------------------------Количество элементов, превышающих 2, равно 13
    answer img
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years