程序流程圖-循環(huán)結(jié)構(gòu).ppt

1、第三章 程序設(shè)計基礎(chǔ),流程控制（順序，選擇，循環(huán)結(jié)構(gòu)） 常用函數(shù)（asc,%,int,at） 國考筆試題,本 節(jié) 要 點,條件,A,B,A,B,條件,A,T,F,T,F,選擇（分支）結(jié)構(gòu),循環(huán)結(jié)構(gòu),順序結(jié)構(gòu),條件,A,B,T,F,選擇（分支）結(jié)構(gòu),if 條件 A else B endif,判斷X是否為數(shù)字,輸出09,T,F,讀取字符x,開始,結(jié)束,判斷讀入字符為數(shù)字 則輸出所有數(shù)字,accept to x if x是數(shù)字字符 輸出所有數(shù)字字符 endif,if asc(x)在asc(0)和asc(9)之間 輸出所有數(shù)字字符 endif,if asc(x)=asc(0) and asc(x)=

2、asc(9) 輸出所有數(shù)字字符 endif,accept to x if asc(x)=asc(0) and asc(x)= asc(9) for i = asc(0) to asc(9) ?chr(i) endfor endif,e:yh-vfoyh2010程序程序1.prg,s=0+1=s+1=1 s=1+2=s+2=3 s=3+3=s+3=6 s=6+4=s+4=10,計算1+2+3+100,s=0 For i=1 to 100 s=s+i Endfor ?” s=”,s,設(shè)為i,累加器：s=0,計算1+2+3+100,初始化S,計算S=1+2+3+x,開始,輸出S,結(jié)束,S=0,開始,

3、輸出S,結(jié)束,i=100,S=S+i,T,F,判斷i=終值,語句序列A i=i+步長,T,F,FOR 變量=初值 TO 終值 STEP 步長 語句序列A ENDFOR | NEXT變量,只要變量的值小于等于終值，重復(fù)執(zhí)行循環(huán)體中的語句序列。,給變量i賦初值,循環(huán)結(jié)束,FOR 循環(huán),一般知道終值 用for循環(huán),默認(rèn)為1 可以不寫,i=100,如果i為奇數(shù)， SSi； 否則，SSi,T,F,初始化S,開始,結(jié)束,計算1234100,S=0 for i =1 to 100 if i為奇數(shù) SSi else SSi endif endfor,If i%20,注： 判斷一個整數(shù)M能否被另一個整數(shù)N整除，

4、一般采用3種方法： 判斷MOD(M,N)是否等于0 INT(M/N)是否等于M/N M%N是否等于0，若等于，則表明M能被N整除。,i=10,SS*i,T,F,初始化S,開始,結(jié)束,計算 10!,S=1 for i =1 to 10 SS*i endfor,i=1 Do While i=10 s=s*i i=i+1 enddo,累乘器s 初始值置為1,如果在命令窗口輸入并執(zhí)行命令： “LIST 名稱”后在主窗口中顯示： 記錄號 名稱 1 電視機 2 計算機 3 電話線 4 電冰箱 5 電線 假定名稱字段為字符型、寬度為6， 那么下面程序段的輸出結(jié)果是,e:yh-vfoyh2010程序2005-

5、9-筆試.prg,國貿(mào)6,GO 2 SCAN NEXT 4 FOR LEFT(名稱,2）=電 IF RIGHT(名稱,2）=線 LOOP ENDIF ? 名稱 ENDSCAN A）電話線B）電冰箱 C）電冰箱電線D）電視機電冰箱,1 電視機 2 計算機 3 電話線 4 電冰箱 5 電線,e:yh-vfoyh2010程序2005-9-筆試.prg,Scan循環(huán) P68,GO 2 SCAN NEXT 4 FOR LEFT(名稱, 2) = 電 IF RIGHT(名稱, 2) = 線 EXIT ENDIF ENDSCAN ? 名稱,1 電視機 2 計算機 3 電話線 4 電冰箱 5 電線,輸出結(jié)果：

6、電話線,e:yh-vfoyh2010程序2006-9-筆試.prg,如下程序顯示的結(jié)果是【8】。 s=1 i=0 do while i8 s=s+i i=i+2 enddo ?s,s=1i=0 s=s+i=1+0=1 s=1 i=0+2=2 s=S+i=1+2=3 i=i+2=2+2=4 ,輸出結(jié)果：13,下列程序段的輸出結(jié)果是 ACCEPT TO A IF A=123456 S=0 ENDIF S=1 ? S RETURN A）0 B）1 C）由A的值決定D）程序出錯,執(zhí)行下列程序，顯示的結(jié)果是【10】 one=WORK two= a=LEN(one) i=a DO WHILE i=1 tw

7、o=two+SUBSTR(one,i,1) i=i-1 ENDDO ?two,KROW,A=4,TWO=“K”,e:yh-vfoyh2010程序2007-4-筆試.prg,營銷1,下面程序計算一個整數(shù)的各位數(shù)字之和。在下劃線處應(yīng)填寫的語句是 SET TALK OFF INPUT x= TO x s=0 DO WHILE x!=0 s=s+MOD(x,10） _ ENDDO ? s SET TALK ON A)x=int(x/10) B)x=int(x%10) C)x=x-int(x/10) D)x=x-int(x%10),e:yh-vfoyh2010程序2007-9-筆試.prg,x=int(

8、x/10),SETEXACTON s=ni+space(2) IFs=ni IFs=ni ?one ELSE ?two ENDIF ELSE IFs=ni ?three ELSE ?four ENDIF ENDIF RETURN,A)one B)two C)threeD)four,下列程序的運行結(jié)果是,e:yh-vfoyh2010程序2008-4-筆試.prg,下列程序段執(zhí)行以后，內(nèi)存變量y的值是 CLEAR x=12345 y=0 DOWHLIEx0 y=y+x%10 x=int(x/10) ENDDO ?y A)54321B)12345C)51D)15,下列程序段執(zhí)行后，內(nèi)存變量s1的值是

9、 s1=”network” s1=stuff(s1,4,4,”BIOS”) ?s1 A)networkB)netBIOSC)netD)BIOS,e:yh-vfoyh2010程序2008-4-筆試-28.prg,練習(xí)2：任意給定一個年份，判斷該年是否為閏年。 閏年的條件是：能被4整除但不能被100整除； 或者能被100和400整除的數(shù)就是閏年。 clear input 請輸入日期： to a if (int(a/4)=a/4 and int(a/100)a/100) or ； (int(a/100)=a/100 and int(a/400)=a/400) ?a,年是閏年 else ?a,年不是閏

10、年 endif return,提示：判斷一個整數(shù)M能否被另一個整數(shù)N整除，一般采用3種 方法，即：判斷MOD(M,N)是否等于0或INT(M/N)是否等 于M/N或M%N是否等于0，若等于，則表明M能被N整除。,例：編寫一名為“查找1”的程序，從student表中查 找姓名為“王五”的學(xué)生信息。,clear use student locate for 姓名=王五 if found() display else ?查無此人 endif use Return,e:yh-vfoyh2010程序if-查找.prg,select * from student where 姓名=李一,82套 綜合應(yīng)用,

11、1.建立一個文件名和表單名均為oneform的表單，表單中一個頁框Pageframe1和兩個命令按鈕Command1(生成)和Command2(退出)，Pageframe1中有兩個頁面(Page1和Page2)，標(biāo)題分別為為系名和計算方法，Page1中有一個組合框(Combo1),Page2中有一個選項組(Optiongroup1),選項組(Optiongroup1)中有兩個選項按鈕，標(biāo)題分別為平均工資和總工資如圖所示。 2. 將學(xué)院表添加到表單的數(shù)據(jù)環(huán)境中，然后手工設(shè)置組合框(Combo1)的RowSourceType屬性為6、RowSource屬性為學(xué)院表.系名，使得程序開始運行時，組合框

12、中有可供選擇的來源于學(xué)院表的所有系名。,3.為生成命令按鈕編寫程序。程序的功能是：表單運行時，根據(jù)選項組和組合框中選定的系名和計算方法，將相應(yīng)系的平均工資或總工資存入自由表salary.dbf中，表中包括系名、系號以及平均工資或總工資三個字段。 4.為退出命令按鈕編寫程序。程序的功能是：釋放表單。 5.運行表單，在選項組中選擇總工資，在組合框中選擇通信，單擊生成命令按鈕進(jìn)行計算。最后，單擊退出命令按鈕結(jié)束。,e:yh-vfoyh2010列表框.scx,習(xí)題： 1、編寫名為“打開表”的程序文件，程序功能為：打 開student表，并在瀏覽窗口中顯示。 2、編寫名為“替換”的程序文件，程序功能為:打開 student表，將所有會計系的學(xué)生的入學(xué)成績增加 10分。 3、編寫名為“轉(zhuǎn)換”的程序文件，程序的功能為：將 輸入的大寫英文字母轉(zhuǎn)換稱小寫字母。 4、編寫名為“倒序輸出”的程序文件，程序的功能為： 將輸入的三位數(shù)倒序輸出。,習(xí)題: