Здравствуйте.
Я столкнулся сегодня с очень удивительной для меня вещью. При сравнении, казалось бы, двух одинаковых чисел я получаю результат что эти числа не равны.
Я что то упустил при изучении Perl? Баг это или фича?
perl --version


Код вызывающий аномалии:


Результат выполнения этого кода:

Подскажите пожалуйста.

Это сообщение отредактировал(а) Pfailed - 19.7.2009, 10:22

ввиду погрешностей в  $i не значение 1, а 1.0000001

нужно округлить.

Спасибо за разъяснение.
Чувствую что, я что-то упустил в этой жизни   Просто не подозревал, что при сложении малых чисел могут образовываться погрешности.
Еще смущает, что print выводит 1 хотя честнее было бы в таком случаи вывести 1.0000001

Вот статья, поможет разъяснить. http://www.delphikingdom.com/asp/viewitem....&mode=print
Если коротко - в двоичной системе в виде конечной дроби можно представить только дроби, знаменатель, разложенный на простые множители, представляет только двойки. А в десятичной если простые множители знаменателя состоят из двоек и пятерок (2*5=10).
Но, к примеру, если в знаменателе есть тройка, получится что-то вроде 0.33333... - бесконечная дробь, с периодом (3). Также в двоичной системе нельзя представить 1/25 конечной дробью. Поскольку числа в памяти хранятся в двоичной системе, конечной дроби, часть числа и теряется.

Это сообщение отредактировал(а) Logo - 19.7.2009, 11:20

Math::BigFloat



Это сообщение отредактировал(а) DaemonSuw - 19.7.2009, 20:35