помогите пожалуйста. не могу понять в чём ошибка и как испарвить.

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include "math.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
 TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::cmdCalcClick(TObject *Sender)
//ðàñ÷åò âðåìåíè îñòûâàíèÿ
{
double T0, // íà÷àëüíàÿ òåìïåðàòóðà êîôå
       T1, // äî êàêîé îñòóäèòü
       T2, // òåìïåðàòóðà îêðóæàþùåé ñðåäû.
       d, // òîëùèíà ñòåíîê êðóæêè
       S, // ïëîùàäü ïîâåðõíîñòè êðóæêè
       c, // òåïëîåìêîñòü êîôå
       m, // ìàññà êîôå
       k, // òåïëîïðîâîäíîñòü ìàòåðèàëà èç êîòîðîãî ñäåëàíà êðóæêà
       t, // âðåìÿ îñòûâàíèÿ
       Cp, //ïîëíàÿ òåïëîåìêîñòü âîäû
       K,  //êîýôôèöèåíò òåïëîîòäà÷è êðóæêè
       F; //êîýôôèöèåíò ïðîïîðöèîíàëüíîñòè
int i,n;
double h;
  T0=StrToFloat(Edit1->Text);
  T1=StrToFloat(Edit2->Text);
  T2=StrToFloat(Edit3->Text);
  d=StrToFloat(Edit4->Text);
  S=StrToFloat(Edit5->Text);
  c=StrToFloat(Edit6->Text);
  m=StrToFloat(Edit7->Text);
  k=StrToFloat(Edit8->Text);
  Cp=c*m;
  K=k*S/d;
  F=K/Cp;
  t = 1/F*log((T0 - T2)/(T1 - T2));
  Panel2->Caption="Âðåìÿ îñòûâàíèÿ " + FloatToStrF(t, ffFixed, 15, 1);
  h=1;
  n=int((T0-T1)/h+1);
  Chart1->Series[0]->Clear();
  T1=T0;
  for (i=1;i<=n;i++)
    {
      t = 1/F*log((T0 - T2)/(T1 - T2));
      Chart1->Series[0]->Add(T1,FloatToStrF(t, ffFixed, 15, 1));
      T1=T1-h;
    }
}
//---------------------------------------------------------------------------