М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

Язык паскаль процедуры даны две целочисленные квадратные матрицы порядка n и m. найти для каждой номера строк, все элементы которых нули. все с объяснением

👇
Ответ:
vastgfy
vastgfy
22.05.2023
// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!

procedure MyProc;
begin
  var n:=ReadInteger('Введите порядок матрицы:');
  Writeln('Введите построчно элементы матрицы');
  var a:=ReadMatrInteger(n,n);
  Writeln(4*a.ColCount*'-');
  Write('Строки, содержащие только нули: ');
  for var i:=0 to n-1 do
    if a.Row(i).All(t->t=0) then Print(i+1);
  Writeln
end;

begin
  Loop 2 do MyProc
end.

Пример
Введите порядок матрицы: 3
Введите построчно элементы матрицы
1 0 0
0 0 1
0 0 0

Строки, содержащие только нули: 3
Введите порядок матрицы: 2
Введите построчно элементы матрицы
0 0
0 0

Строки, содержащие только нули: 1 2
4,4(18 оценок)
Открыть все ответы
Ответ:
Елдиор
Елдиор
22.05.2023

Объяснение:

C++Выделить код

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

#include <iostream>

#include <cstdlib>

#include <ctime>

using namespace std;

 

void main()

{

   setlocale(0, "rus");

   int mas[5][5];

   srand(time(NULL));

   cout << "Первоначальный массив" << endl;

   for (int i = 0; i<5; i++){

       cout << endl;

       for (int j = 0; j<5; j++){

           mas[i][j] = rand() % 10;

           cout << mas[i][j] << " ";

       }

       cout << endl;

}

   

   cout << "Полученный массив" << endl;

   for (int i = 0; i<5; i++){

       int tmp = mas[i][i];

       mas[i][i] = mas[i][5 - i - 1];

       mas[i][5 - i - 1] = tmp;

   }

   cout << endl;

   for (int i = 0; i<5; i++){

       cout << endl;

       for (int j = 0; j<5; j++){

           cout << mas[i][j] << " ";

       }

       cout << endl;

   }

}

0

4,6(25 оценок)
Ответ:
natazhukova95
natazhukova95
22.05.2023

Объяснение:

C++Выделить код

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

#include <iostream>

#include <cstdlib>

#include <ctime>

using namespace std;

 

void main()

{

   setlocale(0, "rus");

   int mas[5][5];

   srand(time(NULL));

   cout << "Первоначальный массив" << endl;

   for (int i = 0; i<5; i++){

       cout << endl;

       for (int j = 0; j<5; j++){

           mas[i][j] = rand() % 10;

           cout << mas[i][j] << " ";

       }

       cout << endl;

}

   

   cout << "Полученный массив" << endl;

   for (int i = 0; i<5; i++){

       int tmp = mas[i][i];

       mas[i][i] = mas[i][5 - i - 1];

       mas[i][5 - i - 1] = tmp;

   }

   cout << endl;

   for (int i = 0; i<5; i++){

       cout << endl;

       for (int j = 0; j<5; j++){

           cout << mas[i][j] << " ";

       }

       cout << endl;

   }

}

0

4,5(63 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ