Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 10.04.2009
Сообщений: 35

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

14.04.2009, 14:02. Показов 1277. Ответов 7
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Составьте программу формирования и вывода на экран одномерного массива, состоящего из максимальных элементов столбцов двумерного массива, заданного с помощью датчика случайных чисел.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
14.04.2009, 14:02
Ответы с готовыми решениями:

Сформировать двумерный массив, состоящий из 4 строк и 4 столбцов по правилу m[ij]=i*j-3 и выведите его на экран. Вычисли
помогите пожалуйста, не могу понять как решить Сформировать двумерный массив, состоящий из 4 строк...

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

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

7
 Аватар для yanyk1n
4342 / 1474 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
14.04.2009, 14:12
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
37
38
39
program sort;
uses crt;
const nn=5;
      mm=5;
var m:array[1..nn,1..mm]of integer;
    k:array[1..mm]of integer;
    i,j,mmm:integer;
 
procedure MaxVSt(k:integer; var max:integer);
var i:integer;
begin
 max:=m[1,k];
 for i:=1 to nn do if m[i,k]>=max then max:=m[i,k];
end;
 
begin
 clrscr;
 randomize;
 for i:=1 to nn do
 for j:=1 to mm do
 begin
 m[i,j]:=random(16);
 end;
 
 writeln('Massiv:');
 for i:=1 to nn do
 begin
  writeln;
  for j:=1 to mm do write(m[i,j]:2,' ');
 end;
 
 for i:=1 to mm do
 begin
  maxvst(i,mmm);
  k[i]:=mmm;
  write(k[i],' ');
 end;
 readln;
end.
1
0 / 0 / 0
Регистрация: 10.04.2009
Сообщений: 35
14.04.2009, 14:25  [ТС]
это на определение минимального значения элементов, а нужно максимальное...
0
 Аватар для yanyk1n
4342 / 1474 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
14.04.2009, 14:32
вообще то тут как раз определяется именно максимум
0
0 / 0 / 0
Регистрация: 10.04.2009
Сообщений: 35
14.04.2009, 14:39  [ТС]
А почему при тестировании в конце выводит:
Min = 0
12 11 14 13 9 ?
0
 Аватар для yanyk1n
4342 / 1474 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
14.04.2009, 14:41
где ты в программе видишь вывод 'min ='... ?
0
0 / 0 / 0
Регистрация: 10.04.2009
Сообщений: 35
14.04.2009, 14:45  [ТС]
в том-то и дело, что не вижу)
а при тестировании пишет
0
 Аватар для yanyk1n
4342 / 1474 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
14.04.2009, 14:50
ничего не знаю, но программа рабочая, ничего лишнего она не выводит. Копируй это в текстовый файл, сохраняй в формате pas и запускай
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
14.04.2009, 14:50
Помогаю со студенческими работами здесь

Сформировать одномерный массив, состоящий из отрицательных элементов матрицы в порядке следования по столбцам
1. Дана вещественная матрицы А размером 6х8. Сформировать одно-мерный массив В, состоящий из...

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

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

Сформировать массив, состоящий из максимальных значений положительных элементов соответствующих строк произвольно заданной матрицы B
Помогите пожалуйста написать программу "Обработка двумерных массивов данных.Матрицы" Задание:...

Даны два одномерных массива целых чисел (массив А, состоящий из n элементов, массив В, состоящий из m элементов),
Даны два одномерных массива целых чисел (массив А, состоящий из n элементов, массив В, состоящий из...


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

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Новые блоги и статьи
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru