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

1、第4章 算法基礎(chǔ)及Visual Basic的基本語句,第4章 程序控制結(jié)構(gòu)與算法基礎(chǔ),賦值語句,執(zhí)行過程：首先計算等號右邊表達(dá)式的值。然后將此值保存到等號左邊的變量中。var可以是變量名（如：student）或?qū)傩悦?如text1.text)?！?”是賦值號，不是數(shù)學(xué)中的等號。變量中的值以最近一次賦值為準(zhǔn)。,賦值語句的形式：var=,T=A A=BB=T上述三條語句實現(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為中間變量,賦值語句舉例,思考：如何實現(xiàn)三個數(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ù)賦值給整型變量（出錯）n = “asds” 將字符串?dāng)?shù)據(jù)賦值給整型變量（出錯）b = “12” 將字符串?dāng)?shù)據(jù)賦值給邏輯型變量b為Trueb = “0” 將字符串?dāng)?shù)據(jù)賦值給邏輯型變量b為Falseb = "asds" 將字符串?dāng)?shù)據(jù)賦值給邏輯型變量（出錯）,下列語句的執(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都為一條語句時,,等價,執(zhí)行過程：計算e的值并轉(zhuǎn)換成Boolean類型。若e為True則執(zhí)行A組語句，否則執(zhí)行B組語句。,If e Then A組語句End If,If e Then A,當(dāng)A為一條語句時,,等價,不對稱分支結(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為測試項，可以是具體取值連續(xù)的數(shù)據(jù)范圍條件表達(dá)式三者的組合(用逗號隔開，注意它們是或

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

9、xt循環(huán),格式：For V=E1 To E2 [Step E3] …… [Exit For] ……Next V,執(zhí)行過程：計算E1、E2、E3的值。給V賦初值。判別V超出E2,若為True則執(zhí)行循環(huán)體，然后轉(zhuǎn)第4步，否則退出循環(huán)。V增加一個步長，轉(zhuǎn)到第3步。,,V為Integer或Single步長可正可負(fù)。遵循“先檢查，后執(zhí)行”的原則。步長為正，初值大于終值時不執(zhí)行循環(huán)。步長為負(fù)，初值小于終值時不執(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個1到100之間的隨機數(shù)，統(tǒng)計其中1位數(shù)、

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

12、2(a<b) 如：3 4 5 輸入一個正整數(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 輸入兩個正整數(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、,需要熟記歐幾里得算法,求兩個自然數(shù)的最大公約數(shù)----歐幾里得算法,1、輸入兩個自然數(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以及一個很小的數(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)，不能交叉。,隨機函數(shù)Rnd(),格式

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