《算法與程序設計》知識點.doc

《《算法與程序設計》知識點.doc》由會員分享，可在線閱讀，更多相關《《算法與程序設計》知識點.doc（12頁珍藏版）》請在裝配圖網上搜索。

高中信息技術《算法與程序設計VB（選修）》 知識要點 相關知識點 （一）算法 1.定義 相關題解： 算法：就是解決問題的方法和步驟。算法是程序設計的“靈魂”，算法+數據結構＝程序。 單選題 1、運用計算機程序解決實際問題時，合理的步驟是（ ）。 A、設計算法→分析問題→編寫程序→調試程序 B、分析問題→設計算法→編寫程序→調試程序 C、分析問題→編寫程序→設計算法→調試程序 D、設計算法→編寫程序→分析問題→調試程序 2．算法的描述方法： 算法的描述：可分多種表達方法，一般用自然語言、流程圖和偽代碼進行描述。 自然語言描述法：指用人們日常生活中使用的語言（本國語言），用自然語言描述符合我們的習慣，且容易理解。 流程圖描述：也稱程序框圖，它是算法的一種圖形化表示方法。且描述算法形象、直觀，更易理解。 偽代碼描述法：是介于自然語言和計算機程序語言之間的一種算法描述。是專業(yè)軟件開發(fā)人員常用方法。 輸入或輸出 判斷 處理或運算 開始或結束 （二）程序設計基礎 常用高級編程語言：BASIC、VB、Pascal、C、C++、Java 面向對象的程序設計語言：其中的對象主要是系統設計好的對象，包括窗體等、控件等 控件：是指工具箱中的工具在窗體中畫出的、能實現一定功能的部件，如文本框，命令按鈕等。 常用控件： 控件 對象的類型 名字舉例 窗體 Form Form1 命令按鈕 Command button Command1 標簽 Label Label1 文本框 TextBox Text1 對象的屬性、方法和事件 1、屬性 屬性 Name 設置對象的名稱 Caption 決定控件中顯示的內容（文字） Text 決定窗體中文本框中顯示的內容(初始為空白) Height 決定控件高度 Width 決定控件寬度 TOP 決定控件的靠頂部位置 Left 決定控件的靠左邊位置 Font 設置控件中字體格式 BackColor 設置控件背景色 ForeColor 設置控件的前景色 BorderStyle 設置控件的邊框風格 Visible 決定控件是否可見 Enabled 決定控件運行時是否有效 對象名.屬性名＝屬性值 對象中屬性可以在設計界面時通過屬性窗中設置，也可以在運行時通過程序代碼設置,方法如下 例：給文本框“Txt123”的“Text”屬性賦值為字符串“20”，代碼如下 Txt123.text =”20” 變量＝對象名.屬性名 如果要獲取對象的狀態(tài)或特性，這時就要讀取對象的屬性值，方法如下 例：讀取文本框“txt123”的“Text”屬性的代碼如下 a = txt123.text ‘讀取字符 (或a=Val(txt123.text) ’讀取數值) 2、方法 ［對象］.方法［參數名表］ 例：form.print ”歡迎使用” 該語句使用print方法在form1窗體中顯示字符串“歡迎使用” 3、事件及事件驅動 事件是對象對外部操作的響應，如在程序執(zhí)行時，單擊命令按鈕會產生一個Click事件。如需要命令按鈕響應Click事件，就把完成Click事件功能的代碼寫到Click事件的事件過程中，與事件一一對應。 事件過程的形式如下： Private Sub 對象_事件名( ) ……………（事件過程代碼） End Sub 一個簡單的VB程序 求圓的周長和面積 Private Sub Command1_Click() Dim r As Single 定義r為單精度型 Dim c As Single 定義c為單精度型 Dim s As Single 定義s為單精度型 r = Val(Text1.Text) 輸入半徑r，變量r為數值型，因此輸入語句必須加函數Val() c = 2 * 3.14159 * r 計算周長 s = 3.14159 * r * r 計算面積 Text2.Text =str(c) 輸出周長 Text3.Text = str(s) 輸出面積, 變量s為數值型，因此輸出語句必須加函數str() End Sub Private Sub Command2_Click() End 退出 End Sub （三）、常量：在程序進行過程中不變的量。在VB中一般分數值常量與字符常量兩種 數值常量：就是數學中說的常數，分整型常量和實型常量兩種 整型常量：即整數，指不帶小數點的數值如1、0、-10、+35等都是合法的整數 實型常量：即實數，指帶小數點的數值。 字符串常量：被一對雙引號括起來的若干個合法的字符稱為字符串常量。例如：”China”、”Visual Basic”、”18”、”3.1415”等，雙引號中字符，不包括雙引號本身。 邏輯常量：包含true和false兩個值。 系統常量：包括VB已定義的常量（如Vbred）和用戶定義常量（如果多次用到同一個常量，則可用一個有意義的名字表示這個常量。Const pi=3.14159） （四）、變量：在程序執(zhí)行過程中，其值可以改變的量稱為變量 變量命名注意要點：1、必須以字母開頭,不能以數字或其他字符開頭。 2、只能由字母、數字或下劃線組成，不能含有小數點、空格等字符。 3、最長不超過255個字符 4、不能以VB保留字作變量名，如語句定義符dim、函數名str等。 5、VB不區(qū)分變量名中字母大小寫。如HELLO和Hello是同一個變量。 數據及運算 （1）常用數據類型：(整型)Integer、（長整型）Long、（單精度型）Single、（雙精度型）Double、（字符串型）String、（布爾型）Boolean、（日期型）Date 其中(整型)Integer、（長整型）Long、（單精度型）Single、（雙精度型）Double屬于數值型 表示范圍： (整型)Integer (-32768 —— 32767，存儲為 16 位 ， 2 個字節(jié)) （字符串型）String字符串型數據是指用 “ ”括起來的一串字符。如“歡迎進入VB世界！”、“ Visual Basic” 、“1234 ”都是字符串類型。 （2）常量和變量的命名、聲明及賦值 符號常量的聲明：Const 常量名= 常量值 如：Const pi = 3.14159 常量名為pi 變量的聲明： Dim <變量名 >As <變量類型> 如：Dim a As Integer 定義一個整型變量，變量名為a 變量的賦值 　 變量名 = 表達式　 例題 Private Sub Form_Click() Dim a As Integer, b As Integer, c As Integer Dim str_1 As String a = 54 : b = 114 : c = a + b str_1 = "Hello World" Print a,b,c Print str_1 End sub 2、VB語言中，下列數據類型說明符中表示字符型的是（ ）。 A、Boolean B、Integer C、Date D、String 3、在VB 語言中，下列合法的變量名是（ ）。 A、34ab B、ab34 C、*abc D、c\c 4、下列選項中屬于字符串常量的是（ ）。 A、ab B、a+b C、"1235" D、1235 5、在VB 語言中，下列合法的變量名是（ ）。 A、aa B、a*b C、7ab D、dim （五）運算符 算術運算： + 加 -- 減 *乘 ^ 冪 　　　　　　 例：2^2 = 4 / （實數）除 　　　例：5 / 2 = 2.5 \ 整除 　　　　　例： 5 \ 2 = 2 Mod 求余數 　　　　例：5 Mod 2 = 1 單選題 6、分析下列程序: Private Sub Form_Click() s=11\3 + 11 Mod 3 Print s End Sub 當單擊窗體時s的值是( ). A、5 B、6 C、4 D、3 關系運算 =　　　賦值　、　　　　<　　小于號 <>　　不等于　　　　　　>　　大于號 >=　　大于等于號　　　　<= 小于等于號 注意：關系表達式的運算結果為布爾值True 或 False 例：3 > 2 結果為 True(真或是) 7、下面表達式的值是false的有( ). A、"969" < "n97" B、Int(4.99) <> len("basic") C、str(2000) < "1997" D、3 > 2 邏輯運算 Not（取反）And（與） Or（或） 運算結果為布爾型（Boolean）True 或 False 邏輯運算符的優(yōu)先級為：Not > And > Or 8、下列邏輯表達式的值為“假”的是（ ）。 A、2 + 4 > 8 B、3 + 12 = 15 C、5 > 0 And 4 > 3 D、10 / 5 <3 9、下列邏輯表達式的值為“假”的是（ ）。 A、3 + 5 > 7 B、8 / 4 < 4 C、5 > 3 And 3 > 2 D、4 + 11 > 20 10、已知A，B，C，D 是簡單變量，且都已有互不相同的值，執(zhí)行語句A=C: D=B 后，下列 關系表達式邏輯值為“真”的是（ ） 。 A、C=A B、A=B C、D=C D、B=C 11、設a=2, b=3,在VB中，表達式a>b Or b>3值是:( ) A、False B、True C、-1 D、1 字符運算 字符串連接符為“+”和“&” “123” + “45” = “12345” “123” & “45” = “12345” 123 + “45” 語法錯誤 12、VB的字符串運算符是“&”，該運算符主要用于連接兩個或更多的字符串。如："abcd" & "efg" 連接后的運算結果為："abcdefg"。那么，"1+2" & "3"的運算結果為：（ ）。 A、33 B、6 C、"1+23" D、True 運算符的執(zhí)行順序 在VB中，當一個表達式中同時出現多種運算符時，運算次序由運算符的優(yōu)先級決定，優(yōu)先級高的運算符先運算，優(yōu)先級相同的從左向右進行運算。不同性質的運算符優(yōu)先級如下。 算術運算符 > 字符串運算符 > 關系運算符 > 邏輯運算符 13、在VB語言中，表示“a大于0且b小于12”的正確表達式是（ ）。 A、b<12 or a > 0 B、b > 12 And a < 0 C、a > 12 Or a < 0 D、a > 0 And b < 12 （六）常用函數 數學函數 Abs(x) 求x 的絕對值，例：abs(-3.6) = 3.6 Sqr(x) 求 x 的平方根，例：sqr(100) = 10 Int(x)求≤x的最大整數 例：int(3.6) = 3 int(--3.6) = --4 Rnd()產生[0，1)之間的隨機小數（不包括1） Sin(x) Cos(x) Tan(x) Atn(x) Exp(x) Log(x) 使用三角函數時，參數應是弧度，如數學中sin300應寫為：sin(30*3.14159/180) 字符串函數 Len(字符串) 求字符串的長度 ,例：Len(“hello”) = 5 Mid(字符串，起始位置，截取長度) ,例：Mid(“hello”,2,2) = “el” 14、 函數mid (C,N1,N2)的作用是從字符串C中N1位開始取出長度為N2 的子串。那么， Mid ("aBcDeFg", 3, 3)的值為（ ）。 A、aBc B、cde C、eFg D、cDe 常用轉換函數 Val(字符串) 將字符串轉換為數值,常用于數值的輸入語句中。例：Val(“123”)=123 Str(數值) 將數值轉換為字符串，常用于數值的輸出語句中 Chr(在ASCII表中取數值對應的字符) 例：chr(65)=”A” Asc(求字符在ASCII表中的數值) 例：asc(“a”)=97 15、Visual Basic中，下列( )函數是求絕對值的。 A、ABS（X） B、SQR(X） C、INT（X） D、STR（X) 16、表達式Abs(-3.6)*sqr(100)的值是( )。 A、-36 B、360 C、36 D、-360 17、下列( )數據類型不是數值型。 A、Date B、Single C、Double D、Integer 18、下列函數中，返回值是字符串的是 ( ). A、Mid B、Int C、Val D、Len 19、代數表達式表達式后錯誤的是( ) A、g*t*t/2 B、1/2*g*t^2 C、g*t^2/2 D、gt^2/2 20、數學式子在VB中的正確寫法是：（ ） A、(2*a+b)/4*a*b B、(2*a+b)/(4ab) C、(2a+b)(4ab) D、(2*a+b)/(4*a*b) 21、判斷x是否在區(qū)間[a, b]上，在VB中以哪個邏輯表達式是正確的( ) A、ax and x<=b (七) 程序設計的順序結構 順序結構：代碼按照由上到下的順序一行一行地執(zhí)行。程序執(zhí)行過程中沒有分支、沒有重復，這種結構稱為順序結構。 例題：交換兩個變量中的數據。 Private Sub cmdSwap_Click() Dim x As Single, y As Single Dim m As Single x = Val(txtsx.Text) y = Val(txtsy.Text) m = x: x = y: y = m 交換數據 txtdx.Text = Str(x) txtdy.Text = Str(y) End Sub 牢記以上代碼中的數值型數據的輸入和輸出語句?。。。? 22、以下是一段VB程序： a = 1 b = a + 1 c = a + b 它的基本結構屬于（ ） A、順序結構 B、選擇結構 C、循環(huán)結構 D、樹型結構 23、下列VB程序運行后，變量x的值為( ). x=2 Print x+l Print x+2 A、2 B、3 C、5 D、8 (八)程序設計的分支結構 行If語句 行If是指在一行中寫完的If語句。其一般格式為： 格式一：If條件Then語句 執(zhí)行這種形式的If語句時，首先對條件進行判斷。若條件成立，則執(zhí)行Then后面的語句；若條件不成立，則執(zhí)行If語句后繼程序行的語句 格式二：If條件 Then 語句 1 Else 語句 2 例題：輸入三個不相同的數，求出其中最小數。 Private Sub Form_Click() Dim a As Single, b As Single, c As Single Dim Min As Single a = InputBox("輸入a", "輸入框") b = InputBox("輸入b", "輸入框") c = InputBox("輸入c", "輸入框") If a < b Then Min = a Else Min = b If c < Min Then Min = c Print "最小數＝"; Min End Sub 執(zhí)行這種形式的語句時，先進行判斷。若條件成立，則執(zhí)行語句1；否則執(zhí)行語句2。必須寫在一行內，不能換行，沒有End If 塊If語句 上述If-then語句只能根據條件的真假是否執(zhí)行一條語句，當Then部分和Else部分包含的內容較多時，則可選用“塊If語句”結構。 格式三：If 條件 Then 語句塊 End If 例題：當從輸入一個數時，當該數大于或等于60時顯示"及格"，該數小于60時顯示"不及格"。 Private Sub Command1_Click() Dim a As Single a = Val(Text1.Text) If a >= 60 Then Label1.Caption = "及格" End If If a < 60 Then Label1.Caption = "不及格" End If End Sub {這樣的格式是不是太麻煩了，所以請選用格式四，自己改過來吧！} 格式四：If 條件 Then 語句塊1 Else 語句塊2 End If 例題：編寫程序，求函數Y的值（當x≤0時，y=3x+1；當x>0時，y=4x+1）。 Private Sub Form_Click() Dim x As Single Dim y As Single x = Val(InputBox("請輸入變量x")) If x <= 0 Then y = 3 * x + 1 Else y = 4 * x + 1 End If Print "y="; y End Sub 單選題 24、以下是一段Visual Basic程序: If I=1 Then X=X+1 Else X=X*2 End If 它的基本結構屬于( ). A、選擇結構 B、循環(huán)結構C、順序結構D、樹型結構 25、下列程序段運行后，變量Value的值是（ ） x = 20 If x >= 10 Then Value = 5 * x Else Value = 4 * x End If A、100 B、80 C、90 D、70 26、下面是判斷變量x是不是能被5整除的偶數的程序，橫線上的邏輯表達式應為( ) Private Sub commandl_Click() Dim x As Integer x=Val(Text1. Text) If Then Labell.Caption=”這個數是能被5整除的偶數” Else Labell.Caption=”這個數不是能被5整除的偶數” End If 選項： A、(x Mod 5) = 0 And (x Mod 2 ) = 0 B、(x Mod 5) = 0 or (x Mod 2 ) = 0 C、x Mod 5 = 0 D、x Mod 2 = 0 27、下列程序段運行后,m的值為( ) A=2: b=1: c=5 If A < b Then m = A Else m = b If c < m Then m = c A、1 B、2 C、5 D、提示錯誤，無答案 （九）程序設計的循環(huán)結構 1、For-Next循環(huán) For循環(huán)變量一般形式是： For循環(huán)變量=初值To終值[Step循環(huán)變量增量] 循環(huán)體 Next循環(huán)變量 例題1：求s＝1+2+3+4.....+100 Private Sub Command1_Click() Dim i As Integer Dim sum As Integer sum = 0 For i = 1 To 100 sum = sum + i 循環(huán)體 Next i Text1.text=str( sum) End Sub ‘注意這里累加器的應用 例題2：Step循環(huán)變量增量 Private Sub Command_Click() For j = 3 To 15 Step 2 Print j ‘共輸出7個值 Next j End Sub ‘變量j=3 5 7 9 11 13 15 17 循環(huán)7次，j最后的值為17不算在循環(huán)中。 循環(huán)變量的初值、終值、循環(huán)變量增量都是數值型。其中要重復執(zhí)行的操作稱為循環(huán)體，增量可正可負，如果沒有設置Step，則增量的缺省值為1 1、 循環(huán)變量取初值； 2、 循環(huán)變量與終值比較，沒有超過終值轉3，否則循環(huán)結束，接著執(zhí)行循環(huán)語句的后繼語句； 3、 執(zhí)行一次循環(huán)體 4、 循環(huán)變量增加一個增量 5、 重復步驟2~4。 以上可以看出，For-Next循環(huán)變量是一種當型循環(huán)。說明 （a） For語句與Next語句必須成對出現，而且它們當中的“循環(huán)變量”必須是同一個變量，如上例中均為I。 （b） 當循環(huán)變量為正時，循環(huán)變量超過終值，是指循環(huán)變量的值大于終值時；若為負，則是指循環(huán)變量的值小于終值。 A P 入口 出口 2、Do－Loop循環(huán) For-Next循環(huán)的次數是確定的，但是有的問題只知道循環(huán)結束的條件，重復執(zhí)行的次數事先并不知道，這是需要Do-Loop循環(huán) 格式一：　Do While 條件 　　　　　　　循環(huán)體 　　　　　Loop 例題：求最大公約數 Private Sub Command1_Click() Dim a,b,r As Integer a = Val(Text1.Text) b = Val(Text2.Text) r = a Mod b Do While r <> 0 a = b b = r r = a Mod b Loop Text3.Text = Str(b) End Sub 當VB執(zhí)行Do While-Loop循環(huán)時，先判斷指定的條件是否為真，若條件為真，執(zhí)行循環(huán)體，條件為假時退出循環(huán)。 28、下列程序段執(zhí)行結束后，變量y的值是（ ）。 y=2 Do while y<=6 y=y+y Loop A、2 B、6 C、8 D、16 29、分析程序，寫出執(zhí)行結果。 Private Sub command1_click() Dim S As Integer,I As Integer S=0 For i=1 to 10 Step 2 S=S+i Next i Print “S=”;s End Sub 答案：S= （十）算法與問題解決 1、解析法 利用所學的數學或物理等知識來求解一個問題。 2、枚舉法 對所有可能的情況都逐一列舉和判斷。外循環(huán)分支的結構。 簡單理解一下程序思想及代碼(部分程序請補充完整代碼) (1) 一只猴子摘了一堆桃子，它每天吃當天桃子數的一半，每次忍不住多吃了一個。這樣到第十天時只有一個桃子可以吃了，編程計算猴子最初共有多少個桃子。 程序： Private Sub Command_Click() Dim i As Integer Dim s As Integer s = 1 For i =1 To 9 s = (s + 1)*2 Next Print “s=”;s End Sub (2) 完善按鈕“計算7!”的Click事件程序，當單擊命令按鈕時Text1顯示7!的值。 Private Sub Command1_Click( ) Dim a As long Dim i As Integer (30) For i = 1 To 7 a = a * i Next i (31) End Sub 這里輸入值太大容易“溢出”，可以更改變量a的類型為double (3) "計算1+2+……+100" Private Sub Command1_Click( ) Dim a As Integer Dim I As Integer a = 0 For i = 1 To 100 a = a + i Next i Text2.Text = Str(a) (4) 編程計算 s=1-2+3-4+5-……+99-100 程序： Private Sub command1_Click() Dim s As Integer 定義變量s為整型變量 Dim i As Integer 定義循環(huán)變量 (32) For i=1 To 100 if int(i/2) <> i/2 Then ‘判斷奇數，也可以使用語句“ i mod 2 <> 0 ” s = s + i (33) s = s - i End if Next i Print "s=";s End Sub (5) 編程計算s = 1*2+2*3+3*4+……+n*(n+1)的值，其中n 通過文本框txta輸入 Private Sub Form_Click() Dim s As Single Dim i As Integer s = 0 （34） For i = 1 To n (35) Next i Print “s=”;s End Sub (6) 編程求:雞和兔在一個籠里，共有腿100條，頭40個，問雞有幾只，兔有幾只? 程序： Private Sub Form Click() Dim Ji As Integer 雞 Dim Tu As Integer 兔 Dim Leg As Integer 腿數 Dim Head As Integer 頭數 For Ji=1 To 50 For Tu=1 To 25 Leg = Ji*2 + Tu*4 計算腿 計算頭 (36) If Then (37) Print "雞=";Ji;"只", "兔=";Tu;"只" End If Next Tu Next Ji End Sub B D B C A A C A D A A C D D A C A A D D C A A A A A A C 25 a=1 text1.text=str(a) s=0 else n=val(txta.text) s=s+i*(i+1) head=ji+tu leg=100 and head=40