Как округлить число до 2-го знака после запятой?

← →
greg333 (2006-04-13 14:42) [0]

← →
EvS © (2006-04-13 14:47) [1]

RoundTo

← →
Anatoly Podgoretsky © (2006-04-13 14:51) [2]

Если числа с плавающей запятой, то сложная задача, большинство из них не округляются, просто невозможно представить.

← →
sicilla © (2006-04-13 20:50) [3]

Пишешь функцию
function TForm1.sts(sing: single; dig: byte): string; begin str(sing:dig:dig,result); end;
Ее вызов: label72.Caption := sts(cur/1024,2);
здесь 2 - разрядность после запятой.

x:=round(x*100)/100;

Как округлить число до 2-го знака после запятой? Найти похожие ветки