各位大神帮帮忙呀，调试结果出错,该怎么解决

各位大神帮帮忙呀，调试结果出错
为什么下面一段程序，运行时结果不是1就是0呢？求大家帮帮忙呀
float app,acp,apc,acc,cpp,ccp,cpc,ccc;
float upp,ucp,upc,ucc,uin,npp,ncp,npc,ncc,nf;
float fpp,fcp,fpc,fcc;
AnsiString tmp;
float T;
if(Trim(temedi->Text)=="")
{
MessageBoxEx(Handle,"请输入温度","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
temedi->Text="";
temedi->SetFocus();
return; }
if(Trim(uppedi->Text)=="")
{
MessageBoxEx(Handle,"请输入低周疲劳应变范围","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
uppedi->Text="";
uppedi->SetFocus();
return; }
if(Trim(ucpedi->Text)=="")
{
MessageBoxEx(Handle,"请输入拉伸蠕变应变范围","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
ucpedi->Text="";
ucpedi->SetFocus();
return; }
if(Trim(upcedi->Text)=="")
{
MessageBoxEx(Handle,"请输入压缩蠕变应变范围","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
upcedi->Text="";
upcedi->SetFocus();
return; }
if(Trim(uccedi->Text)=="")
{
MessageBoxEx(Handle,"请输入拉压蠕变应变范围","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
uccedi->Text="";
uccedi->SetFocus();
return; }
try
{
StrToFloat(Trim(temedi->Text));
}
catch(...)
{MessageBoxEx(Handle,"温度不是有效数字","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
temedi->SetFocus();
return;}
try
{StrToFloat(Trim(uppedi->Text));
}
 catch(...)
{MessageBoxEx(Handle,"低周疲劳应变范围不是有效数字","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
uppedi->SetFocus();
return;}
try
{StrToFloat(Trim(ucpedi->Text));
}
 catch(...)
{MessageBoxEx(Handle,"拉伸蠕变应变范围不是有效数字","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
ucpedi->SetFocus();
return;}
try
{StrToFloat(Trim(upcedi->Text));
}
 catch(...)
{MessageBoxEx(Handle,"压缩蠕变应变范围不是有效数字","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
upcedi->SetFocus();
return;}
try
{StrToFloat(Trim(uccedi->Text));
}
 catch(...)
{MessageBoxEx(Handle,"拉压蠕变应变范围不是有效数字","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
uccedi->SetFocus();
return;
}
upp= StrToFloat(Trim(uppedi->Text));
ucp= StrToFloat(Trim(ucpedi->Text));
upc= StrToFloat(Trim(upcedi->Text));
ucc= StrToFloat(Trim(uccedi->Text));
uin=upp+ucp+upc+ucc;
T=StrToFloat(Trim(temedi->Text));
if(T<0)
{MessageBoxEx(Handle,"温度不能为负值","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
temedi->SetFocus();
return;}
if(upp<0)
{MessageBoxEx(Handle,"低周疲劳应变范围不是为负值","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
uppedi->SetFocus();
return;}
if(ucp<0)
{MessageBoxEx(Handle,"拉伸蠕变应变范围不是为负值","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
ucpedi->SetFocus();
return;}
if(upc<0)
{MessageBoxEx(Handle,"压缩蠕变应变范围不是为负值","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
upcedi->SetFocus();
return;}
if(ucc<0)
{MessageBoxEx(Handle,"拉压蠕变应变范围不是为负值","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
uccedi->SetFocus();
return;}if((upp=0&&ucp=0&&upc=0&&ucc=0)
{MessageBoxEx(Handle,"应变范围不能都为零","信息",
MB_OK|MB_ICONINFORMATION,LANG_CHINESE);
uppedi->SetFocus();
return;}
T=273.15+T;
if(ComBox->ItemIndex==0)
{app=2418.87378-4.32836*T+0.00194*T*T;
cpp=-49.86213-0.08866*T-3.9846E-5*T*T;
acp=-44.50029+0.08171*T-3.71107E-5*T*T;
ccp=7.30179-0.01504*T+7.322E-6*T*T;