delphi課程設計(存儲版)

　　

【正文】 a[2]:=5。a[10]:=25。+inttostr(a[3])+39。+inttostr(a[7]) ? +39。 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. 快速排序 由著名計算機科學家霍爾（ ）設計的快速排序是對冒泡排序的一種改進。三對情侶參加婚禮，三個新郞為 A、 B、 C，三個新娘為 X、 Y、 Z。 Delphi程序設計 數組參數 Delphi語言實現了開放式數組。將數據和操作封裝起來并對用戶隱藏。 Delphi程序設計 Delphi數據類型的層次結構 鏈表、棧、隊列 整數 、 字符 、 布爾 、 枚舉 、 子界 、 實數 類 、 對象接口 字 、 字節 、 位 字符串 、 記錄 、 變體 、 集合 、 數組 抽象數據類型 復雜數據類型 基本數據類型 機器內表示 面向對象數據類型 抽 象 數據類型的層次結構 Delphi程序設計 鏈表 抽象數據類型的一個實例就是線性列表。其中TList類主要用于管理引用集合，因為它在內部管理一個指針數組； TStrings的派生類主要用于管理字符串集合和對象集合。因此又稱棧為后進先出（ Last In First Out，簡稱 LIFO）線性表。 Delphi程序設計 入棧操作 棧 棧頂 棧 棧頂 數據 入棧操作 棧 Delphi程序設計 出棧操作 棧 棧頂 棧 棧頂 數據 出棧操作 出棧操作 棧 Delphi程序設計 棧 2. 棧的應用 ? 倒轉數據是對一組給定的數據，對其中的數據元素重新排放位置，使得意向性元素互換，中間所有元素也相應地進行交換。一個算法應該具有的五個重要特征是：確切性、輸入、輸出、可行性、有窮性。適用于設計一個完整的程序或者部分程序。基本的查找方法有順序查找和折半查找。根據數組的分配方式可將數組分為：靜態數組和動態數組。 本章小結 Delphi程序設計 ? 順序查找就是將要查找的數據的關鍵字按一定的順序挨個與列表中的數據進行比較，相等時就找到了所要的數據。因此，在調用這個過程或函數時，可以傳遞不同長度的數組作為實參。 ? 棧的應用非常廣泛，如：倒轉數據、回溯等。同樣，在 Delphi的 VCL中，有現成的 TQueue抽象數據類型可以使用。 ? 棧是限定僅在一端進行插入或刪除操作的線性表。重復這個過程直到找到目標或是目標不在這個列表里。 ? 快速排序是對冒泡排序的一種改進。集合類型的定義是 set of BaseType，集合的操作包括：關系運算、增刪元素、交集運算。常用的排序方法包括：選擇排序、冒泡排序、插入排序、快速排序、合并排序、希爾排序、堆排序等。N/S圖是一種不需要有向線段，無需上下左右前后追蹤程序流程控制的程序流程圖，該圖非常適合描述結構化程序或者算法的結構化實現，能夠較好地反映算法和程序的層次結構，具有自頂向下逐步求精的特征。因此，通常把隊列叫做先進先出（ First In First Out，簡稱 FIFO）線性表。 ? 入棧（ push） 入棧是在棧頂添加新的元素。假設有一個棧 S=（ a1,a2,...,an）， a1先進棧， an最后進棧。 Delphi程序設計 鏈表 2. 鏈表的應用 鏈表在編程中的應用主要在于管理大量的字符串、數值、對象等，就其操作的便利性而言往往可以取代動態數組（數組不可取代的優勢在于維數的擴展）。對于基本數據類型，一般都內建于高級程序設計語言中，無需另外聲明或定義。要定義含有變體開放數組參數的過程或函數，需要參數類型指定為 array of const。這人聽后知道他們在開玩笑，全是假話。 Delphi程序設計 查找 1. 順序查找 順序查找方法很簡單，就是將要查找的數據的關鍵字按一定的順序挨個與數組中的數據進行比較，相等時就找到了所要的數據。+inttostr(a[10]))。+inttostr(a[6])+39。+inttostr(a[2])+39。 a[8]:=10。 //a=(2,5,3,8,7,6,9,10,49,25)。 //冒泡排序過程 ? var ? i,j,temp:integer。 Delphi程序設計 排序 由于數組中存有同一數據類型的數據，而有時為了更有效地使用數組，就需要對數組中的元素進行排序，使其按一定的順序排列好，比如按關鍵字的值從小到大排序。 如果 A和 B是同一動態數組類型的變量，那么 B:=A執行的操作是 把 A指向與 B相同的數組（不需要在執行操作之前為 B分配內存）。 它要求系統在內存中分配一個擁有 50個實數類型元素的空間，此 數組的索引為 0～ 49。但是可以通過逐個元素的賦值使得數組類型一致，因為它們 的基類是賦值相容的。 Var array1,array2:TMyArray。 注：如果創建了一個靜態數組而未給其賦值，那么系統仍然會給未使用的元素分配內存并且包含了隨機數據。根據數組的分配方式可將數組分為：靜態數組和動態數組。 Delphi程序設計 交集運算 Delphi中用 *運算符來計算兩個集合的交集，表達式Set1*Set2的運算結果是產生出 Set1和 Set2這兩個集合中都存在的元素，下面的例子用來判斷在一個給定的集合中是否有 39。 //在集合中刪除 39。 Delphi程序設計 關系運算 用 in運算符來判斷一個給定的元素是否在一個集合中，下面的代碼判斷在前面所定義的集合 T1中是否有 80： if (80 in T1) then DoSomeThing //繼續運行 下面的代碼判斷在 TDate中是否有集合元素 Mon： if not (Mon in TDate) then DoSomeThing //繼續運行 Delphi程序設計 增刪元素 用＋、 — 運算符或 Include和 Exclude過程，可以對一個集合變量增刪元素，例如： Charset : TChar。, outCome)。 outCome:integer。 end. Delphi程序設計 算法復雜性分析 * （ 2） 遞歸 遞歸在數學和計算機中經常遇到。請輸入 Fibonacci數列的值： 39。 F[2]:=1。下面介紹兩種求解方案：遞推和遞歸。 Delphi程序設計 算法復雜性分析 * 算法的復雜性是指：