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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 19.07.2016, 17:49   #1
zhemlet
Новичок
Джуниор
 
Регистрация: 19.07.2016
Сообщений: 1
Печаль Составить программу на VBA

для решения задачи по учету движения за отчетный период различных видов средств (i) как внутри отдельных подразделений (j) на предприятии, так и на каждом предприятии (k) производственного объединения по формуле:
Qijk = Sijk + Pijk - Rijk,
где Qijk - остаток i-го вида средств по j-му цеху на k-м предприятии на конец периода; Rijk - расход i-го вида средств по j-му цеху на k-м предприятии за отчетный период; Pijk - приход i-ro вида средств по j-му цеху на k-м предприятии на начало периода; Sijk - остаток i-ro вида средств по j-му цеху на k-м предприятии на начало периода; i - номенклатура средств; j - перечень цехов; k - перечень заводов производственного объединения.
Требуется получить информацию о движении за отчетный период различных видов средств, в целом по каждому цеху на всех предприятиях, по каждому предприятию и по объединению при условии, что в каждом структурном подразделении разное количество видов средств (L), а предприятия в объединении (N) состоят из различного числа цехов (M).
Интервалы изменения переменных i, j, k находятся в пределах:
1 < i < L, 1 < j < M, 1 < k < N.
где
N= 1 : 4;
М = 1 : 5;
L = 1 : 10.
Другие задействованные в задачах переменные меняются в интервале - 100:1000.

Помогите пожалуйста, ничего в этом не понимаю.
zhemlet вне форума Ответить с цитированием
Старый 20.07.2016, 03:22   #2
ura_111
Участник клуба
 
Регистрация: 14.05.2016
Сообщений: 1,793
По умолчанию

Как ты думаешь: "У тебя 1-о объединение (как на картинке) или их много?"

1.jpg

Я сомневаюсь, но мне кажется, что нужно так решать задачу.
Заполняем, СЛУЧАЙНЫМ СПОСОБОМ, массивы 3-х переменных:

S[i][j][k], P[i][j][k], R[i][j][k].

После чего рассчитываем Q[i][j][k]. Когда я говорю "3-х переменных", это значит организуемый 3-ри вложенных в друг друга цикла (по i, по j, по k). Что-то вроде такого



Код:
for 
 for
   for
         S[i][j][k]= случайное число от 100 до 1000
         P[i][j][k]= случайное число от 100 до 1000
         R[i][j][k]= случайное число от 100 до 1000

         Qijk = Sijk + Pijk - Rijk

   next
 next
next


Но, для начала, узнай в интернете о функции генерации случайных чисел в VBA, нужно в пределах от 100 до 1000 (которыми и будем заполнять массивы S, P, R).


Как только массив Q[i][j][k] рассчитан можно делать нужные по заданию выборки.


Прочитав выше изложенное, что ты думаешь?

Последний раз редактировалось ura_111; 20.07.2016 в 03:24.
ura_111 вне форума Ответить с цитированием
Старый 20.07.2016, 09:05   #3
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Цитата:
Сообщение от ura_111 Посмотреть сообщение
Но, для начала, узнай в интернете о функции генерации случайных чисел в VBA, нужно в пределах от 100 до 1000 (которыми и будем заполнять массивы S, P, R).
Код:
Int ((upperbound - lowerbound + 1) * Rnd + lowerbound)
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите составить программу в VBA Excel energy drink Помощь студентам 1 27.05.2015 09:08
Помогите составить программу в vba! Viajeslav Microsoft Office Excel 3 12.05.2015 00:23
составить программу(VBA) Мария7 Помощь студентам 5 07.12.2012 20:44
Составить программу на VBA NitriNKa Помощь студентам 0 07.04.2009 18:54