30)有如下程序
INPUT k
IF k<=0THEN a=4:GOTO aIF k<=1THEN a=3:GOTO aIF k<=2THEN a=3:GOTO aIF k<=3THEN a=1a:PRINT k;a
运行时从键盘输入3,输出的结果是A)31B)343C)3432D)34321(31)有如下程序
a=3
IF a<=3THEN
PRINT 3;
END IF
IF a<=4THEN
PRINT 4;
END IF
IF a<=5THEN
PRINT 5;
END IF
IF a<=6THEN
PRINT 6;
END IF
END
运行后输出结果是
A)3B)34C)345D)3456(32)有如下程序
a=1
DO WHILE a<10
a=2*a
b=b+a*a+1
LOOP
PRINT b
END
运行后输出结果是
A)12B)32C)97D)344(33)有如下程序
a$="AaBbCcDdEe":b$="12345"FOR j=1to 5STEP 2PRINT MID$(a$,j,1)+MID$(b$,(j+1)/2,1);
NEXT j
END
A)A1B2C3B)AaB123C)a1b2c3D)A1a2B3(34)有如下程序
INPUT "Enter a value of t:"tSELECT CASE t
CASE IS<6
s=t+1
CASE IS<5
s=t+2
CASE IS<4
s=t+3
CASE ELSE
s=t+4
END SELECT
PRINT t;s
END
运行时,从键盘输入3,输出的结果是A)34B)35C)36D)37(35)有如下程序
a$="France"
m$=MID$(a$,3,2)FOR j=1to 5
READ b$
e=INSTR(b$,m$)s=s+e
NEXT j
PRINT s
DATA Iran,China,Japan,Afghanistan,GuyanaEND
运行后输出结果是
A)5B)11C)16D)21
| 广告合作:400-664-0084 全国热线:400-664-0084 Copyright 2010 - 2017 www.my8848.com 珠峰网 粤ICP备15066211号 珠峰网 版权所有 All Rights Reserved
|