小说网 找小说 无限小说 烟雨红尘 幻想小说 酷文学 深夜书屋

2006年6月7日

VB计算圆周率(二)

摘要: '采用普遍的傅立叶级数展开方法pi = 3 + (1 * 1) / (2 * 3 * 4) * [ 3 + (3*3)/(4*5*4) *[ 3 + (5*5)/(6*7*4) * [ 3 + (7*7)/(8*9*4) * [ ... ] ] ] ] '输入:需计算的圆周率位数,理论精度约5万位... 阅读全文

posted @ 2006-06-07 09:15 王峰炬 阅读(777) 评论(0) 推荐(0) 编辑

递归方法巧解不定方程(二)

摘要: 笔者在2004年曾写过一篇 递归方法巧解不定方程 。昨天在一位网友的启发下,对代码进行了重写,使其能够设置每个变量的取值范围。代码如下 Private Sub Command1_Click()Dim min(1 To 5) As Integer, max(1 To 5) As Integer, R... 阅读全文

posted @ 2006-06-07 09:05 王峰炬 阅读(205) 评论(0) 推荐(0) 编辑

导航