Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.11.2013, 20:10   #1
inflamedparadox
 
Регистрация: 25.11.2013
Сообщений: 5
По умолчанию не понимаю, как составить алгоритм для данной задачи

для действительной матрицы порядка 4x5 найти сумму наибольших значений столбцов
inflamedparadox вне форума Ответить с цитированием
Старый 25.11.2013, 20:21   #2
ViktorR
Старожил
 
Регистрация: 23.10.2010
Сообщений: 2,381
По умолчанию

Создай два вложенных цикла, внешний по столбцам (пусть - i), а внутренний по строкам (пусть - j).
Одна переменная пусть будет суммой указанных элементов (пусть - sum), а вторая - максимальным элементом столбца (пусть - Amax).
(1) Перед внутренним циклом Amax получает значение первого элемента столбца. Во внутреннем цикле (от 2 до <число строк>) просматриваем элементы столбца и сравниваем с Amax. Если элемент больше Amax, то его помещаем в Amax.
После выхода из внутреннего цикла суммируем найденный элемент:
Код:
sum := sum + Amax;
Переходим в начало - (1).
После завершения внешнего цикла - вывод результата.



Как-то так, ...
Как-то так, ...
ViktorR вне форума Ответить с цитированием
Старый 25.11.2013, 21:10   #3
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,874
По умолчанию

Матрицу объявляешь:
Код:
TMatrix = array[1..n,1..m] of Real;
n, m - размерность, константами задай.
TMatrix - твой тип матрицы, создашь переменную A этого типа.
Заполнение матрицы не должно вызывать сложностей, да у тебя и не сказано, как ее заполнять, так что сам сделаешь.
Само решение задачи идет в цикле:
Код:
sum := 0;
for j := 1 to m do begin
  max := A[1,j];
  for i := 2 to n do
    if A[i,j] > max then
      max := A[i,j]
  sum := sum + max;
end;
Ну и выводишь результат.
Arigato на форуме Ответить с цитированием
Старый 25.11.2013, 21:47   #4
inflamedparadox
 
Регистрация: 25.11.2013
Сообщений: 5
По умолчанию

Цитата:
Сообщение от Arigato Посмотреть сообщение
Матрицу объявляешь:
Код:
TMatrix = array[1..n,1..m] of Real;
n, m - размерность, константами задай.
TMatrix - твой тип матрицы, создашь переменную A этого типа.
Заполнение матрицы не должно вызывать сложностей, да у тебя и не сказано, как ее заполнять, так что сам сделаешь.
Само решение задачи идет в цикле:
Код:
sum := 0;
for j := 1 to m do begin
  max := A[1,j];
  for i := 2 to n do
    if A[i,j] > max then
      max := A[i,j]
  sum := sum + max;
end;
Ну и выводишь результат.
а как составить алгоритм в виде блок-схемы?
inflamedparadox вне форума Ответить с цитированием
Старый 25.11.2013, 22:01   #5
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,874
По умолчанию

Взять и нарисовать.
Arigato на форуме Ответить с цитированием
Старый 25.11.2013, 22:15   #6
inflamedparadox
 
Регистрация: 25.11.2013
Сообщений: 5
По умолчанию

Цитата:
Сообщение от Arigato Посмотреть сообщение
Взять и нарисовать.
ха-ха. на самом деле, я не знаю, как это сделать. поможете?
inflamedparadox вне форума Ответить с цитированием
Старый 25.11.2013, 22:18   #7
ZX Spectrum-128
Участник клуба
 
Регистрация: 05.11.2013
Сообщений: 1,601
По умолчанию

Есть такая программа - редактор блок-схем. На входе программа на яп, на выходе блок-схема.
ZX Spectrum-128 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
составить блок-схему и программу для данной задачи xamelione25 Паскаль, Turbo Pascal, PascalABC.NET 0 21.05.2013 22:10
Как написать программу на с+ для решения данной задачи? ming_ruport Общие вопросы C/C++ 1 24.10.2011 16:34
Разработать алгоритм и составить программу для решения задачи. Длину последовательности задать димон4ик_ Помощь студентам 0 18.10.2011 10:55
Разработать алгоритм и составить программу для решения задачи. Длину последовательности задать димон4ик_ Помощь студентам 2 18.10.2011 09:39
Какой самый простой алгоритм можно применить для решение данной задачи? ming_ruport Помощь студентам 3 10.10.2011 15:00