问题描述: 用vb求pi/4 = 1-1/3+1/5-1/7+...公式求pi的近似值,直到最后一项绝对值小于10-6为止 1个回答 分类:数学 2014-12-08 问题解答: 我来补答 Private Sub Command1_Click()a = 1Don = n + 1m = 2 * n - 1s = s + a * 1 / ma = -aLoop Until Abs(1 / m) < 10 ^ -6pi = 4 * sPrint "pi=" & piEnd Su 展开全文阅读