文稿归稿存档编号:[KKUY-KKIO69-OTM243-OLUI129-G00I-FDQS58-MG129]
高一信息技术会考vb操作题归纳
要求掌握的典型操作题
1、输入两个数存在相应的变量中,并交换两个变量的值。
…
X=inputbox(“x=”)
Y=inputbox(“y=”)
Z=X
X=Y
Y=Z
…
拓展:不需要中间变量Z,交换两个变量的值。
…
X=X+Y
Y=X-Y
X=X-Y
…
2、输入两个数存在相应变量中,输出最大数
…
X=inputbox(“x=”)
Y=inputbox(“y=”)
If X>Y then
Max=X
Else
Max=y
End if
Print Max
拓展一:不需要Max变量
If X>Y then
Print X
Else
Print Y
End if
拓展二:
…
Max=X
If X<Y then
Max=y
End if
…
拓展三:
…
Max=(X+Y)/2+ABS(X-Y)/2
拓展四:若要求输出最小值,以上三个程序哪些地方需要修改
3、分段函数.
Y=
X2 (x<3)
2x+1 (x>=3)
…
X=inputbox(“x=”)
If X<3 then
Y=X*X
Else
Y=2*X+1
End if
Print
拓展:(类似分段函数)某超市促销苹果,购买一斤苹果,为每斤3元,购买5斤以下每斤原价;超过5斤部分每斤打8折,输入购买的斤数,输出应付款额。
…
apple = inputbox(“apple=”)
if apple<=5 then
money=3*apple
else
money=3*5+(apple-5)*3*
end if
print money
4、一元二次方程求根:ax2+bx+c=0
…
a=inputbox(“a=”)
b=inputbox(“b=”)
c=inputbox(“c=”)
d=b*b-4*a*c
If d>=0 then
X1=(-b+sqr(d))/(2*a)
X2=(-b-sqr(d))/(2*a)
Print x1,x2
Else
Print “无实解”
End if
5、判断三个数是否能构成三角形的条件
1)假设是三个正数a,b,c
条件是:a+b>c and b+c>a and c+a>b
2)假设是三个数a,b,c
条件是:a+b>c and b+c>a and c+a>b and a>0 and b>0 and c>0
6、累加:求s=10+30+50+…+550
…
S=0
For i=10
高一信息技术会考vb操作题归纳 来自淘豆网www.taodocs.com转载请标明出处.