少数点以下５０桁を表示 (ID:24324)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 TurboPower SysTools のBCD 型を使えば小数点以下40桁で表現できます。 http://sourceforge.net/project/showfiles.php?group_id=71011 インストール時に StBCD.pas でConst BcdSize = 10;を20 に変更します。 使用例はこんな感じです。 uses StBCD; var i, a, b: TBcd; begin i := ValBcd('67'); a := ValBcd('1'); b := DivBcd(a, i); showMessage(StrBcd(b, 0, 40)); end;