2010年浙江省高中信息技術(shù)會(huì)考試卷(1)
發(fā)布:2024/4/20 14:35:0
一、第一套
-
1.有如下Visual Basic程序段:
a=12:b=20
b=a+b+28
a=b+a-5
b=a+b
該程序段運(yùn)行后,變量b的值為組卷:0引用:1難度:0.6 -
2.有如下Visual Basic程序段:
a=5
b=Len(“1011“)
If a>b Then
Label1.Caption=“請(qǐng)重新輸入“
Else
Label1.Caption=“歡迎光臨“
End If
該程序段運(yùn)行后,在標(biāo)簽Label1上顯示的是組卷:7引用:2難度:0.5
三、標(biāo)題
-
7.有如下Visual Basic程序段:
s=0
a=5
For i=1To 10Step 2
a=a+i
s=a*i
Next i
問(wèn):該程序段運(yùn)行后,
(1)變量i的值是
(2)變量s的值是組卷:8引用:2難度:0.3 -
8.某超市打折促銷,規(guī)定如下:
①購(gòu)物未超過(guò)500元按原價(jià)支付;
②購(gòu)物超過(guò)500元但未超過(guò)1000元,超過(guò)500元部分按9折優(yōu)惠計(jì)價(jià);
③購(gòu)物超過(guò)1000元但未超過(guò)1500元,超過(guò)1000元部分按8折優(yōu)惠計(jì)價(jià);
④購(gòu)物超過(guò)1500元但未超過(guò)3000元,超過(guò)1500元部分按7折優(yōu)惠計(jì)價(jià);
⑤購(gòu)物超過(guò)3000元,超過(guò)3000元部分按6折優(yōu)惠計(jì)價(jià).
根據(jù)以上規(guī)定,假定購(gòu)物貨款為x元,則實(shí)付金額y為:
程序界面如圖所示,在“輸入購(gòu)物金額(單位:元)“后的文本框orgtext中輸入購(gòu)物金額(單位:元),單擊“實(shí)付金額計(jì)算“按鈕(Command1)后,在“實(shí)際支付金額(單位:元)為“后的文本框cashText中輸出實(shí)付金額.
解決此問(wèn)題相應(yīng)的Visual Basic程序如下:
Private Sub Command1_Click
Dim x As Single,y As Single
x=Val(orgjye.ai.Text)
If x<=500Then
y=x
ElseIf
y=500+(x-500)*0.9
ElseIf x<=1500Then
y=500+500*0.9+(x-1000)*0.8
ElseIf x<=3000Then
y=500+500*0.9+500*0.8+(x-1500)*0.7
Else
y=500+500*0.9+500*0.8+1500*0.7+(x-3000)*0.6
End If
End Sub
(1)解決此問(wèn)題的算法是
在程序①和②橫線處,填入適當(dāng)?shù)恼Z(yǔ)句或表達(dá)式,把程序補(bǔ)充完整.
(2)程序中①橫線處應(yīng)填入
(3)程序中②橫線處應(yīng)填入組卷:8引用:2難度:0.1