2010年計(jì)算機(jī)等級(jí)考試二級(jí)C:上機(jī)習(xí)題12套(8)

字號(hào):

2010計(jì)算機(jī)等考二級(jí)C:上機(jī)習(xí)題12套(8)

    第八套C語(yǔ)言上機(jī)試題
    一、改錯(cuò)題
    ①將原第六行的if(fp= =fopen("myf1.out","w"))= =NULL) EXIT(1);中第一個(gè)等號(hào)= =改為賦值號(hào)=
    ②將原第十二行的strlenth(inline[i ],len);改為strlenth(inline[i ],&len);
    ③將原第十九行的strlenth(char p, int len)改為strlenth(char *p, int *len)
    ④將原第二十行的len=0;改為*len=0;
    二、編程題
    #include
    #include
    main( )
    {int i ,k;float e1,e,fat,pa=1,term=1,j=2;
    FILE *fp;
    if((fp=fopen("A:\\myf2.out","w"))= =NULL)exit(1);
    e1=1;e=2;fat=2;i=3;
    while(fabs(e-e1)>1e-6)
    {e1=e; e+=1.0/fat;
    fat*=i ++; }
    for(k=1;k<=1000;k++)
    {term=j/(2*k-1)*j/(2*k+1);
    pa*=term; j+=2; }
    fprintf(fp,"e=%f\n i =%d\n",e, i -1);
    fprintf(fp,"pi=%f\nj=%f\n",pa*2,j);
    fclose(fp); }