Округление вещественного до целого

[tyomitch]

Код: Выделить всё

Int(x + 0.5)

[tyomitch]

Наткнулся на такую фичу:

Когда дробная часть равна точно 0,5, функции CInt и CLng всегда округляют число до ближайшего четного числа. Например, 0,5 округляется до 0, а 1,5 — до 2. Функции CInt и CLng отличаются от функций Fix и Int, которые отбрасывают, а не округляют дробную часть числа. Кроме того, функции Fix и Int всегда возвращают значение того типа, который имеет передаваемый аргумент.

Не нужно никакой дополнительной проверки.

[tyomitch]

Да при чём здесь CInt?

Код: Выделить всё

Int(x + 0.5)

[NicSoft]

Format(2.5,0)

[Sebas]

Код: Выделить всё

        MsgBox(Math.Round(0.2, MidpointRounding.AwayFromZero).ToString & vbCrLf & _
            Math.Round(0.5, MidpointRounding.AwayFromZero).ToString & vbCrLf & _
            Math.Round(0.8, MidpointRounding.AwayFromZero).ToString)


[Nord777]

Если я не ошибаюсь, то по моему Microsoft рекомендует в таких случаях использовать тип Decimal вместо Single и Double. Что то там с точностью вычислений связано...

[GSerg]

Roman Koff
Матчасть. Для изучения.