第4章程序設(shè)計(jì)(7年制)

1、主模塊主模塊子模塊子模塊1子模塊子模塊2子模塊子模塊3子子模模塊塊11子子模模塊塊12子子模模塊塊21子子模模塊塊22子子模模塊塊31子子模模塊塊13子子模模塊塊23子子模模塊塊24敘述框：敘述框：判斷框：判斷框：連接框：連接框：流程線：流程線：基基 本本 流流 程程 圖圖 符符 號(hào)號(hào)初始化初始化不是表末不是表末打開表打開表總成績(jī)總成績(jī) 360顯示當(dāng)前記錄顯示當(dāng)前記錄移動(dòng)指針移動(dòng)指針結(jié)束結(jié)束NNYY123思考：思考：1.1.實(shí)體之間的三種聯(lián)系是什么實(shí)體之間的三種聯(lián)系是什么? ? 2. 2.數(shù)據(jù)庫(kù)管理系統(tǒng)采用的三種數(shù)據(jù)模型是什么數(shù)據(jù)庫(kù)管理系統(tǒng)采用的三種數(shù)據(jù)模型是什么? ? 3. 3.關(guān)系數(shù)據(jù)庫(kù)有

2、哪三種關(guān)系操作關(guān)系數(shù)據(jù)庫(kù)有哪三種關(guān)系操作? ?開 始語(yǔ) 句語(yǔ) 句語(yǔ) 句結(jié) 束條件條件YesYes條件條件命令序列命令序列ENDIFENDIF的下的下一條命令一條命令NoNoYesYes命令序列命令序列2 2命令序列命令序列1 1ENDIFENDIF的下的下一條命令一條命令NoNo無(wú)分支結(jié)構(gòu)無(wú)分支結(jié)構(gòu) 分支結(jié)構(gòu)分支結(jié)構(gòu)2)(:)()(CBAWCWBWAWWS式中2)(:)()(CBAWCWBWAWWS式中宏替換函數(shù)宏替換函數(shù)思考思考: 如果程序中將如果程序中將 作為第一個(gè)判斷條件作為第一個(gè)判斷條件,執(zhí)行完程序后的執(zhí)行完程序后的結(jié)果是什么結(jié)果是什么?條件表達(dá)式條件表達(dá)式CommandslExpre

3、ssionYLOOPNEXIT思考思考:利用建立臨時(shí)關(guān)系的方法利用建立臨時(shí)關(guān)系的方法,如何修改程序如何修改程序? (多表查詢多表查詢.Prg)*統(tǒng)計(jì)按紐統(tǒng)計(jì)按紐CLICK事件程序代碼：事件程序代碼：SET TALK OFFCLOSE ALLOPEN DATA STU_7SELE 1USE XUESHENGINDEX ON 學(xué)號(hào)學(xué)號(hào) TO XH1SELE 2USE CHENGJIINDEX ON 學(xué)號(hào)學(xué)號(hào) TO XH2TOTAL ON 學(xué)號(hào)學(xué)號(hào) TO ABCUSE ABCINDEX ON 學(xué)號(hào)學(xué)號(hào) TO XH3SELE 1SET RELA TO 學(xué)號(hào)學(xué)號(hào) INTO ABCGO TOPDO WHI

4、LE !EOF() REPL XUESHENG.平均分平均分 WITH ABC.成績(jī)成績(jī)/4 SKIPENDDOSORT ON 平均分平均分,學(xué)號(hào)學(xué)號(hào) TO PINGJUN USE PINGJUNBROW題目同第三章查詢題目同第三章查詢*統(tǒng)計(jì)按紐統(tǒng)計(jì)按紐CLICK事件程序代碼：事件程序代碼：SELECT Xuesheng.學(xué)號(hào)學(xué)號(hào), Xuesheng.姓名姓名, AVG(Chengji.成績(jī)成績(jī)) AS 平均分平均分; FROM stu_7!xuesheng INNER JOIN stu_7!chengji ; ON Xuesheng.學(xué)號(hào)學(xué)號(hào) = Chengji.學(xué)號(hào)學(xué)號(hào); GROUP BY

5、 Xuesheng.學(xué)號(hào)學(xué)號(hào); ORDER BY 平均分平均分 , Xuesheng.學(xué)號(hào)學(xué)號(hào); INTO TABLE pingjun.dbfSELE PINGJUNBROW題目同第三章查詢題目同第三章查詢循環(huán)次數(shù)循環(huán)次數(shù)=INT(=INT(終值終值- -初值初值)/)/步長(zhǎng)步長(zhǎng))+1)+1Var or nFinalValueCommandsNYEXITLOOPVar = nInitialValueVar = Var nIncrement!EOF( )CommandsNYEXITLOOPSKIP思考題：如何交換任意兩條記錄？提示：這兩條記錄的記錄號(hào)通過(guò)鍵盤輸入指定。思考：1. 如何判定 3 的

6、倍數(shù)？2. 如何判定 一個(gè)數(shù)同時(shí)被 3 和 7 整除？思考思考:如何計(jì)算并輸出如何計(jì)算并輸出3100間有幾個(gè)素?cái)?shù)間有幾個(gè)素?cái)?shù)?aacbbx2422, 1n直到最后一項(xiàng)小于直到最后一項(xiàng)小于10-4為止為止7151311S直到最后一項(xiàng)的絕對(duì)值小于直到最后一項(xiàng)的絕對(duì)值小于10-4為止為止作業(yè)作業(yè): 編程編程 求求1!+2!+3!+N!功能擴(kuò)展功能擴(kuò)展功能擴(kuò)展功能擴(kuò)展變量Position的作用是？434241333231232221131211434241333231232221131211434241333231232221131211ccccccccccccbbbbbbb

7、bbbbbaaaaaaaaaaaa332313322212312111434241333231232221131211342414332313322212312111*cccccccccbbbbbbbbbbbbaaaaaaaaaaaa41kkjikijbaC343332312423222114131211434241333231232221131211bbbbbbbbbbbbaaaaaaaaaaaaa(i)a(j)編號(hào)編號(hào)1#2#3#4#5#6#7#8#數(shù)據(jù)數(shù)據(jù)降序降序52793684指示器 i指示器 j52指示器 j75757指示器 j99779指示器 j3比較成立，則交換比較成立，則交換:

8、指示器 j6指示器 j8指示器 j4a(i)a(j)t123SET TALK OFFDIMENSION a(8)CLEARFOR i = 1 TO 8ii = ALLTRIM(STR(i) p = Enter + ii + th number： INPUT p TO a(i)ENDFORFOR i = 1 TO 8? a(i)ENDFORSET TALK ON按降序排序按降序排序按升序排序按升序排序SET TALK OFFDIMENSION a(8)CLEARFOR i = 1 TO 8a(i) = INT( RAND( ) * 90 ) + 10ENDFORFOR i = 1 TO 8? a

9、(i)ENDFOR?SET TALK ON按降序排序按降序排序a(i)a(i+1)編號(hào)編號(hào)1#2#3#4#5#6#7#8#數(shù)據(jù)數(shù)據(jù)降序降序52793684比較成立，則交換比較成立，則交換指示器 i第一輪比較，第一輪比較，共比，共比較較 N-1 輪。輪。52指示器 i277272指示器 i299292指示器 i233232指示器 i266262指示器 i288282指示器 i244242SET TALK OFFINPUT Enter number： TO numDIMENSION a(num)CLEARFOR i = 1 TO numa(i) = INT( RAND( ) * 90 ) + 10

10、ENDFORFOR i = 1 TO num? a(i)ENDFOR?SET TALK ON按升序排序按升序排序思考：思考：如何加快排序速度？如何加快排序速度？5247952479數(shù)組數(shù)組a下標(biāo)下標(biāo).f.f.f.f.f.f.f.f.f.值值12345678911111要點(diǎn)：要點(diǎn)：1. 以數(shù)據(jù)值作為數(shù)組的下標(biāo)以數(shù)據(jù)值作為數(shù)組的下標(biāo)2. 在相應(yīng)元素作一個(gè)標(biāo)記，為輸出排序結(jié)果做準(zhǔn)備在相應(yīng)元素作一個(gè)標(biāo)記，為輸出排序結(jié)果做準(zhǔn)備優(yōu)點(diǎn)：排序速度最快優(yōu)點(diǎn)：排序速度最快缺點(diǎn)：缺點(diǎn)：1. 只能對(duì)無(wú)重復(fù)的數(shù)據(jù)排序只能對(duì)無(wú)重復(fù)的數(shù)據(jù)排序2. 只能對(duì)正整數(shù)排序只能對(duì)正整數(shù)排序3. 必須知道數(shù)據(jù)的范圍必須知道數(shù)據(jù)的范圍4

11、. 所占空間大所占空間大改良：改良：1. 對(duì)有重復(fù)的數(shù)據(jù)集排序？對(duì)有重復(fù)的數(shù)據(jù)集排序？2. 對(duì)具有小數(shù)的數(shù)據(jù)集排序？對(duì)具有小數(shù)的數(shù)據(jù)集排序？3. 對(duì)具有負(fù)數(shù)的數(shù)據(jù)集排序？對(duì)具有負(fù)數(shù)的數(shù)據(jù)集排序？4. 檢測(cè)數(shù)據(jù)的范圍？檢測(cè)數(shù)據(jù)的范圍？SET TALK OFFDIMENSION a(10000)a=0FOR I=1 TO 7INPUT TO xy=INT(x*100)a(y) = a(y) + 1ENDFORFOR i=1 TO 10000FOR j = 1 TO a(i)? i / 100ENDFORENDFORSET TALK ONRETURNSET TALK OFFDIMENSION a(100