程序设计题目.doc

1 A=40 B=20 C=10 If ab If ca C=a+b Else C=a-b Endif Endif ?c 40 2 设成绩表当前记录中“计算机”字段的值为85，执行下面程序段之后，输出结果为（） Do case Case 计算机60 ?”计算机等级是”+”不及格” Case 计算机=60 ?”计算机等级是”+”及格” Case 计算机=75 ?”计算机等级是”+”良好” Case 计算机=85 ?”计算机等级是”+”优” End case 3执行如下程序，如果输入X的值为5，则S的显示值为（） Set talk off S=0 I=1 Input “x=” to x Do while s=x S=s+i I=i+1 Enddo ?s Set talk on 4 下列程序段用来求2*4*6*8*10*….100的值 S=1 For (n=2 to 100 step 2 ) S=s*n Endfor ?s return 5 执行程序后，变量B的值是（） A=100 Do case Case a20 B=a/b Case a50 B=a/b Case a100 B=a/b Otherwise B=b Endcase 6 执行程序并写出结果() Clear For i=10 to 5 step -2 If i%3=0 i=i-1 Endif i=i-2 ?i Endfor 7下列程序是从10个实数中统计最大数的程序，请补充完整程序 Clear K=1 Input “请输入第一个数” to y Do while ( ) Iniput “请再次输入数字” to x If yx ( ) Endif ( ) Enddo ?”最大数=”,x 执行程序并写出结果 Clear Store 0 to x,y Do while .t. X=x+1 Y=y+x If x=10 Exit Endif Enddo ?y 此程序的功能是什么 Set talk off Store 0 to x,y Use 工资表 Scan If 工资=2000 and 工资=1000 Loop Endif If 工资1000 X=x+1 Endif Y=y+1 Endscan Use ?y 执行程序并写出结果 Set talk off Dimension a(6) For k=1 to 6 A(k)=20-2*k Endfor K=5 Do while k=1 A(k)=a(k)-a(k+1) K=k-1 Enddo ?a(1),a(3),a(5) Set talk on