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

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

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

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

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

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

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

7、bbbbbaaaaaaaaaaaa332313322212312111434241333231232221131211342414332313322212312111*cccccccccbbbbbbbbbbbbaaaaaaaaaaaa41kkjikijbaC343332312423222114131211434241333231232221131211bbbbbbbbbbbbaaaaaaaaaaaaa(i)a(j)編號編號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)編號編號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要點：要點：1. 以數(shù)據(jù)值作為數(shù)組的下標(biāo)以數(shù)據(jù)值作為數(shù)組的下標(biāo)2. 在相應(yīng)元素作一個標(biāo)記，為輸出排序結(jié)果做準(zhǔn)備在相應(yīng)元素作一個標(biāo)記，為輸出排序結(jié)果做準(zhǔn)備優(yōu)點：排序速度最快優(yōu)點：排序速度最快缺點：缺點：1. 只能對無重復(fù)的數(shù)據(jù)排序只能對無重復(fù)的數(shù)據(jù)排序2. 只能對正整數(shù)排序只能對正整數(shù)排序3. 必須知道數(shù)據(jù)的范圍必須知道數(shù)據(jù)的范圍4

11、. 所占空間大所占空間大改良：改良：1. 對有重復(fù)的數(shù)據(jù)集排序？對有重復(fù)的數(shù)據(jù)集排序？2. 對具有小數(shù)的數(shù)據(jù)集排序？對具有小數(shù)的數(shù)據(jù)集排序？3. 對具有負(fù)數(shù)的數(shù)據(jù)集排序？對具有負(fù)數(shù)的數(shù)據(jù)集排序？4. 檢測數(shù)據(jù)的范圍？檢測數(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