Показать сообщение отдельно
  #9  
Старый 07.07.2011, 12:16
Аватар для DrDharm
DrDharm DrDharm вне форума
Прохожий
 
Регистрация: 07.07.2011
Адрес: Cаратов
Сообщения: 7
Версия Delphi: 7
Репутация: 10
По умолчанию

Уважаемый Страдалецъ, я глубоко извиняюсь. Аналогичность,я увидел в названии темы, подумалось что изобилие одноименных(с похожими названиями) тем, скорее приведет к бардаку; сожалею - ошибся, не повториться. Если можно перенести тему, буду только рад.

Спасибо огромное, Developer, в общем цикл в цикле это оно, то что надо было и выводится именно так как и надо; а массивы там, значения плотностей для каждого градуса температуры P1(1...81), P2(1...81) - константы; их бы как то вручную загнать, они впоследствии не меняются, вот рассчет для примера при температуре -40(шаг 1):
d1=0%(в первом шаге внешнего цикла прокручивается от 0 до 100) и 100-d1=100% - соотношение частей в смеси;
плотности этих частей для температуры -40, P1(1)=500 и P2(1)=600 соответственно:

P(суммарная плотность)=100/(d1/P1(1)+(100-d1)/P2(1);
-40 0% P=100/(0/500+(100-0/600);
-40 1% P=100/(1/500+(100-1/600);
...
-40 100% p=100/(100/500+(100-100)/600)

101 цикл для -40, затем 101 цикл(0-100%) для -39, где в рассчете используются вторые значения из массивов P1(2)=517.5 и P2(2)=619.7...вот эти-то значения(сорри, не в курсе допустима-ли индексация имен массивов P1 и P2) и надо как то задать перед вычислением, то есть они у меня есть, их как то ввести надо ) еще раз, дико извиняюсь, я, кроме школьно-програмного бейсика не имел дела с программированием, но проблема рассчета почти 10000 значений стоит очень уж остро )
__________________
BENEFICIUM ACCIPERE LIBERTATEM EST VENDERE
Ответить с цитированием