小学信息学综合测试（二）ans.docVIP

小学信息学综合测试（二） 一、选择填空：（10分） 1、（ ）A、 B、 C、 D、 2、（ ）。 A、 B、 C、 D、 3、（ ）。 A、 B、 C、 D、 4、（ ）。 A、 B、 C、 D、 5、是（ ）。 A、 B、 C、 D、 6、（ ）。 A、 B、C、 D、 7、（ ）。 A、 B、 C、 D、 8、（ ）。 A、 B、 C、 D、 9、（ ）。 A、 B、 C、 D、 10、（ ）。 A、1 B、C、 D、 二、问题求解：（3） 1、…… b(1,15) b(2,2) b(2,3) …… b(2,15) b(3,3) …… b(3,15) …… b(15,15) 若：将b（i，j）的值依次存储在a（k）中，即a（1）←b（1，1），a（2）←b（1，2），……写出k和i、j之间的关系。K=(15+(17-i))*(i-1)/2+(j-i)+1 给定k的值（k≤240）后，写出能决定相应的i，j值的程序段。 2、地理老师画了亚，欧，美，非和大洋洲图形，并给图形标号，然后让五个同学辨认。回答不一甲：3是欧洲，2是美洲；乙：4是亚洲，2是大洋洲；丙：1是亚洲，5是非洲；丁：4是非洲，3是大洋洲；戊：2是欧洲，5是美洲。结果每人都只对一半，答案是什么？ DIM A(10) FOR I=1 TO 10 A(I)=2*I S=A(I) NEXT I PRINT A(A(2))+5 END 13 X=1 FOR I=1 TO 4 X=X+2 FOR J=1 TO I X=X+(J+1) NEXT J X=X+J NEXT I PRINT “X=”;X END X=53  FOR J=1 TO 3 FOR K=1 TO 3 B(J,K)=(J-1)*4+K NEXT K NEXT J FOR J=2 TO 3 FOR K=2 TO 3 PRINT B(K,J); NEXT K PRINT NEXT J FOR K=0 TO 7 A(K)=K NEXT K FOR P=1 TO 6 A(P)=P-1 B(P)=A(A(P)+A(A(K-P))) PRINT A(P)+B(P) NEXT P END END K=25 FOR I=5 TO 1 STEP -1 M=20-3*I FOR J=1 TO 2*I-1 PRINT TAB(M+3*J);USING “###”;K MOD 10; K=K-1 NEXT J PRINT NEXT I END DECLARE FUNCTION jc! (n!) CLS FOR i = 2 TO 5 PRINT jc(i); NEXT i END FUNCTION jc (n) IF n = 1 THEN jc = 1 ELSE jc = n * jc(n - 1) END IF END FUNCTION 输出： CLS DATA 81,54,45,18,63 READ m FOR i = 1 TO 4 READ n GOSUB gcd NEXT i PRINT m END gcd: DO UNTIL m = n IF m n THEN m = m - n ELSE n = n - m END IF LOOP RETURN 输出： CLS DIM a(4, 5) DATA 23,48,94,56,81 DATA 46,55,21,83,36 DATA 32,94,12,47,65 DATA 88,92,35,51,48 FOR i = 1 TO 4 FOR j = 1 TO 5 READ a(i, j) NEXT j NEXT i max = a(1, 1) FOR i = 1 TO 4 FOR j = 1 TO 5 IF max a(i, j) THEN max = a(i, j) END IF NEXT j NEXT i FOR i = 1 TO 4 FOR j = 1 TO 5 IF max = a(i, j) THEN PRINT max, i, j END IF NEXT j NEXT i 输出：  四、根据要求，完善下列程序：（35分） 1、下面程序的功能是打印如下图形： **** * **** * **** * **** * **** *