LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
 Forums Обновлено :: 06 февраля 2005
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Ряды...
 Тема: Ряды
 
 15.06.2007 21:02:54
Alex5
14 сообщения


Тема: Ряды
Есть проблема. Допустим есть min - 10 и max - 18 Нужно подобрать ряд целых чисел от min до max, сумма которого будет стремиться к задаваемому значению (например 257). Такой расчет, например, очень был бы полезен для анализа количества бригад с переменной численностью для выполнения производственного задания и для многого другого.
Буду рад чьей-нибудь гениальной идее. Нужно что-нибудь простое, без громоздких вычислений.


P.S. Проблемы с базой данных
Автор: ALEX от 19.08.2002 13:29:24 Источник ...
 15.06.2007 21:02:54
All
4316 сообщения
1-ый


RE: Ряды
Можно использовать случайные числа. Примерный код дан ниже.
Public Static Function a()
Dim MySum, Upperbound As Long, Lowerbound As Long
Dim i As Integer
Randomize ' Инициализация
Upperbound = 18
Lowerbound = 10

For i = 0 To Int(257/Lowerbound)
MySum = MySum + Int((Upperbound - Lowerbound + 1) * Rnd + Lowerbound)
'If MySum ...
Next
End Function



P.S. Проблемы с базой данных
Автор: Виктор Конюков от 0:00:00 Источник ...
 Страница 1 из 1
СледующийПредыдущийНет оценки
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Ряды...
ПоискПоиск  Список форумовСписок форумов  
right
Начало | Forums
Copyright 2002-2016 Leadersoft.ru   ::  Leadersoft  ::  Соглашение о безопасности  ::  Условия использования
Не забудьте сохранить ссылку на страницу с кодом для дальнейшего анализа
Сайт разработан на базе технологий ASP.NET, DotNetnuke