[精品]循环程序设计

循环结构程序设计测试 一、选择题（每小题2分，共20分） 1、已知100 200行是子程序，哪种调用方法正确（） A、GOTO 100B、IF X0 THEN 100 C、GOSUB 110D、GOSUB 100 2、在WHILE语句的循环中，判断循环控制表达式与执行循环体的关系是（） A、先判断表达式的值，当表达式的值是“假”时执行循环体 B、先执行循环体语句，后判断表达式的值 C、先判断表达式的值，当表达式的值是“真”时执行循环体 D、无论表达式的值是什么，循环体至少被执行一次。 3、INT（RND（0）*10）的值是在哪个范围内的整数（） A、（0, 1） B、（0, 10] C、[0, 10） D、（1, 9） 4、在二重循环中，内外循环的循环控制变量的名（） A、可以相同B、可以不相同C、不能相同 D、没有限制 5、下列各个关于FOR循环的叙述中，正确的是（） A、循环体至少被执行一次 B、循环体有可能不被执行 C、步长不允许是小数D、循环初值等于循环终值时循环体不被执行 6、在FOR循环语句中，循环变量的增量（步长）（） A、只能为正数B、只能是整数 C、不等于0的整数，小数都可以D、可以是任何数 7、下列程序运行后输出（） 10 FOR 1 1 TO 3A、*B、** 20 PRINT TAB （3-11）；****** 30 FOR J1 TO 1*2-1 40 PRINT “*”；C、 *d、*** 50 NEXT J* * ** * 60 NEXT I END***** 8、下列程序的结果输出几行（） 10 FOR X 1 TO 10 20 PRINT X； 30 IF X MOD 3 0 THEN PRINT 40 NEXT X 50 END A、1 B、2 C、3 D、4 9、下列程序运行后输出的是 10 FOR 1 3 TO 101 20 K INT SQR I 30 FOR J2 TO K 40 IF I mod J 0 THEN 70 50 NEXT J 60 PRINT I 70 NEXT I 80 END A、 3至101的整数B、3至101间的所有素数 C、 3至101间的所有偶数D、3至101间的各数的算术平方根 10、下列产生一个［0 , 20］的整数。 A、RND 1 *100B、INT RND 1 *100 C、INT RND 1 *21D、INT RND 1 *19 二、写程序运行结果每题5分共30分 10 so 2、10 X1 20 K1 20 GOSUB 100 30 FOR 11 TO 5 99 END 40 SSK*I 100 PRINT X； 50 K-K 110 IF X3 THEN 60 NEXT I 120 XX1 70 PRINT 〃 S 〃 ； S 130 GOSUB 100 80 END 140 XX-1 150 PRINT X； 199 RETURN 10 FOR J1 TO 10 4、 10 J1 20 GOSUB 100 20 WHILE J5 30 SSJ 30 JJ1 40 NEXT J 40 AAJ*J 50 PRINT S 50 WEND 60 END 60 PRINT A 100 JJ*Jl*J2 70 END 110 RETURN 5、10 FOR K1 TO 3 6、10 FOR 12 TO 1 20 IF K1 THEN A3 20 PRINT I, 30 IF K2 THEN A2 30 NEXT I 40 IF K3 THEN A1 40 PRINT I 50 PRINT A; 50 END 60 NEXT K 70 PRINT K 80 END 三、程序填空。每空3分，共30分 1、已知公式 Sl 1 2 1 2 3 1 2 N下 述BASIC程序的功能为求出S的值，其中N的值由键盘输入。 10 N 20 S0 Fl T0 30 FOR 11 TO N 40 50 60 SST 70 NEXT I 80 PRINT 〃 S 〃 ； S 90 END 2、求出所有的3位数，满足的条件为个位数为1或2,百位数字和十位数字顺 序后移1位，个位数字移到百位上，所产生的3位数是原3位数的2---3倍，补充 兀整。 10 FOR 1 1 TO 9 20 30 FOR K1 TO 2 40 M100*I10*JK 50 60 IF THEN 90 70 IF N3*M THEN 90 80 PRINT 90 NEXT K 100 NEXT J 110 NEXT I 120 END 3、求出所有能被其个、十、百各位数字之和整除的3位数（如324能被3249 整除） 10 FOR X100 TO 999 20 A 30 B 40 CX-A*100-B*10 50 IF THEN 70 60 PRINT X 70 NEXT X 80 END 4、求满足l222N21000的N的最大程序补充完整程序。 10 N0 S1 20 NN1 30 40 IF S （1000 THEN 20 50 PRINT N 60 END