Использование массивов

  • Автор темы westcoastkilla
  • Дата начала
W

westcoastkilla

Гость
#1
Народ помогите задача есть я как бы могу всё сделать сам но уже 3 час ломаю голову где в этой задаче можно что то реализовать с помощью массивов ? Может кто подскажет ?

Определить коэффициент использования производственной мощности кухни по выпуску первых блюд по формуле:

(Bi-ni)*K (Это)
Mi=--------- (Разделить на)
B*Q (Это)
где:
Mi - мощность кухни (количество порций первых блюд);
Bi - продолжительность работы кухни, мин;
ni - организационно-технические простои в смену;
К - емкость котлов;
b - продолжительность одной варки;
Q - емкость одного блюда.
Расчет выполнить для Z кухонь, у которых показатели К, b, Q одинаковые, а показатели Bi, ni - разные.
 
T

Tanya

Гость
#2
Dim i As Integer
Dim Z as Integer
Dim arrB(1 to Z) as Double
Dim arrN(1 to Z) as Double

Dim sumM as Double
Dim B as Double
Dim K as Double
Dim Q as Double

For i=1 To Z
sumM = sumM + arrB(i) - arrN(i)
Next i

sumM = sumM * K / (B * Q)
 
W

westcoastkilla

Гость
#4
Таня у меня к вам огроомная просьба. Выручите пожалуйста я уже 4 день пытаюсь что-то сделать но всё время то ошибки то еще что нить.
Вот тут есть готовый визуальный проект и задание.
http://ifolder.ru/10538976
Можете туда код вставить что куда и всё. Я вас очень прошу :wacko:
Вобщем чтобы считало что нужно.
 
T

Tanya

Гость
#5
Извини, со шрифтами не разбиралась - писала латиницей
в принципе тебе полезно будет причитать и кириллицей переписать ))))

Листбокс, если не нужен - можешь удалиь
Рисунок придется снова загружать )))

Удачи!
 

Вложения

  • 4.1 КБ Просмотры: 10
W

westcoastkilla

Гость
#6
Блин Таня. С меня шампманское и конфеты :)
Немогу поверить в то что такие добрые люди еще остались
Спасибо огромное. Цены вам нет :(
 
T

Tanya

Гость
#7
Совершенно не обратила внимание на тему задания: массивы, правда не знаю по заданию, где их вставить ...
Сделаем глобальные массивы ...
 

Вложения

  • 4.6 КБ Просмотры: 8
04.09.2006
2 566
2
Минск
#8
Тема почищена от флуда...

westcoastkilla, ознакомьтесь на досуге с правилами форума.
Tanya, +1 в репутацию за альтруизм.
Искателям смысла форума просьба в соответствующую ветку.