1.分析下列程序段,写出程序段运行结果.
(1)a=3
b=a+1
b=a
a=b+1
Print a,b
(2)a=1
b=2
Print a,b
a=a+b
b=a+b
Print a,b
2.试在横线上填写合适的语句或表达式,使程序完成如下功能:输入一个数,计算出这个数的绝对值,并显示结果.
Private Sub Form_Click()
x=InputBox("请输入一个数","输入")
y=________________________
Print x; "的绝对值为:";y
End Sub
3.试在横线上填写合适的语句或表达式,使程序完成如下的功能:输入两个数,然后交换这两个数,并输出交换后的结果.
參考答案:第一道题: (1) 4 3 (2) 1 2 3 5
第二道题:
Private Sub Form_Click()
x=InputBox("请输入一个数","输入")
if x<0 then
y=-1*x
x=y
end if
Print x; "的绝对值为:";y
End Sub
第三道题:
input a,b
c=a
a=b
b=c
printf a,b
