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

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

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 11.11.2009, 20:49   #1
Alexey0506
 
Регистрация: 06.11.2009
Сообщений: 4
По умолчанию Транспортная задача методои потенциалов

Помогите пожалуйста.
При решении транспортной задачи методом потенциалов, после нахождения этих самых потенциалов осуществляется сдвиг по циклу.
Программа перебирает и находит такой X, у которого U+V>C
После этого нужно осуществлять сдвиг по циклу. Загвоздка в том, как остановиться на этом X и искать элементы i строке и j столбцу, не исследуя дальше матрицу.

Заранее Спасибо!
Alexey0506 вне форума Ответить с цитированием
Старый 11.11.2009, 21:07   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,858
По умолчанию

Можно узнать, причём тут Microsoft Office Excel?

Где ваш код? Думаете, здесь одни телепаты?
EducatedFool вне форума Ответить с цитированием
Старый 11.11.2009, 21:18   #3
Alexey0506
 
Регистрация: 06.11.2009
Сообщений: 4
По умолчанию

просто напишите как после нахождения элемента в массиве методом перебора:
For i = 1 to m
For j = 1 to n
....
Next j
Next i

узнать какая у него была строка и столбец
Alexey0506 вне форума Ответить с цитированием
Старый 11.11.2009, 21:33   #4
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,858
По умолчанию

Код:
Sub test()
    m = 10: n = 10
    For i = 1 To m
        For j = 1 To n
            If УсловиеВыполнено Then GoTo 1
        Next j
    Next i
1:     MsgBox "Условие было выполнено при i=" & i & " и j=" & j
End Sub
EducatedFool вне форума Ответить с цитированием
Старый 11.11.2009, 21:40   #5
Alexey0506
 
Регистрация: 06.11.2009
Сообщений: 4
По умолчанию

Спасибо большое, то что нужно
Alexey0506 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Транспортная задача Roger Wilco Помощь студентам 2 07.05.2009 16:32
транспортная задача. метод потенциалов 4eKucT Помощь студентам 5 01.06.2007 16:30