【正文】
結果:(8分,每空4分) Private Sub Form_Activate( ) Dim p As Integer, i As Integer p = 1 For i = 1 To 5 p = p + i Next i Print “I P分別為:”。 i, p End Sub輸出結果:I P分別為:____________,____________ 6 169. Private Sub Command1_Click( ) Dim a As Integer, b As Integer a = 1 : b = 0 Do While a = 5 b = b + a * a a = a + 1 Loop Print a, b End Sub 運行結果:______________ _______________ 6 5510.小華從今年開始為“希望工程”存錢,計劃今年存入100元錢,第二年存入200元錢,第三年存入300元錢……依此類推,問:20年時間你將為“希望工程”存入多少錢?sum+n*10011.補全流程圖:編制VB程序,在界面上輸入一個不為零的自然數(shù),判斷它是否是質數(shù)。(6分)i=i+112.寫程序結果: Text2 = “34” a = ( Val ( Text2 ) – 32 ) * 5 / 2 Print a答案:____________ 5四、算法題分析題:我們在用計算機解決問題時,常采用的算法有解析法、窮舉法、遞歸法、冒泡排序法、選擇排序法等,分析下列問題應采用哪種算法解決?求解“百雞問題”:已知公雞每只3元,母雞每只5元,小雞每3只1元。用100元買100只雞,問每種雞應各買多少? 答案:___________________ 窮舉法國內(nèi)特快專遞每200克為一個計費單位,200克以內(nèi)20元,200克以上每續(xù)重200克(不足200克按200克計算)6元,現(xiàn)在要編寫一個程序輸入包裹重量自動計算出價格。解決上述問題,哪種算法最合適? 答案:___________________ 解析法已知:f(1)=1,f(2)=3當n2時,f(n)=2f(n1)+3f(n2)編程求f(100)的值。 解決上述問題,哪種算法最為合適? 答案:___________________ 遞歸法在學校舉辦的運動會中,要對運動員成績進行公布,現(xiàn)在要求寫一個程序自動完成成績編排,請問最好采用哪種算法解決?答案:_______________________ 冒泡排序法5.如”ab”+”cd”的結果是 abcd 那么”27”+”23”的運算結果是: 2723 6.要實現(xiàn)變量M 與變量 N 的值進行交換,可用語句:( )7.下列程序執(zhí)行后,A,B的值是:( 40,30 ) A=30;B=40;A=A+B;B=AB;A=AB;8.VB語言中,表示整型數(shù)的是( ),邏輯型的是( ),字符串型的是( ),實數(shù)型的是( ).一玻璃球從高空做自由落體運動,在達到地面時速度為98m/s,問:該玻璃球從高空開始落到地面用了多少時間? jiexi一張單據(jù)上有一個5位數(shù)的號碼67口口8,其中百位和十位上的數(shù)字看不清楚了,但知道該數(shù)能夠被78整除,也能被67整除。設計一個算法求出該號碼。 qiongjuqiongju直角三角形一條直角邊長是24cm,其余的邊長都是正整數(shù),而且斜邊的長度不超過50cm,求出所有滿足條件的三角形。__________________