【正文】
2xxxxxy 的值。完成所有操作后,按“ ctrl+s”保存 Private Sub Form_click() Dim x As Single 39。定義 y為單精度型變量,值由窗體顯示 x = Val(InputBox(請(qǐng)輸入變量 x)) If x = 0 Then y = x * x + 1 Else y = x * x x + 1 End If Print y=。 Private Sub Form_click() Dim s As Single 39。定義循環(huán)變量 s = 0 For i = 1 To 100 If i Mod 2 = 1 Then s = s + 1 / i Else s = s 1 / i End If Next i Print s=。 tu End If Next tu Next ji End Sub 第二套 1.下列說法錯(cuò)誤的是( ) A、程序設(shè)計(jì)就是尋求解決問題的方法,并將其實(shí)現(xiàn)步驟編寫成計(jì)算機(jī)可以執(zhí)行的程序的過程 B、程序設(shè)計(jì)語(yǔ)言的發(fā)展經(jīng)歷了機(jī)器語(yǔ)言、匯編語(yǔ)言、高級(jí)語(yǔ)言的過程 C、計(jì)算機(jī)程序就是指計(jì)算機(jī)如何去解決問題或完成一組可執(zhí)行指令的過程 D、 程序設(shè)計(jì)語(yǔ)言和計(jì)算機(jī)語(yǔ)言是同一概念的兩個(gè)方面 2.圖形符號(hào)“ ”在算法流程圖描述中表示( ) A、處理或運(yùn)算的功能 B、 輸入輸出操作 C、用來判斷條件是否滿足需求 D、算法的開始或結(jié)束 3.下面 ( )不是字符串常量。定義 i為整型變量 Dim j As Integer 39。 39。 Next j Print Next i End Sub 1編寫程序,求 y=6x5的值。完成所有操作后,按“ ctrl+s”保存 Private Sub Form_click() Dim x As Single 39。定義 y為單精度型變量,值由窗體顯示 x = val(inpubox(請(qǐng)輸入變量 x)) y = 6 * x 5 Print y=。 Private Sub Form_click() Dim s As Single 39。定義變量 s = 0 n = 0 Do n = n + 1 s = s + n Loop Until s = 500 Print n=。 s(5) End Sub 第三套 下列關(guān)于算法的說法不正確的是( ) A、其他三項(xiàng)都正確 B、算法是程序設(shè)計(jì)的“靈魂” C、解決問題的過程就是實(shí)現(xiàn)算法的過程 D、算法獨(dú)立于任何具體的語(yǔ)言, BASIC算法只能用 BASIC語(yǔ)言來實(shí)現(xiàn) 下列流程圖表示的是程序的( )基本結(jié)構(gòu)的算法 A、順序結(jié)構(gòu) B、選擇結(jié)構(gòu) C、循環(huán)結(jié)構(gòu) D、其他三項(xiàng)都不是 下列( )數(shù)據(jù)類型不是數(shù)值型 A、 Date B、 Double C、 Single D、 Integer 表達(dá)式 abs()*sqr(100)的值是( ) A、 360 B、 36 C、 360 D、 36 在 VB中,顯示和編輯程序代碼時(shí),采用( ) A、窗體設(shè)計(jì)器窗口 B、工程資源管理器窗口 C、代碼編輯窗口 D、屬性窗口 下列語(yǔ)句中定義了一個(gè)實(shí)型變量的是( ) A、其他三項(xiàng)都不對(duì) B、 dim name as string C、 dim sum as single D、 dim end as integer 下列( )函數(shù)返回系統(tǒng)的當(dāng)前時(shí)間 A、 time() B、 date() C、 day() D、 year() 能夠改變復(fù)選框中背景顏色的屬性是( ) A、 FONT B、 BACKCOLOR C、 FONTCOLOR D、 VALUE 以下是一段 VB程序: a=1 b=0 for I=1 to 5 b=b+a*I next I 它的基本結(jié)構(gòu)屬于( ) A、順序結(jié)構(gòu) B、選擇結(jié)構(gòu) C、循環(huán)結(jié) 構(gòu) D、樹型結(jié)構(gòu) 下列程序段中,循環(huán)體執(zhí)行的次數(shù)是( ) x=0 for y=1 to 10 step –1 x=x+1 next y A、 1 B、 10 C、 0 D、 4 1下列程序段運(yùn)行后, m的值為( ) a=2:b=1:c=5 if ab then m=a else m=b 語(yǔ)句塊 選 擇 no yes if cm then m=c A、 1 B、 2 C、 5 D、提示錯(cuò)誤,無(wú)答案 1閱讀下面程序,當(dāng)單擊窗體之后, m的值是( ) private sub form_click() dim m as integer:dim I as integer m=0 for I=1 to 3 m=m+2 next I print m end sub A、 0 B、 4 C、 6 D、 8 1閱讀下面程序,單擊窗體后,在文本框 text1和 text2中顯示的內(nèi)容分別是( ) private sub form_click() dim x as integer,n as integer x=1 n=0 do while x20 n=n+1 x=x*3 loop =str(x) =str(n) end sub A、 27 3 B、 3 27 C、 20 3 D、 3 21 1閱讀下面程序,單擊窗體后,在文本框顯示的內(nèi)容是( ) private sub form_click() dim a(8),b(8) as integer dim I,j as integer for j=1 to 4 a(j)=2*j