С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.76/34: Рейтинг темы: голосов - 34, средняя оценка - 4.76
1 / 1 / 0
Регистрация: 25.09.2016
Сообщений: 160

Сформировать массив, состоящий из максимальных значений положительных элементов строк матрицы

06.10.2016, 00:26. Показов 6664. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Задание. Сформировать одномерный массив,состоящий из максимальных значений положительных элементов соответствующих строк произвольно заданной матрицы B и составить блок-схему.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
06.10.2016, 00:26
Ответы с готовыми решениями:

Сформировать массив из максимальных значений положительных элементов соответствующих строк матрицы
Вариант 3. Сформировать одномерный массив, состоящий из максимальных значений положительных элементов соответствующих строк произвольно...

Сформировать одномерный массив, состоящий из максимальных элементов четных столбцов матрицы
Дана целочисленная матрица 10x12. Найти сумму элементов в заштрихованной области. Сформировать одномерный массив, состоящий из максимальных...

Сформировать одномерный массив, состоящий из положительных элементов матрицы
сформировать одномерный массив, состоящий из положительных элементов, располагающихся на главной диагонали матрицы X n,m.

1
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,168
06.10.2016, 07:50
Лучший ответ Сообщение было отмечено furymaxim как решение

Решение

Pascal
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
36
const nmax=15;
var b:array[1..nmax,1..nmax] of integer;
    a:array[1..nmax] of integer;
    m,n,i,j:byte;
    mx:integer;
begin
randomize;
repeat
write('Количество строк до ',nmax,' m=');
readln(m);
until m in [1..nmax];
repeat
write('Количество столбцов до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Матрица В');
for i:=1 to m do
 begin
  for j:=1 to n do
   begin
    b[i,j]:=-50+random(101);
    write(b[i,j]:4);
   end;
  writeln;
 end;
for i:=1 to m do
 begin
  mx:=0;//если в строке не будет положительных, запишем 0
  for j:=1 to n do
  if b[i,j]>mx then mx:=b[i,j];
  a[i]:=mx;
 end;
writeln('Массив А');
for i:=1 to m do
write(a[i]:4);
end.
Миниатюры
Сформировать массив, состоящий из максимальных значений положительных элементов строк матрицы  
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
06.10.2016, 07:50
Помогаю со студенческими работами здесь

Сформировать массив из максимальных элементов строк матрицы
Составте программу формирования и вывода на экран одномерного массива, состоящего из максимальных элементов строк двумерного массива....

Сформировать массив А1 из максимальных элементов строк матрицы А
12. Даны два массива: А3х3 и В3. Сформировать массив А1 из максимальных элементов строк матрицы А. Осуществить поэлементное умножение...

Сформировать массив, состоящий из количества положительных элементов в столбцах матрицы
Задать значение вещественным элементам матриц A и Q размерностью 3 на 5 и сформировать массивы B и R, состоящие из количества положительных...

Сформировать одномерный массив из максимальных элементов строк матрицы
Дана прямоугольная матрица A (N, M) (N M, M 15). Найти максимальный элемент в каждой строке. Сформировать массив B из найденных...

Сформировать одномерный массив, состоящий из положительных произведений ненулевых элементов матрицы
Добрый день. Нужно было написать код к заданию со следующими условиями: "Сформировать одномерный массив, состоящий из положительных...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Первый деплой
lagorue 16.01.2026
Не спеша развернул своё 1ое приложение в kubernetes. А дальше мне интересно создать 1фронтэнд приложения и 2 бэкэнд приложения развернуть 2 деплоя в кубере получится 2 сервиса и что-бы они. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит токи на L и напряжения на C в установ. режимах до и. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Изучаю kubernetes
lagorue 13.01.2026
А пригодятся-ли мне знания kubernetes в России?
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru