Иллюстрированный самоучитель по Mathematica 5

Дробная часть вещественного числа (функция FractionalPart)

И вот опять появился "лишний" знак. И опять после точки стоит сразу 0. Да не закономерность ли это? Давайте пропустим часть распечатки и поищем еще "лишние" знаки (я выделяю их курсивом, знак после точки – полужирным).

286 0.60726024914127372459
291 0.024914127372458700661
296 0.41273724587006606316
301 0.72458700660631558817
306 0.70066063155881748815
311 0.063155881748815209210
316 0.58817488152092096283
356 0.90360011330530548820
361 0.011330530548820466521
366 0.053054882046652138415
371 0.48820466521384146952
416 0.91953092186117381933
421 0.092186117381932611793
426 0.61173819326117931051

О, действительно, это, должно быть, закономерность. Итак, мы полагаем, что если после точки идет нуль, то вычисляется дополнительная цифра. Ну а если нулей несколько? Может быть, количество ведущих нулей равно количеству "лишних" цифр?

Давайте попробуем подтвердить (или опровергнуть) эту гипотезу.

446 0.18548074462379962750
451 0.074462379962749567352
456 0.23799627495673518858
556 0.70277053921717629318
561 0.053921717629317675234
566 0.17176293176752384675
591 0.76694051320005681271
596 0.051320005681271452636
601 0.00056812714526356082773
606 0.81271452635608277858
741 0.47713099605187072113
746 0.099605187072113500000
751 0.51870721134999999837
776 0.49951059731732816096
781 0.059731732816096318595
786 0.17328160963185950245
851 0.71010003137838752887
856 0.0031378387528865875332
861 0.78387528865875332084
991 0.21642019893809525720
996 0.019893809525720106549
1041 0.82303019520353018530
1046 0.01952035301852968995S
1051 0.035301852968995773623
1111 0.45415069595082953312
1116 0.069595082953311686173
1121 0.50829533116861727856
1166 0.19255060400927701671
1171 0.060400927701671139010
1176 0.092770167113900984882
1181 0.016711390098488240129
1266 0.68471040475346462080
1271 0.040475346462080466843
1276 0.53464620804668425907
1331 0.66024058038150193511
1336 0.058038150193511253382
1386 0.92726042699227967824
1391 0.042699227967823547816
1516 0.75596023648066549912
1521 0.023648066549911988183
1551 0.63698074265425278626
1556 0.074265425278625518184
1601 0.81647060016145249192
1606 0.060016145249192173217
1756 0.67179049460165346680
1761 0.049460165346680498863
1766 0.01653466804988627232S
1831 0.95068006422512520512
1836 0.00642251252051173929S5
1856 0.84896084128488626946
1861 0.084128488626945604242
1896 0.11863067442786220392
1901 0.067442786220391949450
1916 0.94945047123713786961
1921 0.047123713786960956364
1966 0.41389086583264599581
1971 0.08658326459958133904S
2021 0.98352595709825822621
2026 0.59570982582262052249
2031 0.98258226205224894077
Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.