0 / 0 / 0
Регистрация: 03.02.2012
Сообщений: 24
1

Найти сумму наименьших значений элементов столбцов двумерного массива A(n,m)

02.03.2012, 17:13. Показов 1655. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Дан двумерный числовой массив A(n,m).Найти сумму наименьших значений элементов его столбцов.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.03.2012, 17:13
Ответы с готовыми решениями:

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

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

Найти сумму наименьших значений столбцов матрицы 5 на 3
Помогите пожалуйста! нужно найти в каждом столбце наименьшее значение, и все их сложить

Найти сумму наименьших значений столбцов матрицы
Здравствуйте. Помогите пожалуйста решить задание "найти сумму наименьших значений столбцов массива"

1
trainspotting
1086 / 486 / 384
Регистрация: 11.11.2010
Сообщений: 773
02.03.2012, 17:21 2
Лучший ответ Сообщение было отмечено Инно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
const 
  nmax=50;
type
  Tmatrix=array[1..nmax,1..nmax] of integer;
var
  a:Tmatrix;
  i,j,imin,m,n,s:integer;
begin
  repeat
    write('Kolichestvo strok v matritse, ne bolee ',nmax,':');
    readln(n);
    write('Kolichestvo stolbtsov v matritse, ne bolee ',nmax,':');
    readln(m);
  until (n in [1..nmax]) and (m in [1..nmax]);
  randomize;
  writeln('Ishodnaya matritsa:');
  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;
  s:=0;
  for j:=1 to m do
    begin
      imin:=1;
      for i:=2 to n do
        if a[i,j]<a[imin,j] then
          imin:=i;
      inc(s,a[imin,j]);
    end;
  writeln('S=',s);
end.
0
02.03.2012, 17:21
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.03.2012, 17:21
Помогаю со студенческими работами здесь

Найти сумму не положительных элементов двумерного массива A [N, M ] c четными номерами столбцов
Как найти в паскале сумму не положительных элементов двумерного массива A c четным номером...

Найти сумму наименьших значений столбцов действительной матрицы
найти сумму наименьших значений столбцов действительной матрицы порядка MxN. очень хорошо было бы с...

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

Найти сумму наименьших элементов столбцов матрицы
Дана вещественная матрица a . Найти сумму наименьших элементов ее столбцов.


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru