Как найти произведение отрицательных элементов матрицы - AutoPluse.ru

1 / 1 / 0

Регистрация: 15.11.2012

Сообщений: 51

Найти произведение отрицательных элементов матрицы

17.11.2012, 11:41. Показов 4410. Ответов 3

1 Задание. Найти произведение отрицательных элементов матрицы. Закрасить указанные элементы.
2 Задание. Вычислить среднее арифметическое положительных элементов матрицы, расположенных ниже побочной диагонали. Закрасить указанные элементы.

Puporev

Почетный модератор

64287 / 47586 / 32739

Регистрация: 18.05.2008

Сообщений: 115,182

17.11.2012, 11:58

Pascal

uses crt;
const nmax=15;
var a:array[1..nmax,1..nmax] of real;
    n,m,i,j:integer;
    p:real;
begin
randomize;
repeat
write('Размер матрицы до ',nmax,' n=');
read(n);
until n in [1..nmax];
writeln('Исходная матрица:');
p:=1;
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=-5+10*random;
    if a[i,j]<0 then
     begin
      p:=p*a[i,j];
      textcolor(red);
     end
    else textcolor(black);
    write(a[i,j]:5:1);
   end;
  writeln;
 end;
textcolor(black);
write('Произведение отрицательных=',p:0:2)
end.

Добавлено через 4 минуты
2.

Pascal

uses crt;
const nmax=15;
var a:array[1..nmax,1..nmax] of real;
    n,m,i,j,k:integer;
    s:real;
begin
randomize;
repeat
write('Размер матрицы до ',nmax,' n=');
read(n);
until n in [1..nmax];
writeln('Исходная матрица:');
s:=0;k:=0;
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=-5+10*random;
    if (a[i,j]>0)and(j<i) then
     begin
      s:=s+a[i,j];
      k:=k+1;
      textcolor(red);
     end
    else textcolor(black);
    write(a[i,j]:5:1);
   end;
  writeln;
 end;
textcolor(black);
if k=0 then s:=0 else s:=s/k;
write('Ср. арифметическое положительных под побочной дианональю=',s:0:2)
end.

1 / 1 / 0

Регистрация: 15.11.2012

Сообщений: 51

22.11.2012, 14:14

[ТС]

А блок-схему можжно?=)

181 / 179 / 23

Регистрация: 29.08.2012

Сообщений: 489

22.11.2012, 14:33

Сообщение от Ours21

А блок-схему можжно?=)

В задании этого не требовалось. Блок-схему нарисовать — более трудоёмкое занятие, чем написание пограммы, особенно когда это делается после, так как мотивации уже нет. Наоборот, блок-схему составляют до написания программы. Тебе стоило бы её нарисовать даже ради понимания что делается в программе, так что флаг тебе в руки
А то, что ты делаешь называется угадай каким словом, подсказываю — наг..сть или в форме глагола наг..ть.

Источник

Формулировка задачи:

Дан двумерный массив А, состоящий из N строк и M столбцов. Найти указанное значение: произведение отрицательных элементов каждого столбца;

Нужен код программы.

Код к задаче: «Найти произведение отрицательных элементов каждого столбца матрицы»

textual

p:=1;
for i:=1 to n do
  for j:=1 to m do
  begin
    if a[i,j]<0 then p:=p*a[i,j];
    writeln(p);
  end;

Полезно ли:

8 голосов , оценка 4.000 из 5

Источник

Программа должна находить произведение отрицательных элементов матрицы.

Переменная dob Всегда выводит 1
https://pastebin.com/sKQ4cvGT

// ConsoleApplication7.cpp: определяет точку входа для консольного приложения.
//Знайти добуток негативних елементів кожного рядка для матриць a(10,15) і b(15,12). Використовувати функцію.

#include "stdafx.h"
#include <ctime>
#include <iostream>


using namespace std;
long dob = 1;

void atMat(int** &m, int row, int col) {
    m = new int*[row];
    for (size_t i = 0; i < row; i++)
    {
        m[i] = new int[col];
    }
}
//Ощичение памяти 
void reMat(int** &m, int row) {
    for (size_t i = 0; i < row; i++)
    {
        delete[] m[i];
    }
    delete[] m;

}
//инициализация масива 
void inMat(int ** &m, int row, int col) {
    for (size_t i = 0; i < row; i++)
    {
        for (size_t j = 0; j < col; j++)
        {
            m[i][j] = 0 + rand() % 100-50;
            cout << m[i][j] << " ";
        }
        cout << endl;
    }
}

int negativ(int **&m, int row, int col) {
    for (size_t i = 0; i < row; i++)
    {
        for (size_t j = 0; j < col; j++)
        {
            if (m[i][j] > 0)
            {
                dob == dob * m[i][j];
            }
        }
    }
    return dob;
}

int main()
{
    srand(time(0));
    int **arrayA = NULL;  // указатель на указатель 
    int ** arrayB = NULL;
    int aROW = 10;
    int aCOL = 15;
    int bROW = 12;
    int bCol = 10;
    arrayA = new int*[aROW];
    arrayB = new int*[bROW];

    atMat(arrayA, aROW, aCOL);
    atMat(arrayB, bROW, bCol);

    cout << "Your array a :" << endl;
    inMat(arrayA, aROW, aCOL);
    cout << "nn"; 
     cout << "Your array b :" << endl;
     inMat(arrayB, bROW, bCol); // инициализация масива и вывод на экран 

     cout << endl;
     cout << "dob negative elemet  massiva A ravno: " << negativ(arrayA, aROW, aCOL) << endl;
     cout << "dob negative elemet  massiva B ravno: " << negativ(arrayB, bROW, bCol)<< endl;

     reMat(arrayA, aROW); //очищение памяии
     reMat(arrayB, bROW);
     cin.get();
    return 0;
}

Источник

Цель
работы:
выработать
практические
привычки
в
составлении
алгоритмов
на
селективную
обработку
двумерных
массивов.

Общие указания

1 Вложенные циклы

Вложенные
циклы используются при работе с
многомерными функциями и множествами.
При этом нужно следить, чтобы не было
перекрещивания циклов. Его не будет,
если циклы закрываются в порядке,
обратном открыванию (см. пример 5).

Пример
10.
В матрице a(4,5)
найти произведение положительных чисел.

Порядок
работы

Шаг
1. Вводим матрицу a(4,5).

Шаг
2. Задаем начальное значение произведения
p=1.

Шаг
3. Организовываем цикл, перебирающий
строки матрицы (т.е. индекс i),
начиная с 1-ой и кончая 4-ой.

Шаг
4. Организовываем цикл, перебирающий
столбцы матрицы (т.е. индекс j),
начиная с 1-го и кончая 5-м.

Шаг
5. Если a_ij>
0,
тогда присваиваем p
= p

a_ij.

Шаг
6. Если цикл по j
не закончился, идем на начало цикла,
т.е. на шаг 4.

Шаг
7. Если цикл по i
не закончился, идем на начало цикла,
т.е. на шаг 3.

Шаг
8. Печатаем p.

Шаг
9. Останов.

Блок-схема

3.9 Обработка заданной строки (столбца) матрицы

Пример
11.
Найти сумму четных чисел третьей строки
матрицы a(4,5).

Порядок
работы

Шаг
1. Вводим матрицу a(4,5).

Шаг
2. Устанавливаем начальное значение
суммы s
= 0.

Шаг
3. Задаем номер обрабатываемой строки
i
= 3.

Шаг
4. Организовываем цикл, перебирающий
столбцы матрицы (т.е. индекс j),
начиная с 1-го и кончая 5-м.

Шаг
5. Если a_ij
четно,
тогда присваиваем s
= s
+ a_ij.

Шаг
6. Если цикл по j
не закончился, идем на начало цикла,
т.е. на шаг 4.

Шаг
7. Печатаем s.

Шаг
8. Останов.

3.10 Обработка заданной диагонали матрицы

Пример
12.
Найти сумму четных чисел главной
диагонали матрицы a(5,5).

Порядок
работы

Шаг
1. Вводим матрицу a(5,5).

Шаг
2. Устанавливаем начальное значение
суммы s=0.

Шаг
3. Организовываем цикл, перебирающий
строки матрицы (т.е. индекс i),
начиная с 1-й и кончая 5-й.

Шаг
4. Организовываем цикл, перебирающий
столбцы матрицы (т.е. индекс j),
начиная с 1-го и кончая 5-м.

Шаг
5. Если a_ij
четно
и i
= j,
присваиваем s
= s
+ a_ij.

Шаг
6. Если цикл по j
не закончился, идем на начало цикла ,
т.е. на шаг 4.

Шаг
7. Если цикл по i
не закончился, идем на начало цикла,
т.е. на шаг 3.

Шаг
8. Печатаем s.

Шаг
9. Останов.

3.11 Селективная обработка строки (столбца) матрицы, удовлетворяющей заданному условию

Обработка
строки (столбца) производится после ее
нахождения путем проверки каждой строки
на соответствие заданному условию.

Пример
13.
В матрице a(4,5)
найти количество четных чисел в строке,
у которой второй элемент положительный
(если таких строк несколько, результат
распечатать отдельно для каждой).

Порядок
работы

Шаг
1. Вводим матрицу a(4,5).

Шаг
2. Организовываем цикл, перебирающий
cтроки
матрицы (т.е. индекс i),
начиная с 1-й и кончая 4-й.

Шаг
3. Если a_i₂
> 0,
то идем на шаг 4, иначе берем другую
строку, т.е. идем на шаг 7.

Шаг
4. Устанавливаем начальное значение
количества k=0.

Шаг
5. Организовываем цикл, перебирающий
столбцы матрицы (т.е. индекс j),
начиная с 1-го и кончая 5-м.

Шаг
6. Если a_ij
четно,
тогда присваиваем k
= k
+ 1.

Шаг
7. Если цикл по j
не закончился, идем на начало цикла,
т.е. на шаг 5.

Шаг
8. Печатаем k.

Шаг
9. Если цикл по i
не закончился, идем на начало цикла,
т.е. на шаг 2.

Шаг
10. Останов.

Пример
14.
В матрице a(4,5)
найти количество четных чисел в строке,
у которой сумма элементов положительна
(если таких строк несколько, результат
распечатать отдельно для каждой).

Порядок
работы

Шаг
1. Вводим матрицу a(4,5).

Шаг
2. Организовываем цикл, перебирающий
cтроки
матрицы (т.е. индекс i),
начиная с 1-й и кончая 4-й.

Шаг
3. Устанавливаем начальное значение
суммы s
= 0.

Шаг
4. Организовываем цикл, перебирающий
столбцы матрицы (т.е. индекс j),
начиная с 1-го и кончая 5-м.

Шаг
5. Присваиваем s
= s
+ a_ij.

Шаг
6. Если цикл по j
не закончился, идем на начало цикла,
т.е. на шаг 4.

Шаг
7. Если s
> 0,
то идем на шаг 8, иначе — берем другую
строку, т.е. идем на шаг 13.

Шаг
8. Устанавливаем начальное значение
количества k=0.

Шаг
9. Организовываем цикл, перебирающий
столбцы матрицы (т.е. индекс j),
начиная с 1-го и кончая 5-м.

Шаг
10. Если a_ij
четно,
тогда присваиваем k
= k
+ 1.

Шаг
11. Если цикл по j
не закончился, идем на начало цикла,
т.е. на шаг 9.

Шаг
12. Печатаем k.

Шаг
13. Если цикл по i
не закончился, идем на начало цикла,
т.е. на шаг 2.

Шаг
14. Останов.

Задание
8.
Составить блок-схему для задания,
указанного в таблице 9. Имя и размер
матрицы выбрать самостоятельно.

Таблица
9

Вар.	Условие задачи
1	Найти произведение отрицательных чисел матрицы
2	Найти минимальный по модулю элемент матрицы
3	Найти максимальный четный элемент матрицы
4	Найти минимальный нечетный элемент матрицы
5	Вычислить сумму положительных и сумму отрицательных элементов матрицы
6	Найти среднее арифметическое положительных элементов матрицы
7	Найти среднее геометрическое положительных элементов матрицы
8	Найти количество элементов матрицы, находящихся в интервале (-3,8]
9	Найти среднее арифметическое элементов матрицы, больших 5
10	Найти произведение четных чисел матрицы
11	Найти среднее арифметическое отрицательных элементов матрицы
12	Найти сумму произведений положительных элементов строк матрицы
13	Найти сумму произведений отрицательных элементов столбцов матрицы
14	Найти произведение сумм отрицательных элементов строк матрицы
15	Найти произведение сумм положительных элементов столбцов матрицы
16	Найти сумму произведений элементов строк матрицы
17	Найти сумму нечетных чисел столбцов матрицы
18	Найти произведение нечетных элементов строк матрицы
19	Найти произведение сумм четных элементов столбцов матрицы
20	Найти максимальный отрицательный элемент матрицы
21	Найти минимальный положительный элемент матрицы
22	Определить место минимального четного числа матрицы
23	Найти все отрицательные элементы матрицы
24	Найти все положительные элементы матрицы
25	Найти все отрицательные четные элементы матрицы
26	Определить место максимального положительного элемента матрицы
27	Найти все положительные нечетные элементы матрицы
28	Найти среднее арифметическое четных чисел матрицы
29	Найти среднее геометрическое нечетных чисел матрицы
30	Определить строку, в которой находится минимальный по модулю элемент матрицы

Задание
9.
Составить блок-схему для задания,
указанного в таблице 10. Имя и размер
матрицы выбрать самостоятельно.

Таблица
10

Вар.	Условие задачи
1	Найти сумму четных чисел четвертой строки матрицы
2	Найти сумму нечетных чисел третьего столбца матрицы
3	Вычислить произведение отрицательных чисел второго столбца матрицы
4	Определить количество отрицательных чисел второй строки матрицы
5	Найти произведение нечетных чисел четвертого столбца матрицы
6	Найти произведение положительных чисел второй строки матрицы
7	Найти сумму нечетных чисел пятой строки матрицы
8	Найти сумму положительных четных чисел второго столбца матрицы
9	Найти максимальное отрицательное число третьего столбца матрицы
10	Найти минимальное положительное число четвертой строки матрицы
11	Найти максимальное четное число пятой строки матрицы
12	Найти минимальное нечетное число четвертого столбца матрицы
13	Найти сумму положительных кратных 5 чисел второго столбца матрицы
14	Найти количество отрицательных не кратных 3 чисел пятой строки матрицы
15	Найти количество положительных четных чисел третьей строки матрицы
16	Найти произведение квадратов тех элементов третьего столбца матрицы, модули которых принадлежат интервалу [1,30]
17	Найти среднее арифметическое отрицательных элементов седьмой строки матрицы
18	Найти сумму ненулевых элементов второго столбца матрицы
19	Найти разность сумм отрицательных и положительных элементов второго столбца матрицы
20	Найти среднее геометрическое модулей отрицательных элементов пятого столбца матрицы
21	Найти кратные семи положительные элементы третьей строки матрицы
22	Найти среднее арифметическое положительных элементов второй строки матрицы
23	Найти среднее геометрическое кратных 3 элементов пятой строки матрицы
24	Найти частное от деления количества отрицательных элементов пятой строки матрицы на их сумму
25	Найти произведение ненулевых элементов пятого столбца матрицы
26	Найти среднее арифметическое кратных 5 элементов пятой строки матрицы
27	Найти среднее геометрическое ненулевых элементов пятого столбца матрицы
28	Найти произведение кратных 7 элементов первого столбца матрицы
29	Найти частное от деления суммы отрицательных элементов второй строки матрицы на их произведение
30	Найти квадрат минимального числа третьей строки матрицы

Задание
10.
Составить блок-схему для задания,
указанного в таблице 11. Имя и размер
матрицы выбрать самостоятельно.

Таблица
11

Вар.	Условие задачи
1	Вычислить произведение отрицательных чисел главной диагонали матрицы
2	Найти количество четных чисел побочной диагонали матрицы
3	Определить сумму отрицательных чисел главной диагонали матрицы
4	Найти произведение нечетных чисел побочной диагонали матрицы
5	Найти произведение положительных чисел побочной диагонали матрицы
6	Найти сумму нечетных чисел побочной диагонали матрицы
7	Найти максимальное отрицательное число главной диагонали матрицы
8	Найти сумму положительных нечетных чисел главной диагонали матрицы
9	Найти минимальное положительное число побочной диагонали матрицы
10	Найти сумму нечетных чисел главной диагонали матрицы
11	Найти минимальное четное число главной диагонали матрицы
12	Найти минимальное нечетное число побочной диагонали матрицы
13	Найти сумму положительных кратных 5 чисел побочной диагонали матрицы
14	Найти количество отрицательных не кратных 3 чисел главной диагонали матрицы
15	Найти количество положительных четных чисел главной диагонали матрицы
16	Найти произведение квадратов отрицательных элементов главной диагонали матрицы
17	Найти произведение отрицательных нечетных чисел побочной диагонали матрицы
18	Найти сумму ненулевых элементов главной диагонали матрицы
19	Найти разность сумм отрицательных и положительных элементов главной диагонали матрицы
20	Найти среднее геометрическое модулей отрицательных элементов побочной диагонали матрицы
21	Найти сумму кратных 7 положительных чисел побочной диагонали матрицы
22	Найти среднее арифметическое положительных элементов побочной диагонали матрицы
23	Найти среднее геометрическое кратных 3 элементов главной диагонали матрицы
24	Найти частное от деления количества отрицательных элементов побочной диагонали матрицы на их сумму
25	Найти произведение ненулевых элементов главной диагонали матрицы
26	Найти среднее арифметическое кратных 5 элементов побочной диагонали матрицы
27	Найти среднее геометрическое ненулевых элементов главной диагонали матрицы
28	Найти произведение кратных 7 элементов побочной диагонали матрицы
29	Найти частное от деления суммы отрицательных элементов главной диагонали матрицы на сумму всех элементов побочной диагонали
30	Найти среднее арифметическое отрицательных элементов побочной диагонали матрицы

Задание
11.
Составить блок-схему для задания,
указанного в таблице 12. Имя и размер
матрицы выбрать самостоятельно.

Таблица
12

Вар.	Условие задачи
1	Вычислить произведение отрицательных чисел строки, у которой второй элемент четный
2	Найти сумму нечетных чисел столбца, у которого первый элемент больше второго
3	Определить количество отрицательных чисел столбца, у которого первый элемент меньше последнего
4	Найти сумму положительных кратных 5 чисел столбца, у которого четвертый элемент отрицательный
5	Найти произведение нечетных чисел столбца, у которого первый элемент нуль
6	Найти произведение положительных чисел столбца, последний элемент которого нуль
7	Найти сумму нечетных элементов строки, первый элемент которой кратен 3
8	Найти максимальное отрицательное число строки, у которой второй элемент больше 20
9	Найти сумму положительных четных чисел строки, у которой первый элемент отрицательный
10	Найти минимальное положительное число строки, у которой пятый элемент отрицательный
11	Найти минимальное четное число столбца, у которого первый элемент больше третьего
12	Найти сумму положительных кратных 5 чисел столбца, у которого четвертый элемент отрицательный
13	Найти количество отрицательных не кратных 3 чисел строки, у которой первый элемент нуль
14	Найти количество положительных четных чисел строки, у которой пятый элемент больше 30
15	Найти произведение квадратов положительных четных чисел столбца, у которого второй элемент нуль
16	Найти среднее арифметическое отрицательных элементов строки, у которой четвертый элемент отрицательный
17	Найти разность сумм отрицательных и положительных элементов строки, у которой третий элемент кратен 3
18	Найти среднее геометрическое модулей отрицательных элементов столбца, у которого первый элемент положительный
19	Найти все кратные 7 положительные элементы столбца, у которого третий элемент нечетный
20	Найти среднее арифметическое положительных элементов строки, у которой первый элемент меньше второго
21	Найти среднее геометрическое кратных 3 элементов столбца, у которого шестой элемент не кратен 4
22	Найти частное от деления количества отрицательных элементов столбца, у которого первый элемент нуль, на их сумму
23	Найти все положительные нечетные числа строки, у которой второй элемент не кратен 3
24	Найти количество отрицательных кратных 5 элементов столбца, у которого второй элемент равен третьему
25	Найти номер максимального четного числа строки, у которой первый элемент равен последнему
26	Найти номер минимального нечетного числа строки, у которой первый элемент равен последнему
27	Найти номер максимального четного числа столбца, у которого первый элемент равен последнему
28	Найти номер минимального нечетного числа столбца, у которого первый элемент равен последнему
29	Найти сумму максимального и минимального чисел строки, у которой второй элемент нечетный
30	Найти номер минимального нечетного числа строки, у которой первый элемент четный

Задание
12.
Составить блок-схему для задания,
указанного в таблице 13. Имя и размер
матрицы выбрать самостоятельно.

Таблица
13

Вар.	Условие задачи
1	Вычислить сумму положительных чисел строки, у которой произведение элементов нечетно
2	Найти номер минимального нечетного числа строки, у которой сумма элементов четна
3	Найти сумму максимального и минимального чисел строки, у которой произведение элементов нечетно
4	Найти номер минимального нечетного числа столбца, у которого произведение элементов отрицательно
5	Найти номер максимального четного числа столбца, у которого сумма элементов отрицательна
6	Найти номер минимального нечетного числа строки, у которой количество элементов четно
7	Найти номер максимального четного числа строки, у которой сумма положительных элементов кратна 3
8	Найти количество отрицательных кратных 5 элементов столбца, у которого произведение элементов больше 100
9	Найти все положительные нечетные числа строки, у которой количество отрицательных элементов не кратно 3
10	Найти количество отрицательных элементов столбца, у которого сумма четных элементов не больше 200
11	Найти среднее геометрическое кратных 3 элементов столбца, у которого произведение четных элементов не кратно 4.
12	Найти среднее арифметическое положительных элементов строки, у которой сумма положительных элементов нечетна
13	Найти все кратные 7 положительные элементы столбца, у которого произведение отрицательных элементов четно
14	Найти среднее геометрическое модуля отрицательных элементов столбца, у которого произведение четных элементов положительно
15	Найти разность сумм отрицательных и положительных элементов строки, у которой сумма кратных 5 элементов кратна 3
16	Найти произведение квадратов положительных четных чисел столбца, у которого все элементы четны
17	Найти количество положительных четных чисел строки, у которой все элементы не нули
18	Найти среднее арифметическое отрицательных элементов строки, у которой произведение нечетных чисел отрицательно
19	Найти количество отрицательных не кратных 3 чисел строки, у которой все элементы кратны 3
20	Найти сумму положительных кратных 5 чисел столбца, у которого не менее трех отрицательных элементов
21	Найти минимальное четное число столбца, у которого максимальный элемент четный
22	Найти минимальное положительное число строки, у которой сумма элементов отрицательна
23	Найти сумму положительных четных чисел строки, у которой минимальный элемент отрицательный
24	Найти максимальное отрицательное число строки, у которой произведение элементов больше 200
25	Найти сумму нечетных элементов строки, у которой максимальный элемент кратен 4.
26	Найти произведение положительных чисел столбца, у которого среднее арифметическое четных элементов больше 10
27	Найти произведение нечетных чисел столбца, у которого сумма четных чисел положительна
28	Найти сумму положительных кратных 5 чисел столбца, у которого максимальный четный элемент отрицательный
29	Определить количество отрицательных чисел столбца, у которого все элементы кратны 3
30	Вычислить произведение отрицательных чисел строки, у которой количество нечетных элементов четно

Соседние файлы в папке ИТ11зт

Источник

var

B:array[1..100, 1..100] of real;

i, j, n:integer;

Pr:real;

flag:boolean;

begin

randomize;

write(‘n = ‘);

readln(n);

if n < 2 then

begin

writeln(‘некорректный размер матрицы’);

Exit;

end;

for i := 1 to n do

begin

for j := 1 to n do

begin

B[i, j] := (random(101) — 50) / 10;

write(B[i, j], ‘ ‘);

end;

writeln;

end;

Pr := 1;

flag := false;

for i := 2 to n do

for j := 1 to i — 1 do

if B[i, j] < 0 then

begin

flag := true;

Pr := Pr * B[i, j];

end;

if Flag then

writeln(‘Pr = ‘, Pr)

else

writeln(‘Нет ни одно отрицательного элемента ниже главной диагонали’);

readln;

end.

Источник

Найти произведение отрицательных элементов матрицы

Формулировка задачи:

Код к задаче: «Найти произведение отрицательных элементов каждого столбца матрицы»

Общие указания

1 Вложенные циклы

3.9 Обработка заданной строки (столбца) матрицы

3.10 Обработка заданной диагонали матрицы

3.11 Селективная обработка строки (столбца) матрицы, удовлетворяющей заданному условию

Не пропустите также: