Здравствуйте, Аноним, Вы писали:

А>Здравствуйте, Danchik, Вы писали:

D>>Как вариант лечения округлите, например, до двух знаков после запятой:
D>>

D>>a := Round (18400 * Cnt * 100) div 100
D>>

Можно попробовать через задницу:

a:=Trunc(StrToFloat(FloatToStr(18400 * Cnt)));

А> Ok, а есть вариант заставить работать первый вариант
А>

А>a:=Trunc(133584);
А>

А>_НЕ_ правильно? Как в случае с глюком. Не спрашивайте почему, объяснять долго..