Показать сообщение отдельно
  #15  
Старый 08.06.2011, 01:37
Аватар для AND_REY
AND_REY AND_REY вне форума
Активный
 
Регистрация: 31.03.2009
Адрес: Украина, г.Днепропетровск
Сообщения: 324
Версия Delphi: Delphi7
Репутация: 3877
По умолчанию

Не сходится потому что формулы разные.
я считал по этой:
log(p):= -A/T + B + C*log10(T) + Power(10,(-3*D*T));
а в программе по этой
P:= Power(10, (-A/T + B + C*ln(T)/ln(10) + 0.001*D*T))*133.322;
Метод работает, а вот что я считаю я не представляю.
Поменял формулы вроде чтото похоже
exe.rar
__________________
If end Then begin;
Ответить с цитированием