第六章迴圈結構程式設計

2021-03-04 09:58:15 字數 5854 閱讀 9354

《迴圈結構程式設計》歷屆真題

(1) 執行下面的程式段後,x 的值為 (2023年4月)。

x=5for i=1 to 20 step 2

x=x+i\5

next i

a) 21b) 22c) 23d) 24

(2) 在窗體上畫乙個命令按鈕,然後編寫如下事件過程:(2023年4月)

private sub ***mand1_click()

for i=1 to 4

x=4for j =1 to 3

x=3for k=1 to 2

x=x+6

next k

next j

next i

print x

end sub

程式執行後,單擊命令按鈕,輸出結果是 。

a) 7b) 15c) 157d) 538

(3) 在窗體上畫乙個命令按鈕,然後編寫如下事件過程:(2023年4月)

private sub ***mand1_click()

x=0do until x=-1

a = inputbox("請輸入a的值")

a = val(a)

b = inputbox("請輸入b的值")

b = val(b)

x = inputbox("請輸入x的值")

x = val(x)

a = a+b+x

loop

print a

end sub

程式執行後,單擊命令按鈕,依次在輸入對話方塊中輸入5、4、3、2、1、-1,則輸出結果為 。

a) 2b) 3c) 14d) 15

(4) 閱讀下面的程式段:(2023年4月)

for i=1 to 3

for j=1 to i

for k=j to 3

a=a+1

next k

next j

next i

執行上面的三重迴圈後,a 的值為 。

a) 3b) 9c) 14d) 21

(5) 在窗體上畫乙個文字框(其中name屬性為text1),然後編寫如下事件過程:(2023年4月)

private sub form_load()

text1.text=""

text1.setfocus

for i=1 to 10

sum=sum+i

next i

text1.text=sum

end sub

上述程式的執行結果是 。

a) 在文字框text1中輸出55b) 在文字框text1中輸出0

c) 出錯d) 在文字框text1中輸出不定值

(6) 在窗體上畫兩個文字框(其name 屬性分別為text1和text2)和乙個命令按鈕(其name屬性為***mand1),然後編寫如下事件過程:(2023年4月)

private sub ***mand1_click()

x=0do while x<50

x=(x+2)*(x+3)

n=n+1

loop

text1.text=str(n)

text2.text=str(x)

end sub

程式執行後,單擊命令按鈕,在兩個文字框中顯示的值分別為

a) 1和0b) 2和72c) 3和50d) 4和168

(7) 在窗體上畫兩個名稱分別為text1、texte2的文字框和乙個名稱為***mand1的命令按鈕,然後編寫如下事件過程:(2023年9月)

private sub ***mand1_click()

dim x as integer,n as integer

x=1n=0

do while x<20

x=x*3

n=n+1

loop

text1.text=str(x)

text2.text=str(n)

end sub

程式執行後,單擊命令按鈕,在兩個文字框中顯示的值分別是

a) 15和1b) 27和3c) 195和3 d) 600和4

(8) 在窗體上畫乙個名稱為text1的文字框和乙個名稱為***mand1的命令按鈕,然後編寫如下事件過程:(2023年9月)

private sub ***mand1_click()

dim i as integer,n as integer

for i=0 to 50

i=i+3

n=n+1

if i>10 then exit for

next

text1.text=str(n)

end sub

程式執行後,單擊命令按鈕,在文字框中顯示的值是

a) 2b) 3c) 4d) 5

(9) 在窗體上畫乙個名稱為***mand1的命令按鈕,然後編寫如下事件過程: (2023年4月)

privatesub***mand1_click()

x=0n=inputbox("")

fori=1ton

forj=1toi

x=x+1

nextj

nexti

printx

endsub

程式執行後,單擊命令按鈕,如果輸入3,則在窗體上顯示的內容是______。

a)3b)4c)5d)6

(10) 設有以下迴圈結構(2023年9月)

do迴圈體

loop while 《條件》

則以下敘述中錯誤的是

a)若"條件"是乙個為0的常數,則一次也不執行迴圈體

b)"條件"可以是關係表示式、邏輯表示式或常數

c)迴圈體中可以使用exit do語句

d)如果"條件"總是為true,則不停地執行迴圈體

(11) 在窗體上畫乙個名稱為***mand1的命令按鈕,然後編寫如下事件過程:(2023年9月)

private sub ***mand1_click()

dim num as integer

num = 1

do until num > 6

print num;

num = num + 2.4

loop

end sub

程式執行後,單擊命令按鈕,則窗體上顯示的內容是

a)1 3.4 5.8 b)1 3 5c)1 4 7d)無資料輸出

(12) 在窗體上畫乙個名稱為***mand1的命令按鈕,然後編寫如下事件過程: (2023年9月)

private sub ***mand1_click()

dim a as integer, s as integer

a = 8

s = 1

dos = s + a

a = a-1

loop while a <= 0

print s; a

end sub

程式執行後,單擊命令按鈕,則窗體上顯示的內容是

a) 7 9b) 34 0c) 9 7d)死迴圈

(13) 設有如下程式:(2023年9月)

private sub ***mand1_click()

dim sum as double, x as double

sum = 0

n = 0

for i = 1 to 5

x = n / i

n = n + 1

sum = sum + x

next

end sub

該程式通過for迴圈計算乙個表示式的值,這個表示式是

a)1+1/2+ 2/3+3/4+4/5b)1+1/2+2/3+3/4

c)1/2+2/3+3/4+4/5d)1+1/2+1/3+1/4+1/5

(14) 設有如下程式段:(2023年9月)

x=2for i=1 to 10 step 2

x=x+i

next

執行以上程式後,x的值是

a) 26b) 27c) 38d) 57

(15) 在窗體上畫乙個命令按鈕,其名稱為***mand1,然後編寫如下事件過程:(2023年4月)

private sub ***mand1_click()

dim i as integer, x as integer

for i = 1 to 6

if i = 1 then x = i

if i <= 4 then

x = x + 1

else

x = x + 2

end if

next i

print x

end sub

程式執行後,單擊命令按鈕,其輸出結果為______。

a)9b)6c)12d)15

(16) 在窗體上畫乙個名稱為***mand1命令按鈕,然後編寫如下事件過程:(2023年4月)

private sub ***mand1_click()

c = 「abcd」

for n= 1 to 4

print ______

next

end sub

程式執行後,單擊命令按鈕,要求在窗體上顯示如下內容dcd

bcdabcd

則在______處填入的內容為。

a) left(c,nb) right(c,n) c) mid(c,n,1) d) mid(c,n,n)

(17) 執行以下程式段(2023年4月)

dim i as integer, x as integer

x = 0

for i = 20 to 1 step -2

x = x + i \ 5

next i

print x

後,x的值為______。

a)16b)17c)18d)19

(18) 假定有如下事件過程:(2023年9月)

private sub form_click()

dim x as integer, n as integer

x = 1

n = 0

do while x < 28

x = x * 3

n = n + 1

loop

print x, n

end sub

程式執行後,單擊窗體,輸出結果是

a)81 4b)56 3c)28 1d)243 5

(19) 有如下程式:(2023年9月)

private sub form_click()

dim check, counter

check = true

counter = 0

dodo while counter < 20

counter = counter + 1

if counter = 10 then

check = false

exit do

end if

loop

loop until check = false

print counter, check

end sub

程式執行後,單擊窗體,輸出結果為

a)15 0b)20 –1c)10 true d)10 false

(20) 有如下程式:(2023年9月)

private sub form_click()

dim i as integer, sum as integer

sum = 0

for i = 2 to 10

if i mod 2 <> 0 and i mod 3 = 0 then

sum = sum + i

end if

next i

print sum

end sub

程式執行後,單擊窗體,輸出結果為

第六章迴圈結構

一 選擇題 1 無條件轉移語的一般形式是 goto語句標號 其中的語句標號可以是 a 整型數 b 識別符號 c 保留字 d 實型數 2 有以下程式段 int k 2 while k 0 則下面描述中正確的是 a while迴圈執行10次b 迴圈是無限迴圈 c 迴圈體語句一次也不執行 d 迴圈體語句執...

第六章第六章財務計畫

6.1 資金 投資比例餅圖 希吉雅食品責任 成立初期,準備籌集資金100萬元。發起人自投60萬元,申請大學生創業貸款30萬元,10萬元尋求投資,企業固定資產作投資160萬元,向銀行貸款100萬元。共計註冊資本360萬元。投資比例如圖所示 圖8 1 投資比例 創業自籌資金由創業者個人以其個人名義籌集的...

結構力學第六章

恭喜,交卷操作成功完成!你本次進行的 結構力學 第06章 測試的得分為 20分 滿分20分 本次成績已入庫。若對成績不滿意,可重新再測,取最高分。測試結果如下 1.1 單選 對 在力法典型方程中,恆大於零的是 1.2 單選 對 在力法典型方程中,付係數 1.3 單選 對 力法方程的實質是 1.4 單...