程序設(shè)計(jì)程序控制結(jié)構(gòu)與算法基礎(chǔ)

1、第4章 算法基礎(chǔ)及Visual Basic的基本語句,第4章 程序控制結(jié)構(gòu)與算法基礎(chǔ),賦值語句,執(zhí)行過程：首先計(jì)算等號(hào)右邊表達(dá)式的值。然后將此值保存到等號(hào)左邊的變量中。var可以是變量名（如：student）或?qū)傩悦?如text1.text)?！?”是賦值號(hào)，不是數(shù)學(xué)中的等號(hào)。變量中的值以最近一次賦值為準(zhǔn)。,賦值語句的形式：var=,T=A A=BB=T上述三條語句實(shí)現(xiàn)什么功能？,賦值語句舉例,A=1A=A+1,

2、B=3B=B*4,A=1A=2,x=“This is a book” Number%=72Label1.FontSize=8Y=(a+b)/2,A,B,T,,,,1,2,3,T為中間變量,賦值語句舉例,思考：如何實(shí)現(xiàn)三個(gè)數(shù)交換，即A的值給B，B的值給C，C的值給A？,不同數(shù)據(jù)類型數(shù)據(jù)的賦值,數(shù)值類型Integer、LongSingle、DoubleByte,邏輯型Boolean,字符串型String,Dim b

3、As Boolean, n As Integer, s As String, m As Singleb = 0 將整型數(shù)據(jù)賦值給邏輯型變量b為Falseb = 2 將整型數(shù)據(jù)賦值給邏輯型變量b為Truen = b 將邏輯型數(shù)據(jù)賦值給整型變量n為-1s = b 將邏輯型數(shù)據(jù)賦值給字符串變量s為“True”m = -1012.567s = m 將數(shù)值數(shù)據(jù)賦值給字符串變量s為“

4、-1012.567”n = “12” 將字符串?dāng)?shù)據(jù)賦值給整型變量n為12n = “12abc” 將字符串?dāng)?shù)據(jù)賦值給整型變量（出錯(cuò)）n = “asds” 將字符串?dāng)?shù)據(jù)賦值給整型變量（出錯(cuò)）b = “12” 將字符串?dāng)?shù)據(jù)賦值給邏輯型變量b為Trueb = “0” 將字符串?dāng)?shù)據(jù)賦值給邏輯型變量b為Falseb = "asds" 將字符串?dāng)?shù)據(jù)賦值給邏輯型變量（出錯(cuò)）,下列語句的執(zhí)行結(jié)果是什么

5、？,Dim A As IntegerA=2=3Print A,Dim A As IntegerA=2=2Print A,Dim S As StringDim A As IntegerS=2*A>2Print S,Dim A As IntegerDim B As IntegerA=B=2Print A,B,分支結(jié)構(gòu)與分支結(jié)構(gòu)語句,If e Then A組語句Else B組語句En

6、d If,If e Then A Else B,當(dāng)A和B都為一條語句時(shí),,等價(jià),執(zhí)行過程：計(jì)算e的值并轉(zhuǎn)換成Boolean類型。若e為True則執(zhí)行A組語句，否則執(zhí)行B組語句。,If e Then A組語句End If,If e Then A,當(dāng)A為一條語句時(shí),,等價(jià),不對稱分支結(jié)構(gòu),多分支語句形式1,If e1 Then A1組語句ElseIf e2 Then A2組語句ElseIf e3 Then

7、 A3組語句…Else 語句組AnEnd If,Select Case eCase e1 A1組語句Case e2 A2組語句Case e3 A3組語句…Case Else An組語句End Select,多分支語句形式2,e為測試表達(dá)式，可以是算術(shù)表達(dá)式或字符表達(dá)式。e1~en為測試項(xiàng)，可以是具體取值連續(xù)的數(shù)據(jù)范圍條件表達(dá)式三者的組合(用逗號(hào)隔開，注意它們是或

8、者的關(guān)系),分支語句結(jié)構(gòu)舉例,輸入一個(gè)數(shù)，判斷是奇數(shù)或偶數(shù)、正數(shù)或負(fù)數(shù)輸入一個(gè)1-1000之間的數(shù)，判斷是幾位數(shù)。輸入一個(gè)字符，判斷是大寫字母、小寫字母、數(shù)字或其他。輸入一個(gè)年份，判斷是否為閏年。凡是能被400整除的年份為閏年。如2000年凡是不能被100整除，但能被4整除的年份為閏年。如2008年輸入一個(gè)月份，輸出該月的天數(shù)。已知三角形三條邊的長度，求三角形的面積。已知一元二次方程的三個(gè)系數(shù)，求方程的根。,For-Ne

9、xt循環(huán),格式：For V=E1 To E2 [Step E3] …… [Exit For] ……Next V,執(zhí)行過程：計(jì)算E1、E2、E3的值。給V賦初值。判別V超出E2,若為True則執(zhí)行循環(huán)體，然后轉(zhuǎn)第4步，否則退出循環(huán)。V增加一個(gè)步長，轉(zhuǎn)到第3步。,,V為Integer或Single步長可正可負(fù)。遵循“先檢查，后執(zhí)行”的原則。步長為正，初值大于終值時(shí)不執(zhí)行循環(huán)。步長為負(fù)，初值小于終值時(shí)不執(zhí)

10、行循環(huán)。Next V表示V=V+E3正常循環(huán)次數(shù)為：Int((E2-E1)/E3)+1,For V=E1 To E2 [Step E3] …… [Exit For] ……Next V,編程練習(xí),求N!,求1+2+3+…+N的值,將字符串逆序輸出。如:將ABCDEFG變?yōu)镚FEDCBA,篩選出字符串中的大寫字母。如:輸入abDS23KG，輸出DSKG,編程練習(xí),生成20個(gè)1到100之間的隨機(jī)數(shù)，統(tǒng)計(jì)其中1位數(shù)、

11、2位數(shù)和3位數(shù)的個(gè)數(shù)。輸入一個(gè)字符串，統(tǒng)計(jì)其中大寫字母、小寫字母以及數(shù)字的個(gè)數(shù)。輸入一個(gè)字符串，將其中的大寫字母改為小寫字母，小寫字母改為大寫字母。輸入一段英文文本，查找某單詞出現(xiàn)的次數(shù)。求一個(gè)整數(shù)的各位上的數(shù)字之和。,輸入一個(gè)自然數(shù)，判斷其是否為素?cái)?shù)。 (三種算法) 輸入一個(gè)自然數(shù)，判斷其是否為回文數(shù)。(兩種算法) 輸入一個(gè)自然數(shù)，判斷其是否為升序數(shù)。如123 找出100之內(nèi)的所有勾股數(shù)。勾股數(shù)：滿足條件a2+b2=c

12、2(a<b) 如：3 4 5 輸入一個(gè)正整數(shù)，判斷其是否是完全數(shù)。完全數(shù)：該數(shù)的因子（不包含本身）之和等于其本身。如：28=1+2+4+7+14 找出2~999之間所有的同構(gòu)數(shù)。同構(gòu)數(shù)：該數(shù)出現(xiàn)在它的平方數(shù)的右邊。如：5—25， 6—36， 25—625 輸入兩個(gè)正整數(shù)M和N，求它們的最小公倍數(shù)。,循環(huán)結(jié)構(gòu)與循環(huán)結(jié)構(gòu)語句,當(dāng)型循環(huán)當(dāng)條件成立就執(zhí)行循環(huán)體。,直到型循環(huán)執(zhí)行循環(huán)體直到條件成立。,Do-Lo

13、op循環(huán)(4種形式),Do While e … [Exit Do] …Loop,Do … [Exit Do] …Loop While e,Do Until e … [Exit Do] …Loop,Do … [Exit Do] …Loop Until e,,當(dāng)型循環(huán),直到型循環(huán),常用,常用

14、,需要熟記歐幾里得算法,求兩個(gè)自然數(shù)的最大公約數(shù)----歐幾里得算法,1、輸入兩個(gè)自然數(shù)m,n2、r=m mod n3、若r=0，則n為m的最大公約數(shù)4、若r≠0，則m=n，n=r5、重復(fù)執(zhí)行第二步,M=90 n=48R=90 Mod 48=42M=48 n=42R=48 Mod 42=6M=42 n=6R=42 Mod 6=0最大公約數(shù)為6,牛頓迭代法：已知X0以及一個(gè)很小的數(shù)Eps，求F

15、(x)=0在X0附近的根。利用迭代公式Xn+1=Xn — F(Xn) / F ’(Xn) n=0,1,2,3……,F(x)=xex-1導(dǎo)函數(shù)：F’(x)= ex+xex = ex(x+1),Do 循環(huán)用于控制循環(huán)次數(shù)未知的循環(huán)結(jié)構(gòu)For 循環(huán)用于控制循環(huán)次數(shù)預(yù)知的循環(huán)結(jié)構(gòu),For 循環(huán),Do 循環(huán),循環(huán)嵌套,循環(huán)體內(nèi)又包含循環(huán)語句。,內(nèi)循環(huán)變量與外循環(huán)變量不能同名。外循環(huán)必須完全包含內(nèi)循環(huán)，不能交叉。,隨機(jī)函數(shù)Rnd(),格式

16、Rnd[(Number)]生成區(qū)間[0，1）的一個(gè)小數(shù)Number0：得到隨機(jī)序列的下一個(gè)隨機(jī)數(shù)（缺?。㎞umber=0：返回上一次生成的隨機(jī)數(shù)Randomize語句：根據(jù)系統(tǒng)計(jì)時(shí)器得到種子數(shù)Int((b-a+1)*Rnd)+a：得到[a,b]區(qū)間中的隨機(jī)整數(shù),13. 求滿足條件:1+2+3+4+……+N>1000的最小N。14. 求滿足條件:1+2+3+4+……+N<2000的最大N。15. 計(jì)算表達(dá)式,的