[SpectraL]

да, я в курсе что вещественные числа проблемно хранить в памяти сегодняшних компьютеров и операции осуществляются с неверным результатом...
Как я понимаю в Delphi отсутствует функция округления до необходимой цифры дробной части числа?