xcase=1input "input value of t:";tselect case tcase t>0y=xca

xcase=1
input "input value of t:";t
select case t
case t>0
y=xcase+1
case t=0
y=xcase+2
case else
y=xcase+3
end select
print xcase;y
end
运行时,从键盘输入1,输出的结果是
A) 1 2 B) 1 1 C) 1 3 D) 1 4
请选择-> A B C D
2、 有如下程序
a$="54321";b$="abcde"
for j=1 to 5
print mid$(a$,6-j,1)+mid$(b$,j,1);
next j
print
end
运行后输出的结果是
A) a1b2c3d4e5 B) a5b4c3d2e1
C) 1a2b3c4d5e D) e1d2c3b4a5
请选择-> A B C D
3、 下述程序的运行结果是
a$="ABCD"
b$="efgh"
c$=lcase$(a$)
d$=ucase$(b$)
print c$;d$
end
A) abcdEFGH B) abcdefgh
C) ABCDefgh D) ABCDEFGH
请选择-> A B C D
4、 下列语句正确的是（）.
A) if a≠b then t=a a=b b=t
B) if a≥b then t=a:a=b:b=t
C) if a>=b then t=a:a=b:b=t
D) if a>=b then t=a;a=b;b=t
请选择-> A B C D
5、 能够实现以下分段函数的程序段是（）
2x+1 (x≥0)
f(x)=｛
2x-1 (＜0)
A) if x>=0 then y=2x+1 B) if x>=0 then y=2*x+1
y=2x-1 else
y=y=2*x-1
C) if x≥0 then D) if x>=0 then
y=2*x+1 y=2*x+1
else else
y=2*x-1 y=2*x-1
end if end if
请选择-> A B C D
6、 下列程序段的执行结果是（）
x=50
y=60
if x0
A) 50 60 B) 60 50 True C) 60 50 D) 50
请选择-> A B C D
7、 下列程序段的执行结果是（）.
i=0
for j=10 to 19 step 3
i=i+1
next j
print i
A) 4 B) 5 C) 6 D) 3
请选择-> A B C D
8、 下列程序段的执行结果是（）.
for i=1.5 to 5 step 1.5
print i;
next i
A) 1.5 3 4.5 B) 2 4 5 C) 1 2 3 4 D) 步长不能为小数
请选择-> A B C D
9、 给出下面程序段,假设运行时依次输入数据1,-1,该程序段的输出结果是（）.
x=0
do while x-1
x=val(inputbox("请输入数据x"))
y=val(inputbox("请输入数据y"))
if x*y A B C D
10、 下列程序段的执行结果为
a=10
b=30
if a A B C D

1.A 2.C 3.A 4.D 5.B(多输了一个y=,录错了吧）
6.B 7.A 8.D 9.A 10.D
再问： 第4个选C，第5个是 D，8个选A，不过还是谢谢了~~~~~~~