关于浮点数的溢出问题！求救（20分）

Question

Result：single；
for i:=2 to N do
  Result:=Result+ 1/(i*i-1)；
当N很大时如超过10万时，结果是负值，
可能是溢出了，该怎么办？
怎样自定义Result值的小数位数，使其很小时自动截断为0？
谢了！！

Answer 1

用double怎么样？自定义位数好像不行，除非你把整数小数分开自己实现算法。为什么一定要自动呢？完成以后来考虑小数位数不是要简单一些吗

Answer 2

哦，对不起忘了，可以试试Currency，固定保留四位，帮助有详细说明

Answer 3

干脆用Extended算了，她最大了！