2018-2019學(xué)年浙江省溫州市永嘉縣碧蓮中學(xué)高二(上)期中信息技術(shù)試卷
發(fā)布:2024/4/20 14:35:0
一、單項(xiàng)選擇題(每題3分,共30分)
-
1.計(jì)算表達(dá)式Val(“10“)+Len(“2.3“)的值是( )
組卷:3引用:1難度:0.4 -
2.下列選項(xiàng)中,可以作為VB變量名的是( ?。?/h2>
組卷:7引用:1難度:0.5 -
3.在Visual Basic中,語句TName.Caption=“2012倫敦”中的TName是( ?。?/h2>
組卷:7引用:6難度:0.7 -
4.下列Visual Basic表達(dá)式的值等于56的是( ?。?/h2>
組卷:9引用:5難度:0.3
二、非選擇題(11題每空2分,12題6分,共20分)
-
11.n個(gè)數(shù)據(jù)元素存放到數(shù)組a(n)中,對(duì)這n個(gè)數(shù)據(jù)進(jìn)行降序排序算法程序段如下:
For i=1 to n-1
For j=n to ①
If ②
t=a(j):③
end if
next j
next i
n個(gè)數(shù)據(jù)元素存放到數(shù)組a(n)中,對(duì)這n個(gè)數(shù)據(jù)進(jìn)行升序排序算法程序段如下:
For i=1 to n-1
k=④
For j=⑤
If ⑥
Next j
If ⑦
t=a(i):a(i)=a(k):a(k)=t
end if
next i組卷:19引用:1難度:0.3 -
12.有如下程序段:
Dim a(1to 5)as integer,s as string
a(1)=77:a(2)=73:a(3)=87:a(4)=80:a(5)=66
i=1:n=5
Do while i<=3
j=1
Do while j<=n-i
If a(j)>a(j+1)then
a(j)=a(j)+a(j+1):a(j+1)=a(j)-a(j+1):a(j)=a(j)-a(j+1)
End if
j=j+1
Loop
S=s+str(a(i))
i=i+1
Loop
Text1.Text=s
End sub
該程序運(yùn)行后,文本框中顯示的是組卷:0引用:1難度:0.5