计算π的近似值的一个公式是π/4=1-1/3+1/5_1/7+…+(-1)n-11/(2n-1)。某人编写下面的程序用此公式计算并输出π的近似值：Private Sub Command1_Click()PI=1Sign=113=20000For k=3 To nsign=-signPI=PI+sign／kNext kPrint PI*4End sub运行后发现结果为3．22751，显然，程序需要修改。下面修改方案中正确的是A．把For k=3To n改为For k=1 To nB．把U=20000改为n=

题目

计算π的近似值的一个公式是π/4=1-1/3+1/5_1/7+…+(-1)n-11/(2n-1)。某人编写下面的程序用此公式计算并输出π的近似值：

Private Sub Command1_Click()

PI=1

Sign=1

13=20000

For k=3 To n

sign=-sign

PI=PI+sign／k

Next k

Print PI*4

End sub

运行后发现结果为3．22751，显然，程序需要修改。下面修改方案中正确的是

A．把For k=3To n改为For k=1 To n

B．把U=20000改为n=20000000

C．把For k：3 To n改为For k=3 To n Step 2

D．把PI=1改为PI=0

相似考题

1.计算的近似值的一个公式是π／4=1-(1／3)+(1／5)-(1／7)+…+(-1)n-1(1／2n -1)。 某人编写下面的程序用此公式计算并输出的近似值： Private Sub Cornmand1 Click（ ） P1=1 Sign=1 n=20000 For k=3 To r Sign=-Sign PI=PI+SiRn／k Next k Print PI*4 End Sub 运行后发现结果勾3．22751，显然，程序需要修改。下面修改方案中正确的是（ ）。A.把For k=3 To n改为For k=1 To nB.把n=20000改为n=20000000C.把For k=3 To n改为For k=3 To n Step 2D.把PI=1改为P1=0

2.补充程序Ccon012.C,该程序中用公式计算圆周率的近似值。

3.下列给定程序中，函数fun()的功能是：用下面的公式求π的近似值，直到最后一项的绝对值小于指定的数(参数num)为止。π/4≈1-1/3+1/5-1/7+…例如，程序运行后，输入0.0001，则程序输出3.1414。请改正程序中的错误，使它能得出正确的结果。注意：不要改动main函数，不得增行或删行，也不得更改程序的结构。试题程序：include ＜math.h＞include ＜stdio.h＞float fun(float num){ int s;float n,t, pi;t=1 ;pi=0; n=1; s=1;/**************found***************/while (t＞=num){pi=pi+ t;n=n+2;s=-s;/**************found**************/t=s% n;}pi=pi*4;return pi;}main (){ float n1, n2;clrscr ();printf ("Enter a float number: ");scanf ("%f", &n1);n2=fun (n1);print f (" %6.4 f\n ", n2);}

4.（ 26 ）计算二的近似值的一个公式是某人编写下面的程序用此公式计算并输出 π 的近似值：Private Sub Comand1_Click （）PI ＝ 1Sign ＝ 1n=20000For k=3 To nSign=-Sign/kPI=PI+Sign/kNext kPrint PI*4End Sub运行后发现结果为 3.22751 ，显然，程序需要修改。下面修改方案中正确的是A ）把 For k=3 To n 改为 For k=1 To nB ）把 n=20000 改为 n=20000000C ）把 For k=3 To n 改为 For k=3 To n Step 2D ）把 PI=1 改为 PI=0

参考答案和解析
正确答案：C
解析：在π/4的近似求解公式中，分母是等差增加的，第一项分母可看作是1，第二项是3，第三项是7，依次类推。所以循环变量k应该每次增加2，故选项C)正确。程序中2n-一1是用k来控制的，(-1)n-1是通过sign来控制的。程序从首次运行结果是：1-1／3，继而不断增项。
更多“计算π的近似值的一个公式是π／4=1－1／3＋1／5_1／7＋…＋(－1)n－11／(2n－1)。某人编写下面的程序用此公式计 ”相关问题

  • 第1题：

    编写程序求解方程 x + 1 / x = 4 的解（可以是近似解，可以是其中一个解）的方法是：

    A．在程序中直接输入方程让计算机求解

    B．写出求解公式，让计算机按照求解公式求解

    C．先给一个任意解，然后按照左右变化的趋势，逐步逼近真实解

    D．此方程无解


    C

  • 第2题：

    使用for循环编写程序实现以下功能：计算1-1/3+1/5-1/7+...-1/99+......，结果保留2位小数。


    截图

  • 第3题：

    【求π的值】 利用如下公式计算π，当通项的绝对值小于等于1e-6时停止计算，结果保留10位小数。 π/4 = 1 - 1/3 + 1/5 - 1/7 ...


    （1）3-2n （2） 试题分析：解：（1）∵ ∴ （2分） ∴ （5分） （2） （7分） ∴ ∴ 或 （舍） （10分） 点评：主要是考查了等差数列的通项公式以及求和的运用，属于基础题。

  • 第4题：

    下面程序段是求π的近似值，当第n项的绝对值小于1e-5时终止计算。 π/4=1-1/3+1/5-1/7+... Dim n As Long, s As Single Dim t As Single, pi As Single n = 1: t = 1: s = 0 Do While abs（t) ＞ ______ s = s + t n = n + 1 t = （-1)^（n + 1)/（2*n-1) Loop


    11

  • 第5题：

    函数fun的功能是:根据以下公式计算并返回S,n通过形参传入,n的值大于等于0。划线处应填________。 S=1-1/3+1/5-1/7+…1/（2*n-1) float fun（int n) { float s=0.0,w,t,f=-1.0; int i; for（i=0;i＜n;i++) { f=-f; w=f/（2*i+1); s+=w; } ____________; }


    p=p*i；p=p/i

相关内容