1、電子教案電子教案目目 錄錄VFoxVFox基本知識基本知識控制結(jié)構(gòu)及程序設計控制結(jié)構(gòu)及程序設計應用舉例應用舉例第一講第一講 VFoxVFox基本知識基本知識3clears=0for i=1 to 100 s=s+iendfor? “s=”,sreturn 例例1 編程求編程求 1+2+3+100初始化部分初始化部分數(shù)據(jù)處理數(shù)據(jù)處理(循環(huán)循環(huán))部分部分輸出部分輸出部分結(jié)束語句結(jié)束語句 程序：程序：是計算機能夠分析執(zhí)行的命令序列的集合。是計算機能夠分析執(zhí)行的命令序列的集合。 程序設計：程序設計：是計算機用戶將解決某一實際問題所用是計算機用戶將解決某一實際問題所用的命令按一定的邏輯順序編制成程序，并

2、以文件的形式的命令按一定的邏輯順序編制成程序，并以文件的形式存放于磁盤的過程。執(zhí)行程序時，計算機按順序自動執(zhí)存放于磁盤的過程。執(zhí)行程序時，計算機按順序自動執(zhí)行程序文件中的命令。行程序文件中的命令。1.1 程序的概念程序的概念4字符型：字符型：英文、漢字、數(shù)字、空格和標點符等組成的一串字符英文、漢字、數(shù)字、空格和標點符等組成的一串字符1.2 VFox語言基礎語言基礎數(shù)據(jù)類型數(shù)據(jù)類型字符型字符型( (字符串字符串) )：其表示方法用定界符將字符串括起來，定界符有其表示方法用定界符將字符串括起來，定界符有、 和和 。注意，這些定界符必須配對使用，注意，這些定界符必須配對使用，常量常量變量變量5運算符

3、及表達式運算符及表達式6常用函數(shù)常用函數(shù)補充補充: :隨機函數(shù)隨機函數(shù)RAND 格式：格式：RAND(N) 功能：功能：系統(tǒng)產(chǎn)生一個純小數(shù)系統(tǒng)產(chǎn)生一個純小數(shù)(01) N=0每次產(chǎn)生一個不同的純小數(shù)每次產(chǎn)生一個不同的純小數(shù)，默認為，默認為0 0N=1每次產(chǎn)生一個相同的純小數(shù)每次產(chǎn)生一個相同的純小數(shù) 例：隨機生成一個例：隨機生成一個60到到250內(nèi)的整數(shù)。內(nèi)的整數(shù)。 ? Int(60+rand()*190) 隨機生成兩個兩位整數(shù)，并相減。隨機生成兩個兩位整數(shù)，并相減。 a=(10+Int(rand()*90) b= (10+Int(rand()*90) ? a-b781.3 Vfox程序設計基本語

4、句程序設計基本語句賦值語句賦值語句賦值語句賦值語句數(shù)組定義語句數(shù)組定義語句顯示顯示輸出語句輸出語句9 INPUT輸入語句輸入語句 ACCEPT輸入語句輸入語句 其它語句其它語句 clear 清屏清屏 retrun返回返回 cancel 終止終止第二講第二講 控制結(jié)構(gòu)及程序設計應用舉例控制結(jié)構(gòu)及程序設計應用舉例10程序流程圖程序流程圖:以特定的圖形符號加上說明，表示以特定的圖形符號加上說明，表示算法的圖，稱為算法的圖，稱為流程圖流程圖或或框圖框圖。規(guī)則：從上到下，從左到右。規(guī)則：從上到下，從左到右。符號及其意義：符號及其意義：流程線流程線處理框處理框判斷框判斷框I/O框框順序結(jié)構(gòu)：順序結(jié)構(gòu)：就是

5、計算機要按照程序中語句出現(xiàn)的先后次序依次執(zhí)行各條語句的結(jié)構(gòu)。就是計算機要按照程序中語句出現(xiàn)的先后次序依次執(zhí)行各條語句的結(jié)構(gòu)。順序結(jié)構(gòu)是程序設計中最常見、使用最多的結(jié)構(gòu)。順序結(jié)構(gòu)是程序設計中最常見、使用最多的結(jié)構(gòu)。2.1 順序結(jié)構(gòu)順序結(jié)構(gòu)clearinput “請輸入圓的半徑：請輸入圓的半徑：” to r s=3.14159*r*r? “圓面積圓面積s=”, sreturn 例例2 編程求圓面積編程求圓面積AB入口入口出口出口112.2 選擇結(jié)構(gòu)選擇結(jié)構(gòu)條件判斷條件判斷雙雙(單單)分支選擇格式：分支選擇格式：IF THEN ELSE EDNIF條件條件真真序列序列1假假序列序列2入口入口出口出口

6、說明：說明：IF和和ENDIF必須成對出現(xiàn)，否則程序?qū)o必須成對出現(xiàn)，否則程序?qū)o法執(zhí)行。法執(zhí)行。在在IFELSEENDIF中，還可嵌套中，還可嵌套IFELSEENDIF命令。命令。例例3 3 判斷某一年是否是潤年。判斷某一年是否是潤年。clearinput “請輸入年份請輸入年份:” to yif y/4=int(y/4) .and. y/100int(y/100) .or. y/400=int(y/400) ?y,”是閏年是閏年”else ?y,”不是閏年不是閏年”endifcancel潤年條件潤年條件: :如是潤年則能被如是潤年則能被4 4整除但不能被整除但不能被100100整除，整除，

7、或能被或能被400400整除。整除。12多分支選擇格式：多分支選擇格式：DO CASE CASE 邏輯表達式邏輯表達式1 命令序列命令序列1 CASE 邏輯表達式邏輯表達式2 命令序列命令序列2 CASE 邏輯表達式邏輯表達式n 命令序列命令序列N OTHERWISE 命令序列命令序列ENDCASE邏邏1真真序列序列1假假邏邏2真真序列序列2出口出口假假邏邏n真真序列序列N假假序列序列說明：說明：從第一個條件開始，當找到一個邏輯表達式的值為從第一個條件開始，當找到一個邏輯表達式的值為.T.時，就執(zhí)行緊跟其后的命時，就執(zhí)行緊跟其后的命令序列，直到下一個令序列，直到下一個CASE或者或者ENDCA

8、SE語句為止，并跳出語句為止，并跳出DO CASE語句。語句。如果所有如果所有CASE語句后的邏輯表達式的值都為語句后的邏輯表達式的值都為.F.，此時，如果有，此時，如果有OTHERWISE子句，子句，則執(zhí)行則執(zhí)行OTHERWISE后面的命令序列。如果沒有后面的命令序列。如果沒有OTHERWISE子句，就退出該結(jié)構(gòu)子句，就退出該結(jié)構(gòu)執(zhí)行執(zhí)行EDNCASE語句后面的語句，如圖所示。語句后面的語句，如圖所示。13例例4 輸入一個成績，將百分制轉(zhuǎn)化為五分制。輸入一個成績，將百分制轉(zhuǎn)化為五分制。CLEARINPUT “請輸入學生成績：請輸入學生成績：” TO scDO CASE CASE sc=90

9、? “優(yōu)秀優(yōu)秀” CASE sc=80 ? “良好良好” CASE sc=70 ? “中等中等” CASE sc=60 ? “及格及格” OTHERWISE ? “不及格不及格”ENDCASEcancel142.3 循環(huán)結(jié)構(gòu)循環(huán)結(jié)構(gòu)程序經(jīng)常會重復執(zhí)行某些相同的操作，如：程序經(jīng)常會重復執(zhí)行某些相同的操作，如：求：求：s=1+2+3+4+100算法描述：算法描述：s=0;i=1;s+=i; i+;判斷判斷i是否小于等于是否小于等于100 如果如果i小于等于小于等于100，重復，重復； 否則，結(jié)束。否則，結(jié)束。 此類根據(jù)某個條件重復執(zhí)行相同算法的結(jié)構(gòu)，稱為循環(huán)。此類根據(jù)某個條件重復執(zhí)行相同算法的結(jié)構(gòu)

10、，稱為循環(huán)。初始化部分循環(huán)體循環(huán)體,含有趨假的語句含有趨假的語句循環(huán)條件，循環(huán)應在有限循環(huán)條件，循環(huán)應在有限次完成次完成clears=0for i=1 to 100 s=s+iendfor? “s=”,sreturn 15當循環(huán)當循環(huán)DO WHILE DO WHILE LOOP LOOP EXIT EXITENDDOENDDO功能：功能：根據(jù)根據(jù) 的值決定是否執(zhí)行的值決定是否執(zhí)行DO DO WHILEWHILEENDDOENDDO之間的命令序列（這個序列稱為循環(huán)之間的命令序列（這個序列稱為循環(huán)體），如果邏輯表達式的值為體），如果邏輯表達式的值為.T.T.，則執(zhí)行循環(huán)體，否，則執(zhí)行循環(huán)體，否則退

11、出循環(huán)，如圖所示。則退出循環(huán)，如圖所示。條件條件真真循環(huán)體語句循環(huán)體語句LOOPEXIT假假含有使條件趨假含有使條件趨假的語句的語句cleari=1s=0do while i=100 s=s+i i=i+1enddo? “s=”, sreturn 用當循環(huán)改寫例用當循環(huán)改寫例1程序程序16FOR循環(huán)循環(huán)FOR TO STEP EXIT &無條件退出循環(huán)無條件退出循環(huán) LOOP &無條件返回到無條件返回到FOR循環(huán)體的開始位置循環(huán)體的開始位置ENDFOR|NEXTii超過終值超過終值否否循環(huán)體循環(huán)體loopexiti=i+步長步長是是功能：功能：當當FORFOR后的后的 在在 和

12、和 之間時，之間時，執(zhí)行執(zhí)行FORFOR與與ENDFORENDFOR之間的循環(huán)體，如果之間的循環(huán)體，如果 的值的值超過超過 時退出循環(huán)時退出循環(huán);STEP;STEP后的步長為后的步長為 的的增加幅度，每執(zhí)行一次循環(huán)，增加幅度，每執(zhí)行一次循環(huán)， 的值就自動的值就自動增加一個步長，當增加一個步長，當STEPSTEP省略時，默認步長為省略時，默認步長為1 1。當在執(zhí)行當在執(zhí)行FORFOR循環(huán)體中的語句遇到循環(huán)體中的語句遇到LOOPLOOP時，無條件回到時，無條件回到FORFOR循環(huán)的開始位置，遇到循環(huán)的開始位置，遇到EXITEXIT時，無條件退出循環(huán)，時，無條件退出循環(huán)，執(zhí)行執(zhí)行ENDFORENDF

13、OR后面的語句。后面的語句。17例例5 5 輸入輸入10個自然數(shù)，統(tǒng)計其中偶數(shù)的個數(shù)及偶數(shù)值。個自然數(shù)，統(tǒng)計其中偶數(shù)的個數(shù)及偶數(shù)值。clearis=0ic=0For i=1 to 10 input “請輸入第請輸入第”+str(i,2)+“個數(shù)個數(shù):” to x if i%2=0 is=is+x ic=ic+1 endifendfor?”偶數(shù)個數(shù)為：偶數(shù)個數(shù)為：”, ic?”偶數(shù)之和為：偶數(shù)之和為：”, iscancel18例例6 求求100到到200之間的所有素數(shù)之間的所有素數(shù)(只能被只能被1和自身整除的數(shù)和自身整除的數(shù))。clear?“100200間的素數(shù)有間的素數(shù)有:“ for k=10

14、1 to 200 step 2 f=0 for j=2 to int(sqrt(k) if k % j=0 f=1 exit endif endfor if f=0 ? k endifendfor如：設置變量如：設置變量f用于記錄是否為素數(shù)，用于記錄是否為素數(shù)， f=0是素數(shù)；是素數(shù)； f=1不是素數(shù)。不是素數(shù)。在程序設計中，經(jīng)常要記錄一些狀態(tài)，作在程序設計中，經(jīng)常要記錄一些狀態(tài)，作為判斷的條件。因此需要在程序中設置一為判斷的條件。因此需要在程序中設置一些標志，通常標志是整型變量些標志，通常標志是整型變量。多重循環(huán)結(jié)構(gòu)多重循環(huán)結(jié)構(gòu)多重循環(huán)結(jié)構(gòu)：多重循環(huán)結(jié)構(gòu)：是指循環(huán)體中又包含其它循環(huán)的復雜程序

15、結(jié)構(gòu)。是指循環(huán)體中又包含其它循環(huán)的復雜程序結(jié)構(gòu)。19排序算法排序算法例例7 選擇排序程序選擇排序程序(降序降序)：clearinput “請輸入數(shù)據(jù)個數(shù)：請輸入數(shù)據(jù)個數(shù)： to ndime x(n)for k=1 to n input “請輸入第請輸入第”+str(k,2)+“個數(shù)據(jù)個數(shù)據(jù): to x(k)endfor for i=1 to n-1 for j=i+1 to n if x(i)x(j) temp=x(i) x(i)=x(j) x(j)=temp endif endfor endfor ? ”排序后數(shù)據(jù)排序后數(shù)據(jù):”for i=1 to n ? x(i),endfor 外層循環(huán)外

16、層循環(huán)i變化變化內(nèi)層循環(huán)內(nèi)層循環(huán)j變化變化比較交換比較交換排序排序是將一組隨機排放是將一組隨機排放的數(shù)按的數(shù)按從大到小從大到小或或從小從小到大重新排列到大重新排列。20 選擇排序選擇排序改進算改進算法的基本思路，每輪法的基本思路，每輪排序?qū)⑴判驅(qū)(i)假定為極，假定為極，每次在每次在x(i)到到 x(max)中找出其極值，記錄中找出其極值，記錄其位置，最后讓極值其位置，最后讓極值位置的元素與位置的元素與x(i)交交換。換。保證每輪排序只保證每輪排序只有一次交換，且為有有一次交換，且為有效的交換！效的交換！clearinput “請輸入數(shù)據(jù)個數(shù)：請輸入數(shù)據(jù)個數(shù)： to ndime x(n)for k=1 to n input “請輸入第請輸入第”+str(k,2)+“個數(shù)據(jù)個數(shù)據(jù): to x(k)endfor for i=1 to n-1 k=i for j=i+1 to n if x(k)x(j) k=j endif endfor if ki temp=x(i) x(i)=x(k) x(k)=temp endif endfor ? ”排序后數(shù)據(jù)排序后數(shù)據(jù):”for i=1 to n ? x(i),endfor 排序循環(huán)排序循環(huán)假定最大值位置假定最大值位置循環(huán)