1996年度中程下午试卷及答案.doc
约23页DOC格式手机打开展开
1996年度中程下午试卷及答案,页数:23字数:4254 试题一 阅读以下程序说明和c程序,将应填入程序中 (n) 处的字句,写在答卷的对应栏内。 [程序说明] 本程序为六个整型变量a、b、c、d、e、f输入整数,并按从大到小的顺序输出它们的名和值。如某次a、b、c、d、e、f的输入值为3、...
内容介绍
此文档由会员 cnlula 发布
1996年度中程下午试卷及答案
页数:23 字数:4254
1996年度中程下午试卷及答案
试题一 阅读以下程序说明和C程序,将应填入程序中 (n) 处的字句,写在答卷的对应栏内。 [程序说明] 本程序为六个整型变量A、B、C、D、E、F输入整数,并按从大到小的顺序输出它们的名和值。如某次A、B、C、D、E、F的输入值为3、2、5、7、4、6,则程序将输出: D(7)F(6)C(5)E(4)A(3)B(2) [程序] #define N sizeof tb1/sizeof tb1[0] int A,B,C,D,E,F; struct ele{ char vn; int *vp; }tb1[]={{‘A’,&A},{‘B’,&B},{‘C’,&C}, {‘D’,&D},{‘E’,&E},{‘F’,&F}}, t; main() { int k,j,m; for(k=0;k{ printf(“Enter data for%n”,tb1[k].vn); scanf(“%d”,__(1)__); } m=N-1;/*采用冒泡法排序*/ white (m>0) { for(k=j=0;jif(__(2)__) { t =tb1[j]; tb1[j] =tb1[j+1]; tb1[j+1]=t; __(3)__; } m=__(4)__;/*本框填m-1不给分*/ } for(k=0;kprintf(”%c(%d)”,____(5)____ ,____ (6)____)l printf(“n”); } 试题二 阅读以下程序说明和FORTRAN程序,将应填入程序中 (n) 处的字句,写在答卷的对应栏内。 [程序说明] 本程序用辛卜生公式计算下式的值 为了使近似值达到指定精度EPS,程度中采取了逐步扩大n 的方法。 [程序] PARAMETER (PI=3.14159265) EXTERNAL F ____(1)____ REAL EPS, S, X, X1 WRITE (*.*) 'Please enter EPS:' READ (*,*)EPS X=0.0 N=2 N=2*N X1=X CALL ____(2)____ X=S/PI CALL ____(3)____ X=X+S IF(____(4)____)GOTO 10 WRITE (*,20)X FORMAT (1X,
页数:23 字数:4254
1996年度中程下午试卷及答案
试题一 阅读以下程序说明和C程序,将应填入程序中 (n) 处的字句,写在答卷的对应栏内。 [程序说明] 本程序为六个整型变量A、B、C、D、E、F输入整数,并按从大到小的顺序输出它们的名和值。如某次A、B、C、D、E、F的输入值为3、2、5、7、4、6,则程序将输出: D(7)F(6)C(5)E(4)A(3)B(2) [程序] #define N sizeof tb1/sizeof tb1[0] int A,B,C,D,E,F; struct ele{ char vn; int *vp; }tb1[]={{‘A’,&A},{‘B’,&B},{‘C’,&C}, {‘D’,&D},{‘E’,&E},{‘F’,&F}}, t; main() { int k,j,m; for(k=0;k{ printf(“Enter data for%n”,tb1[k].vn); scanf(“%d”,__(1)__); } m=N-1;/*采用冒泡法排序*/ white (m>0) { for(k=j=0;jif(__(2)__) { t =tb1[j]; tb1[j] =tb1[j+1]; tb1[j+1]=t; __(3)__; } m=__(4)__;/*本框填m-1不给分*/ } for(k=0;kprintf(”%c(%d)”,____(5)____ ,____ (6)____)l printf(“n”); } 试题二 阅读以下程序说明和FORTRAN程序,将应填入程序中 (n) 处的字句,写在答卷的对应栏内。 [程序说明] 本程序用辛卜生公式计算下式的值 为了使近似值达到指定精度EPS,程度中采取了逐步扩大n 的方法。 [程序] PARAMETER (PI=3.14159265) EXTERNAL F ____(1)____ REAL EPS, S, X, X1 WRITE (*.*) 'Please enter EPS:' READ (*,*)EPS X=0.0 N=2 N=2*N X1=X CALL ____(2)____ X=S/PI CALL ____(3)____ X=X+S IF(____(4)____)GOTO 10 WRITE (*,20)X FORMAT (1X,