Цитата:
Сообщение от Ildar-tsr
Загвоздка большая в том, что совсем не понятно что имеется ввиду под фразой:
Что за вычисления с временем по формулам? Часы высчитываешь, минуты или что?
|
Вот что я имею ввиду:
В поле "Коэффцент" вводим число в диапазоне 0,55 - 1,5. В поле "Результат" выводится результат.
Считается это по формуле (2 - tуч / tлуч)*k , где к коэф который мы вводим.
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
t1:=strtofloat (DBEdit2.Text);
t2:=strtofloat(DBEdit3.Text);
k:=strtofloat(Edit1.Text);
s:=(2-t1/t2)*k ;
Edit2.Text:=floattostr (s);
Вся эта "программа" была в экселе и расчет по этой формуле проводиося там же. Вот хочу сделать такое на делфи.