1 / 21

等级考试练习题（五）

等级考试练习题（五）. 长春中医药大学现代教育技术中心 2007.9. 【1】 程序执行的结果是（ ）。 SET TALK OFF X=1 S=0 Do while x<=9 IF mod (x,3)=0 S=S+X ENDI X=X+1 ENDD ?S A.6 B.18 C. 9 D.15. B. D. P1.PRG PRIV X N=1 X=1 DO WHILE N<=3 X=X+1 N=n+1 Endd RETURN.

hamish
Download Presentation

等级考试练习题（五）

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. 等级考试练习题（五） 长春中医药大学现代教育技术中心 2007.9

  2. 【1】程序执行的结果是（ ）。 SET TALK OFF X=1 S=0 Do while x<=9 IF mod (x,3)=0 S=S+X ENDI X=X+1 ENDD ?S A.6 B.18 C. 9 D.15 B

  3. D P1.PRG PRIV X N=1 X=1 DO WHILE N<=3 X=X+1 N=n+1 Endd RETURN 【2】程序执行的结果是（ ）。 P.PRG X=0 DO P1 ?X A.4 B.1 C.3 D.0

  4. D 【3】程序执行的结果是（ ）。 SET TALK OFF S=0 I=0 Do while I<=15 S=S+I I=I+4 ENDD ?S A.10 B.120 C.4 D.24

  5. A 【4】程序执行的结果是（ ）。 SET TALK OFF STORE 0 TO N, S DO WHILE .T. N=N+1 S=S+N IF N>4 EXIT ENDI ENDD ?S A.15 B.14 C.10 D.16

  6. D 【5】程序执行的结果是（ ）。 SET TALK OFF L=.F. X=2 S=0 Do while x<=10 STOR mod (x,2)=0 TO L IF L S=S+1 ENDI X=X+1 ENDD ?S A.0 B.10 C.4 D.5

  7. C I=1 DO WHILE I<=5 S=S+SA(I,1)+SA(I,2) I=I+2 ENDD ?S A.6 B.10 C.14 D. 18 【6】程序执行的结果是（ ）。 SET TALK OFF DIME SA(10,2) SA=1 STORE 0 TO S I=1 DO WHILE I<=3 SA(I,1)=I SA(I,2)=2*I I=I+1 ENDD

  8. B 【7】程序执行的结果是（ ）。 SET TALK OFF X=’0123456789’ Y=’’ I=1 DO WHILE I<=3 Y=Y+SUBSTR(X, I, 3) I=I+1 ENDD ?Y A.012345678 B.012123234 C.012234456 D.123456789

  9. SET TALK OFF X=10 Y=5 DO P1 WITH X DO P1 WITH Y S=(X+Y)/2 ?S A.18 B.17 C.16 D.25 P1.PRG PARAMETERS M S=0 I=1 DO WHILE I<=M IF I <>INT(I/2)*2 S=S+I ENDI I=I+1 ENDD M=S RETURN B 【8】程序执行的结果是（ ）。

  10. A 【9】程序执行的结果是（ ）。 STORE 2 TO A1, B1, C1 DO P WITH A1, B1, C1 P.PRG PARAMETERS A, B, C D=B*B-4*A*C DO CASE CASE D<0 D=100 CASE D>0 D=150 CASE D=0 D=10 ENDC ?D A.100 B.150 C.10 D.0

  11. C 【10】如果DD.DBF中有10条记录， 程序执行的结果是（ ） STORE 0 TO M, N USE DD DO WHILE . NOT. EOF( ) M=M+1 SKIP ENDDO DO WHILE .NOT. EOF( ) N=N+1 SKIP 2 ENDDO USE ?M, N A.10，5 B.11，5 C.10 ，0 D.11，0

  12. B 【11】程序执行的结果是（ ）。 SET TALK OFF STORE 0 TO N, S DO WHILE .T. N=N+1 S=S+N IF N>=10 EXIT ENDIF ENDDO ?S A. 45 B. 55 C.10 D.50

  13. B 【12】程序执行的结果是（ ）。 SET TALK OFF STORE 1 TO A, B DO WHILE A<5 X = A*B A = A+1 B = B+A ENDDO ?X A. 18 B. 40 C.75 D.126

  14. B 【13】程序执行的结果是（ ）。 SET TALK OFF DO CASE ?”ABCD” CASE .T. ?”1234” CASE .F. ?” 456” OTHERWISE ?”789” ENDCASE A. ABCD B. 1234 C. 456 D. 789

  15. 【14】在空白处添适当语句，求100的阶乘。 S=1 X=1 DO WHILE X<=100 [ ] X=X+1 ENDD ？S S=S*X

  16. 【15】输出1-100之间，能被5整除数的和。 Set talk off S=0 X=1 DO WHILE X<=100 IF [ ] S=S+X ENDI X=X+1 ENDD ?S MOD（X，5）=0

  17. 【16】输出1-100之间，能被5和7整除数的和。 Set talk off S=0 X=1 DO WHILE X<=100 IF [ ] S=S+X ENDI X=X+1 ENDD ?S MOD（X，5）=0 .AND. MOD（X，7）=0

  18. 【17】在DANK.DBF中求“02”系的工资总和。 USE DANK S=0 DO WHILE .NOT. EOF（） IF 系号=‘02’ [ ] ENDI [ ] ENDD ？S USE S=S+工资 SKIP

  19. 【18】在DNK.DBF中，求已婚职工的平均年龄。 SET TALK OFF USE DANK N=0 S=0 DO WHILE .NOT. EOF（） IF [ ] N=N+1 S=S+年龄 ENDI SKIP ENDD ？S/N 婚否

  20. 【19】在DANK.DBF中，逐个显示学历是硕士的记录。【19】在DANK.DBF中，逐个显示学历是硕士的记录。 USE DANK DO WHILE .NOT. EOF（） IF 学历<>’硕士’ SKIP [ ] ENDI DISP WAIT’按任意键继续‘ [ ] ENDD USE LOOP SKIP

  21. 【20】计算DD.DBF 数据库中”数量”字段取值为偶数的和 SET TALK OFF USE DD S=0 DO WHILE .NOT. EOF( ) IF [ ] S=S + 数量 ENDIF SKIP ENDDO ?S INT（数量/2）=数量/2

More Related