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

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

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

Помогите решить программу.

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

Заранее спасибо.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.06.2010, 18:59
Ответы с готовыми решениями:

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

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

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

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

1
11 / 10 / 14
Регистрация: 23.05.2010
Сообщений: 27
11.06.2010, 19:16 2
Лучший ответ Сообщение было отмечено 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
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.06.2010, 19:16

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

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

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

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

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

Для каждой матрицы найти наибольшие элементы каждой строки
Дано матрицы А (5,2) и Y (3,2). Для каждой из них найти самые элементы каждой строки и записать в...

Найти наименьшие элементы в каждой матрице и напечатать их номера
Даны одномерные массивы A, B, C. Записать их в виде матриц AA , BB , CC , найти наименьшие элементы...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.