python计算圆周率100万位要多久_Super Pi-计算10000位圆周率需要多少时间？

今天谈到CPU的计算功率，想到网上流传的Super Pi这个圆周率计算器。

两个Text，一个Timer，一个Command，就可完成Super Pi的工作~

Option Explicit

'作者：邵帅

'文件：工程1.vbp

'完成时间：2015年04月03日

'版本号：v1.0

Sub getpi(Optional ByVal nums As Long = 10000)

nums = nums \ 5

Dim max As Long, laptime As Single, result() As String

Dim i, j As Long, d As Long, t, g, r, k As Long, f()

laptime = Timer

max = 10 * nums

ReDim f(1 To max)

ReDim result(nums)

result(0) = vbCrLf

For i = 1 To max

DoEvents

f(i) = 30000

For j = max To 1 Step -10

t = 0

DoEvents

For i = j To 1 Step -1

DoEvents

If j = max Then

t = t + f(i) * 1000000

Else

t = t + f(i) * 100000

End If

r = 8 * i * (2 * i + 1)

f(i) = t - Int(t / r) * r

d = 2 * i - 1

t = Int(t / r) * d * d

k = k + 1

result(k) = Format(Int(g + t / 100000) Mod 100000, "00000")

If k Mod 20 = 0 Then result(k) = result(k) & vbCrLf

If k Mod 200 = 0 Then result(k) = result(k) & "---[" & k * 5 & "]---" & vbCrLf

g = t Mod 100000

Text1.Text = "3." & Join(result, " ")

Open "C:\1.txt" For Output As #1

Print #1, Text1.Text

Close #1

Timer1.Enabled = False

End Sub

Private Sub Command1_Click()

Timer1.Enabled = True

getpi Text2.Text

MsgBox "计算完成，共用时" + s1.Caption + "秒。" & vbCrLf & "计算结果将在C:\1.txt下显示。"

End Sub

Private Sub Timer1_Timer()

s1.Caption = s1.Caption + 1

End Sub

@ Mayuko

python计算圆周率100万位要多久_Super Pi-计算10000位圆周率需要多少时间？相关推荐

Python:通过执行100万次打印来比较C和python的性能，以及用C和python结合来解决性能问题的方法 .
Python:通过执行100万次打印来比较C和python的性能,以及用C和python结合来解决性能问题的方法 . 参考文章: (1)Python:通过执行100万次打印来比较C和python的性能 ...
python计算圆周率100万位要多久_python圆周率计算小程序（非常慢）
源码: 1 from math import fabs #导入数学模块 2 3 from time import perf_counter #导入时间模块 4 5 from numba import ...
Python获取拥有100万+关注的CSDN公众数据，发现最关心的竟不是技术，而是…
从工业时代进入到信息服务时代,互联网行业逐渐兴起,传统行业逐渐没落.现如今,很多人混迹于互联网+的时代,人人都要学习编程已经逐渐被重视起来. 作为一个入行五年的老鸟,回首看看这五年的经历,恍若隔世. ...
圆周率 π 小数点第 100 万亿数字是多少？Google 用 Debian 服务器给出了答案
整理 | 苏宓出品 | CSDN(ID:CSDNnews) π=3.1415926...... 想必学生时代,当提及背诵圆周率 π 小数点后面的个数时,很多人的胜负欲在悄然之间被激起,"只 ...
JAVA计算斐波那契第100万项的最快算法排名汇总
最近在知乎上看到一个有趣的算法题:斐波那契数列的第一百万项怎么用 C++ 求? 看了几个大神的解答后,注意到很少有用JAVA代码去解决这个问题的,可能一方面java对这种超大数高精度的运算本身就不是特 ...
2020黑客报告：7位道德黑客赏金收入超100万
什么是黑客?用<黑客与画家>的作者 Paul Graham 的话说--和画家一样,黑客只是怀有一门特殊手艺.有创造天赋的普通人. 在大众眼里,"黑客"(hacker)就 ...
年薪100万都是什么样人才啊？
想找一份年薪100万以上的职业吗?答案当然是肯定的.可是,在网络烧钱热已经过去的现在,还有哪些行业肯出如此高的薪水请一位中国本土的雇员呢? 一.奢侈品销售总监不要以为高薪的职位都是给外国人准备的,其 ...
计算pi小数点后10000位
博客已搬家到 https://www.wanglp.site) 数据结构课上,老师让我们计算一下pi的10000位,复习一下面向对象. **First Try:**定义一个高精度类hp(high pr ...
用Java计算圆周率的十亿位_新世界纪录：谷歌将圆周率计算到 31 万亿位
为了挑战更精确的圆周率,谷歌工程师 Emma Iwao 在25台谷歌云的虚拟机上,执行专为圆周率设计的算法,计算出31万亿数字的圆周率. 3.1415926,相信不少人都背诵过这串数字,并将它代入算式 ...

python计算圆周率100万位要多久_Super Pi-计算10000位圆周率需要多少时间？

python计算圆周率100万位要多久_Super Pi-计算10000位圆周率需要多少时间？相关推荐

最新文章

热门文章