delphi課程設計(文件)

　

【正文】 程序的層次結構，具有自頂向下逐步求精的特征。 ? 基本算法大都比較簡單，是其他算法的基礎。常用的排序方法包括：選擇排序、冒泡排序、插入排序、快速排序、合并排序、希爾排序、堆排序等。迭代就是反復替換的意思，它通過使用一個中間變量保存中間結果，不斷反復計算求解最終值。集合類型的定義是 set of BaseType，集合的操作包括：關系運算、增刪元素、交集運算。 Delphi程序設計 ? 使用標準函數 Low和 High可分別返回數組中第一個索引類型其范圍的最低和最高值。 ? 快速排序是對冒泡排序的一種改進。折半查找是從一個列表的中間的元素來測試的，這將能夠判別出目標在列表里的前半部還是后半部分。重復這個過程直到找到目標或是目標不在這個列表里。它將數據和操作封裝起來，用戶可通過操作接口對數據進行操作。 ? 棧是限定僅在一端進行插入或刪除操作的線性表。 本章小結 Delphi程序設計 ? 隊列是線性列表的一種特殊情況，其所有的插入均限定在表的一端進行，而所有的刪除則限定在表的另一端進行。同樣，在 Delphi的 VCL中，有現成的 TQueue抽象數據類型可以使用。隊列又稱為先進先出（ FIFO）線性表 . ? 對列主要應用于排隊處理用戶請求、任務和指令。 ? 棧的應用非常廣泛，如：倒轉數據、回溯等。 本章小結 Delphi程序設計 ? 在 Delphi的 VCL中，有一些現成的可以當作鏈表使用的抽象數據類型，如： TList、 TStrings和TCollection。因此，在調用這個過程或函數時，可以傳遞不同長度的數組作為實參。如果在后半部分，就不需要查找前半部分。 本章小結 Delphi程序設計 ? 順序查找就是將要查找的數據的關鍵字按一定的順序挨個與列表中的數據進行比較，相等時就找到了所要的數據。 ? 冒泡法的基本思想是，將待排序的元素看作是豎著排列的 “ 氣泡 ” ，較小的元素比較輕，從而要往上浮。根據數組的分配方式可將數組分為：靜態數組和動態數組。 ? 算法的復雜性是指在執行時，算法所需要計算機資源的量。基本的查找方法有順序查找和折半查找。 ? 排序算法根據數據的值對它們進行排列。適用于設計一個完整的程序或者部分程序。 Delphi程序設計 本章小結 ? 程序設計中，能夠用來表示算法的圖主要有： PAD圖、 N\S盒圖、流程圖。一個算法應該具有的五個重要特征是：確切性、輸入、輸出、可行性、有窮性。允許插入的一端稱隊尾，允許刪除的一端稱隊頭。 Delphi程序設計 入棧操作 棧 棧頂 棧 棧頂 數據 入棧操作 棧 Delphi程序設計 出棧操作 棧 棧頂 棧 棧頂 數據 出棧操作 出棧操作 棧 Delphi程序設計 棧 2. 棧的應用 ? 倒轉數據是對一組給定的數據，對其中的數據元素重新排放位置，使得意向性元素互換，中間所有元素也相應地進行交換。棧的鏈式存儲結構由其棧頂的指針唯一確定。因此又稱棧為后進先出（ Last In First Out，簡稱 LIFO）線性表。（以上具體見 TList使用的演示程序） Delphi程序設計 棧 ? 棧是限定僅在一端進行插入或刪除操作的線性表。其中TList類主要用于管理引用集合，因為它在內部管理一個指針數組； TStrings的派生類主要用于管理字符串集合和對象集合。單鏈表關系的實現可以通過指針來描述。 Delphi程序設計 Delphi數據類型的層次結構 鏈表、棧、隊列 整數 、 字符 、 布爾 、 枚舉 、 子界 、 實數 類 、 對象接口 字 、 字節 、 位 字符串 、 記錄 、 變體 、 集合 、 數組 抽象數據類型 復雜數據類型 基本數據類型 機器內表示 面向對象數據類型 抽 象 數據類型的層次結構 Delphi程序設計 鏈表 抽象數據類型的一個實例就是線性列表。本節將重點討論的抽象數據類型，包括：鏈表、棧、對列。將數據和操作封裝起來并對用戶隱藏。要定義含有開放數組參數的例程，需要在參數聲明中使用語法 array of type（優于 array[X..Y] of type）。 Delphi程序設計 數組參數 Delphi語言實現了開放式數組。 Delphi程序設計 窮舉法 例：三對情侶參加婚禮，三個新郞為 A、 B、 C，三個新娘為 X、 Y、 Z。三對情侶參加婚禮，三個新郞為 A、 B、 C，三個新娘為 X、 Y、 Z。查找問題的一般提法是：設一數組有 n個元素，每個元素由一個稱為關鍵字的數據項和若干相關數據項的值組成，對給定值 K，要查找出這 n個數組元素中是否存在關鍵字等于 K的某個元素。 end. Delphi程序設計 排序 5 2 3 8 7 6 9 10 49 25 2 5 3 8 7 6 9 10 49 25 2 5 3 8 7 6 9 10 49 25 第一次比較 第二次比較 最后一次比較 比較 交換 比較 交換 比較 交換 ... ... 冒泡排序第一輪比較和交換的過程演示 Delphi程序設計 排序 2. 快速排序 由著名計算機科學家霍爾（ ）設計的快速排序是對冒泡排序的一種改進。+inttostr(a[9])+39。+inttostr(a[7]) ? +39。+inttostr(a[5])+39。+inttostr(a[3])+39。+inttostr(a[1])+ ? 39。a[10]:=25。 ? a[6]:=6。 a[2]:=5。 ? procedure (Sender: TObject)。 ? BubbleArray[j]:= BubbleArray[j+1]。 Delphi程序設計 1. 冒泡排序的 Delphi實現 ? type ? Arraytype=array[1..10] of integer。在這里僅討論一維數組的冒泡排序和快速排序這兩個算法，以便重點掌握這兩個排序算法的基本原理與實現方法。 這里聲明了一個動態二維數組，用 SetLength(myArray,6,8)來 初始化數組，相當于一個 6*8的矩陣。 如果 A和 B為靜態數組，那么此時 A[0]的值為 1。 B[0]:=2。例如： Var A,B: array of integer。 等價于： Var myArray:array of Real。定義一個動態數組的語法如下： 數組類型名稱： array of 數據類型 ? 這里可以看到，動態數組沒有給定好的長度。array4:=array5。 array4,array5: array[1..10] of real。 可以用 myArray[2,8]或 myArray[2][8]的方式訪問數組中