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

Определить наименьшие элементы каждой строки матрицы и найти их сумму

11.06.2010, 18:59. Показов 1265. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите решить программу.

В квадратной матрице А[5][5] определить наименьшие элементы каждого рядка и найти их суму.

Заранее спасибо.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
11.06.2010, 18:59
Ответы с готовыми решениями:

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

Найти наименьшие элементы каждой строки квадратной матрицы и поместить их на главную диагональ
где ошибка ? нужно найти малейшие элементы каждой строки квадратной матрицы и поместить их на главную диагональ а диагональные элементы...

Найти наименьшие, отрицательные, элементы каждой строки матрицы EW{m, m} находящиеся над главной диагональю и переписать их в одномерный массив W.
Мальчики помогите бедной девушке надо решить на завтро 2 задачи ,я уже пол дня мучаюсь .... 1)Найти наименьшие, отрицательные,...

1
11 / 10 / 14
Регистрация: 23.05.2010
Сообщений: 27
11.06.2010, 19:16
Лучший ответ Сообщение было отмечено DanielDefo как решение

Решение

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
Uses
   crt;
Type
   TMas= array [1..5,1..5] of integer;
Var
   A : TMas;
   i , j : byte;
   min, sum : integer;
begin
clrscr;
{Ввод масива рандомно}
Randomize;
For i:=1 to 5 do
   begin
      For j:=1 to 5 do
         begin
             A[i,j]:= random(10)-5;
             write(A[i,j] : 5 );
         end;
       writeln;
    end;
{Минимальные элементы в каждой строке + их сумма}
writeln;
sum:=0;
For i:=1 to 5 do
   begin
      min:=A[i,1];
      For j:=1 to 5 do
          begin
              if A[i,j]< min then
                 min := A[i,j];
              sum:=sum+min;
         end;
       writeln('Минимальный элемент в ',i,'-ой строке равен ', min:5);
    end; 
writeln('Сумма минимальных элементов каждой строки равна ', sum: 5);
readln;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
11.06.2010, 19:16
Помогаю со студенческими работами здесь

Наименьшие отрицательные элементы каждой строки матрицы
Помогите пожалуйста с этим заданием,честно говоря я не знаю как его сделать.Оно у меня последнее осталось. Переписать наименьшие...

Определить сумму всех элементов матрицы и разделить элементы каждой строки на первый элемент строки
Добрый вечер, решите пожалуйста. Определить и напечатать сумму всех элементов матрицы. Разделить элементы каждой строки заданной матрицы...

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

Найти в строках матрицы правые наименьшие элементы, определить их месnоположение, найти среднее арифметическое
Дана матрица n*m, состоящая из натуральных чисел. Найти в строках самые правые наименьшие элементы и определить их местоположение....

Вывести наименьшие элементы каждой строки и их индексы
Не могу понять задачу,а именно как найти второй наименьший элемент и как вывести их одновременно. Буду сильно благодарен Добавлено...


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

Или воспользуйтесь поиском по форуму:
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, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++
8Observer8 24.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru