Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/4: Рейтинг темы: голосов - 4, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 14.01.2013
Сообщений: 17
1

Вычислить сумму наибольших элементов матрицы. Вывести на экран исходную матрицу в общепринятом виде и результат работы.

14.01.2013, 13:42. Просмотров 840. Ответов 4
Метки нет (Все метки)

Дана целочисленная матрица A(N,M), где N=5 M=5. Вычислить сумму наибольших элементов матрицы. Вывести на экран исходную матрицу в общепринятом виде и результат работы. Необходимо применить не менее 2 подпрограмм. Заранее спасибо.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.01.2013, 13:42
Ответы с готовыми решениями:

В заданной матрице F записать на место отрицательных элементов нули. Исходную и полученную матрицы вывести в общепринятом виде
В заданной матрице F записать на место отрицательных элементов нули. Исходную и полученную матрицы...

Восстановить исходную матрицу и напечатать ее в общепринятом виде
Квадратная матрица, симметричная относительно главной диагонали, задана верхним треугольником в...

Найти сумму элементов матрицы [A], размером N x M, находящихся над главной диагональю. Вывести на печать исходную матрицу и сумму.
Найти сумму элементов матрицы , размером N x M, находящихся над главной диагональю. Вывести на...

Найти сумму элементов матрицы [A], размером N x M, находящихся над обратной диагональю. Вывести на печать исходную матрицу и сумму.
Найти сумму элементов матрицы , размером N x M, находящихся над обратной диагональю. Вывести на...

4
Модератор
62484 / 46680 / 32174
Регистрация: 18.05.2008
Сообщений: 112,936
14.01.2013, 14:02 2
Цитата Сообщение от Randombird Посмотреть сообщение
Вычислить сумму наибольших элементов матрицы
Здесь ничего не пропущено?
Может наибольших элементов строк(или столбцов) матрицы
0
0 / 0 / 0
Регистрация: 14.01.2013
Сообщений: 17
14.01.2013, 14:04  [ТС] 3
Точно. Элементов столбцов.
0
Модератор
62484 / 46680 / 32174
Регистрация: 18.05.2008
Сообщений: 112,936
14.01.2013, 14:20 4
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
40
uses crt;
const n=5;
      m=5;
type mtr=array[1..n,1..m] of integer;
procedure matrix(var a:mtr);
var i,j:integer;
begin
writeln('Исходная матрица:');
for i:=1 to n do
 begin
  for j:=1 to m do
   begin
    a[i,j]:=random(50);
    write(a[i,j]:4)
   end;
  writeln
 end;
writeln
end;
function summa(a:mtr):integer;
var i,j,mx,s:integer;
begin
s:=0;
for j:=1 to m do
 begin
  mx:=a[1,j];
  for i:=2 to n do
  if a[i,j]>mx then mx:=a[i,j];
  s:=s+mx
 end;
summa:=s
end;
var a:mtr;
begin
clrscr;
randomize;
matrix(a);
write('Сумма наибольших элементов столбцов=',summa(a));
readln
end.
1
0 / 0 / 0
Регистрация: 14.01.2013
Сообщений: 17
14.01.2013, 16:35  [ТС] 5
Благодарю!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
14.01.2013, 16:35

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

Вывести матрицу на экран и найти сумму наибольших значений элементов её строк
Уважаемые форумчане, помогите пожалуйста с решением задачи.%-) Дана действительная матрица размера...

Найти сумму элементов строк матрицы [A], размером NxM. Вывести на печать исходную матрицу и сумму строк.
Найти сумму элементов строк матрицы , размером NxM. Вывести на печать исходную матрицу и сумму...

Представить матрицу в виде списка, найти результат: сумму всех элементов матрицы
Заданная матрица чисел размером N * N.Нужно подать матрицу в виде списка. Выведите результат...

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


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

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

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