Там просто проблема с выводом Real=100: нужно предусмотреть, чтобы выводилось в код как 100.0. Также в данном случае не сработал IntDiv=False. Попробую разобраться.