float与 integer类型怎么进行比较

[tigsin]

var
A,B,C,D,E : real;
begin
if A+B+C+D+E <> 1 then ？？？？？？？？？
begin
Showmessage('error');
exit ;
end;
end;

如果相加怎么与1 比较呢

[sy_315]

把int也弄成float型的就可以比较了

[ekin]

把int也弄成float型的就可以比较了

[lxpbuaa]

你那个写法就可以了。

—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————

[FrameSniper]

if Trunc(A+B+C+D+E)=1 and Round(A+B+C+D+E)=0 then ....