Умножения и конвертация.

[FaTaL]

Сообщение от Fahman

после запятой вообще не надо считать эту мелочь, как так сделать? чтобы округлялось что-ли.
чтобы как на последней картинке сумма была только 18977

Можно использовать функцию Round, например так:

memo1.Lines.Add(Round(floattostr(h*w*price))+' тг');