作业帮 > 数学 > 作业

求高精度快速大数阶乘算法!1

来源:学生作业帮 编辑:拍题作业网作业帮 分类:数学作业 时间:2024/04/30 17:48:36
求高精度快速大数阶乘算法!1
最好用vb.net,能在一分钟内计算出100000!
For numIndex As Integer = 2 To number
carry = 0
For arrayIndex = 0 To arrayTail
midProduct = product(arrayIndex) * numIndex + carry
carry = midProduct \ DIVISOR
product(arrayIndex) = midProduct - DIVISOR * carry
Next arrayIndex
Do While carry 0
product(arrayIndex) = carry Mod DIVISOR
carry = carry \ DIVISOR
arrayIndex += 1
Loop
arrayTail = arrayIndex - 1
Next numIndex