Показать сообщение отдельно
  #5  
Старый 20.12.2009, 23:30
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание

Ссори я поторопился - математическая часть - точнее формула которую ты придумала не точная

Измени в исходнике
x:=a*b*c*3600;
на
x:=a*b*c; //не зачем умножать на 3600. 3600 это час...

а в коде мы берем мошность которое предмет использует в час умножаем его на часы которое оно работает - потом полученный результат так же умножаем на дни получаем сколько оно употребляет энергию...при этом ответ получаем в Ватт-ах а НЕ В КИЛОВАТТ-ах....чтоб получит ответ в киловаттах раздели ответ на 1000

x:=(a*b*c)/1000; //теперь ответ в киловаттах

Второя формула вообще я ша вот смотрю не могу ничего понять....тебе же сперва надо узнать сколько стоит 1кВт электричества...чтоб потом сделать вычисление....так что вторую часть придеться тебе доделать....так как я незнаю сколько у тебя стоит электричество....

а так приблизительно могу сказать что формула не годиться -
вышеуказанной формуле мы нашли например сколько электричество жрет Холодильник.....
берем ответ
узнаем сколько стоит 1кВт электричества - умножаем его на ответ от холодильника - получаем сколько за один холодильник мы платим....а далее...уже все ясно....

правильная формула
y:=x*(сюда пишем цену за кВт);

Удачи!!!
Ответить с цитированием