procedure TForm1.Button1Click(Sender: TObject);
var
vat2 : real;
begin
vat2 := 1.1;
panel1.caption := floattostr(trunc((20000*1375)/vat2));
end;
// 위와같이 하면 24999999 가나옵니다
근데
panel1.caption := floattostr(trunc((20000*1375)/1.1));
게 하면 25000000 이 됩니다
real 타입의 문제인지요
real대신에 extended를 써보세요.