В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История

ПАМАГИТЕ СОР ИНФОРМАТИКА 7 КЛАСС ​

Показать ответ
Ответ:
sashka1281
sashka1281
17.03.2021 20:49
#include <iostream>
using namespace std;

int main() {
  const int S = 6;
  int matrix[S][S];
  cout << "Введите матрицу построчно, разделяя пробелами: " << endl;
  for (int i = 0; i < S; i++) {
    for (int j = 0; j < S; j++) {
      cin >> matrix[i][j];
    }
    cout << endl;
  }
  int p;
  cout << "p = ";
  cin >> p;
  int count = 0, max;
  for (int i = 0; i < S; i++) {
    max = matrix[i][0];
    for (int j = 1; j < S; j++) {
      if (matrix[i][j] > max) max = matrix[i][j];
    }
    if (max > p) count++;
  }
  cout << endl << "ответ: " << count;
  return 0;
}
0,0(0 оценок)
Ответ:
merkurevamilena1
merkurevamilena1
05.11.2021 10:27
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var m:=ReadInteger('Количество строк в массиве:');
  var n:=ReadInteger('Количество столбцов в массиве:');
  Writeln('*** Исходный массив [',m,',',n,'] ***');
  var a:=MatrRandom(m,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('*** Результат ***');
  a.Transform(x->x>=0?0:1); a.Println(4);
  var s:=a.ElementsByRow;
  Writeln('Нулей- ',s.Where(x->x=0).Count,', единиц- ',
      s.Where(x->x=1).Count)
end.

Пример
Количество строк в массиве: 4
Количество столбцов в массиве: 5
*** Исходный массив [4,5] ***
 -19  61 -47 -38 -26
 -95 -35 -56  43  40
   0 -52 -87 -85  93
 -68  48 -55   5 -93

*** Результат ***
   1   0   1   1   1
   1   1   1   0   0
   0   1   1   1   0
   1   0   1   0   1
Нулей- 7, единиц- 13
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота