黄色在线观看视频-黄色在线免费看-黄色在线视频免费-黄色在线视频免费看-免费啪啪网-免费啪啪网站

[程序]

試題五

    閱讀以下程序說明和 C 程序，將應填入程序中__?__處的字句，寫在答卷的對應欄內。

【程序說明】

    本程序是一個簡單的計算器模擬程序。對任意給定的正確四則運算表達式，程序計算其結果值并輸出。表達式中運算分量為無正負號整數，運算符為 +、_、*、/，圓括號按常規配對，表達式以字符 "=" 結束。

    函數 getach() 為獲取表達式的一個合法字符，并將字符存入變量 curch；函數指針數組 func[] 是為了統一加減乘除計算而設置的。

【程序】

#include <stdio.h>

int add(int x,int y){return x+y;}

int sub(int x,int y){return x-y;}

int mul(int x,int y){return x*y;}

int div(int x,int y){return x/y;}

int (*func[])()={add,sub,mul,div};

int num,curch;

char chtbl[]="+-*/()=";

char corch[]="+-*/()=0123456789";

int getach()

{ int i;

while(1)

{ curch = getchar();

if(curch == EOF) return -1;

for (i = 0;corch[i] && curch != corch[i];i++);

if (i<strlen(corch)) break;

}

return curch;

}

int getid()

{ int i;

if(curch >= '0' && curch <= '9')

{ for(num = 0;curch >= '0' && curch <= '9';getach())

num = __①__;

return -1;

}

else { for( i = 0;chtbl[i];i++)

if (chtbl[i] == curch) break;

if ( i <= 5) getach();

return i;

}

}

int cal()

{ int x1,x2,x3,op1,op2,i;

i = getid();

if ( i == 4) x1 = cal(); else x1 = um;

op1 = getid();

if ( op1 >= 5) return x1;

i = getid();

if ( i == 4) x2 = cal(); else x2 = num;

op2 = getid();

while (__②__)

{ i = getid();

if ( i == 4) x3 = cal(); else x3 = num;

if (( op1/2 == 0) && (op2/2 == 1))

x2 = ( *func[op2](x2,x3));

else { x1 = __③__;

x2 = x3;

__④__;

}

op2=getid();

}

return __⑤__(x1,x2);

}

void main()

{ int value;

printf("Please input an expression:\n");

getach();

while (curch != '=')

{ value = cal();

printf("The result is : %d\n",value);

printf("Please input an expression:\n");

getach();

}

}

試題六

閱讀下列程序說明和 FORTRAN 程序，將應填入程序中__?__處的字句，寫在答卷紙的對應欄內。
【程序說明】

子程序 SUM 計算數列

1，1/2，1/3，…，1/n，…

的前 n 項和，并以 M 位小數形式輸出（M≤60）。

為提高計算結果的精度，用分數形式計算并存放數列的部分和，求和結果記為

A+U/V

其中 U/V 是不可約真分數，A 為整數。

例如：n = 5，M = 10 時，子程序輸出為

1+1/2+1/3+1/4+1/5 = 2+17/60

2.283333333

整型函數 GCD 用輾轉相除法計算 U 和 V 的最大公約數。

【程序】

SUBROUTINE SUM(N,M)

INTEGER A,U,V,G,D(60),GCD

A=1

U=0

V=1

DO 20 K=2,N

U=__①__

V=__②__

A=__③__

U=MOD(U,V)

__④__

U=U/G

V=V/G

20   CONTINUE

WRITE(*,100)N,A,U,V

100  FORMAT(1X,'1+1/2+1/3+…+1/',I2,'=',I2,'+'I10,'/',I10)

DO 40 I=1,M

D(I)=__⑤__

__⑥__

40   CONTINUE

WRITE(*,200)A,(D(I),I=1,M)

200  FORMAT(1X,I2,'.',60I1)

END

INTEGER FUNCTION GCD(U,V)

INTEGER U,V

K=V

L=U

10  IF(MOD(K,L).GT.0) THEN

J=MOD(K,L)

K=L

L=J

GOTO 10

ENDIF

__⑦__

END

上一頁  [1] [2] [3] 下一頁