正文內(nèi)容

delphi課程設(shè)計(jì)-文庫(kù)吧

2026-07-06 08:41 本頁(yè)面

【正文】 F(1) =0, F(2) = 1,F(3) =2 F(i) = F(i1) + F(i2) i 3 ? 即后面的每個(gè) Fibonacci值是前兩個(gè) Fibonacci值之和。現(xiàn)在的任務(wù)是如何求得 Fibonacci數(shù)列中的第 n個(gè)數(shù)。下面介紹兩種求解方案：遞推和遞歸。 Delphi程序設(shè)計(jì) （ 1） Fibonacci問(wèn)題的遞推與迭代解法 program ProjectDiTuiFIB。 {$APPTYPE CONSOLE} Uses SysUtils。 function FIB(Num:integer):integer。 var F:array of integer。 n:integer。 begin setlength(F,Num+1)。 //此時(shí) F數(shù)組的元素為 F[0]F[num] F[1]:=0。 F[2]:=1。F[3]:=2。 For n:=4 to Num do F[n]:=F[n1]+F[n2]。 result:=F[Num]。 end。 var outCome:integer。 x:string。 begin write(39。請(qǐng)輸入 Fibonacci數(shù)列的值： 39。)。 readln(x)。 outCome:=FIB(strtoint(x))。 writeln(39。Fibonacci的值為： 39。,outCome)。 readln。 end. Delphi程序設(shè)計(jì) 算法復(fù)雜性分析 * （ 2）遞歸遞歸在數(shù)學(xué)和計(jì)算機(jī)中經(jīng)常遇到。利用遞歸方法可以用有限的語(yǔ)句來(lái)定義無(wú)限集合，但在遞歸定義中至少有一條是非遞歸的，即初始定義，否則就會(huì)產(chǎn)生邏輯性錯(cuò)誤。 Delphi程序設(shè)計(jì) （ 2） Fibonacci問(wèn)題的遞歸解法 program FIBDiGui5。 {$APPTYPE CONSOLE} Uses SysUtils。 function FIB(N:integer):integer。 begin if N=1 then FIB:=0 else if N=2 then FIB:=1 else if N=3 then FIB:=2 else FIB:=FIB(N1)+FIB(N2)。 end。 var x:string。 outCome:integer。 begin write(39。請(qǐng)輸入 Fibonacci數(shù)列的值： 39。)。 readln(x)。 OutCome:=FIB(strtoint(x))。 writeln(39。Fibonacci數(shù)列的值為： 39。, outCome)。 readln。 end. Delphi程序設(shè)計(jì) 集合 ? 關(guān)系運(yùn)算 ? 增刪元素 ? 交集運(yùn)算 Delphi程序設(shè)計(jì) 集合集合類型是一群相同類型元素的組合，這些類型必須是有限的幾種類型，如：整形、布爾型、字符型、枚舉型和子界型。在檢查一個(gè)值是否屬于一個(gè)特定集合時(shí)，集合類型非常有用。集合類型的定義方法： set of BaseType Delphi程序設(shè)計(jì) 集合例： type Tint=0..100。 T1=set of Tint。 TDate=set of (Mon,Tues,Wed,Thurs,Fri,Sat,Sun)。 TChar= set of (‘a(chǎn)’,’b’,’c’)。 Delphi程序設(shè)計(jì) 關(guān)系運(yùn)算用 in運(yùn)算符來(lái)判斷一個(gè)給定的元素是否在一個(gè)集合中，下面的代碼判斷在前面所定義的集合 T1中是否有 80： if (80 in T1) then DoSomeThing //繼續(xù)運(yùn)行下面的代碼判斷在 TDate中是否有集合元素 Mon： if not (Mon in TDate) then DoSomeThing //繼續(xù)運(yùn)行 Delphi程序設(shè)計(jì) 增刪元素用＋、 — 運(yùn)算符或 Include和 Exclude過(guò)程，可以對(duì)一個(gè)集合變量增刪元素，例如： Charset : TChar。 Charset := [‘a(chǎn)’]。 //初始化集合變量。 Include(T1, ‘2’)。 //在集合中增加 2 。 CharSet := CharSet + [‘b’] 。 //增加 b 。 Exclude(CharSet, ‘a(chǎn)’)。 //在集合中刪除 39。a39。。 CharSet := CharSet[‘a(chǎn)’, ‘b’]。//刪除 39。a39。, b39。。 Delphi程序設(shè)計(jì) 交集運(yùn)算 Delphi中用 *運(yùn)算符來(lái)計(jì)算兩個(gè)集合的交集，表達(dá)式Set1*Set2的運(yùn)算結(jié)果是產(chǎn)生出 Set1和 Set2這兩個(gè)集合中都存在的元素，下面的例子用來(lái)判斷在一個(gè)給定的集合中是否有 39。a39。、 39。b39。、 39。c39。這幾個(gè)元素： if [‘a(chǎn)’, ‘b’, ‘c’] * CharSet = [‘a(chǎn)’, ‘b’, ‘c’] then DoSomeThing //繼續(xù)程序 Delphi程序設(shè)計(jì) 數(shù)組 ? 靜態(tài)數(shù)組 ? 動(dòng)態(tài)數(shù)組 ? 排序 ? 查找 ? 數(shù)組參數(shù) Delphi程序設(shè)計(jì) 數(shù)組數(shù)組用于表示相同類型的元素的有序集合，這里所說(shuō)的 “ 相同類型 ” 即數(shù)組的基類型，可以是系統(tǒng)預(yù)定義類型，也可以是用戶自定義類型。數(shù)組中每個(gè)元素都有一個(gè)唯一的索引，因此，同一數(shù)組中可以含有多個(gè)相同的值。根據(jù)數(shù)組的分配方式可將數(shù)組分為：靜態(tài)數(shù)組和動(dòng)態(tài)數(shù)組。 Delphi程序設(shè)計(jì) 靜態(tài)數(shù)組 ? 定義靜態(tài)數(shù)組類型的語(yǔ)法為：數(shù)組類型名稱＝ array [索引類型 … ] of 基類型 ? 數(shù)組類型的定義中，索引類型可以有多個(gè)，但必須都是序數(shù)類型（在實(shí)際應(yīng)用中，索引類型通常是整數(shù)子界）。而且它們的整個(gè)范圍不能超過(guò) 2GB。從定義可以看出，靜態(tài)數(shù)組中元素的數(shù)量是有限的，其大小是所有索引類型范圍的乘積。根據(jù)索引類型的個(gè)數(shù)，又可以將數(shù)組分為一維數(shù)組和多維數(shù)組。顧名思義，一維數(shù)組就是指索引類型的個(gè)數(shù)只有一個(gè)的數(shù)組；以同樣的思路，可以理解多維數(shù)組。 Delphi程序設(shè)計(jì) 靜態(tài)數(shù)組（ 1）一維靜態(tài)數(shù)組： Type TMyArray＝ array[1..100] of integer。 Var myArray:TMyArray。注：如果創(chuàng)建了一個(gè)靜態(tài)數(shù)組而未給其賦值，那么系統(tǒng)仍然會(huì)給未使用的元素分配內(nèi)存并且包含了隨機(jī)數(shù)據(jù)。 low函數(shù)， high函數(shù)和 length函數(shù)的用法。 Delphi程序設(shè)計(jì) 靜態(tài)數(shù)組（ 2）多維靜態(tài)數(shù)組 Type TMyArray＝ array[1..10] of array[1..10] of real。 Var myArray:TMyArray。上述聲明等價(jià)于： Type TMyArray＝ array[1..10,1..10] of real。

點(diǎn)擊復(fù)制文檔內(nèi)容

環(huán)評(píng)公示相關(guān)推薦

發(fā)酵工廠設(shè)計(jì)課程設(shè)計(jì)-資料下載頁(yè)

【總結(jié)】《發(fā)酵工廠設(shè)計(jì)》課程設(shè)計(jì)一、課程目標(biāo)：?《福建師范大學(xué)本科畢業(yè)論文（設(shè)計(jì)）工作管理規(guī)定》第八條指出：“工科學(xué)生以畢業(yè)設(shè)計(jì)為主，也可做畢業(yè)論文。”因此對(duì)工科學(xué)生來(lái)說(shuō)工程設(shè)計(jì)的基礎(chǔ)訓(xùn)練是十分重要的。課程設(shè)計(jì)可作為生物工程專業(yè)本科學(xué)生畢業(yè)設(shè)計(jì)的前期訓(xùn)練和準(zhǔn)備工作。?通過(guò)課程設(shè)計(jì)，學(xué)生將所學(xué)的基礎(chǔ)知識(shí)和專業(yè)知識(shí)，進(jìn)行綜合運(yùn)用，設(shè)計(jì)

2026-07-26 23:42

食品工廠設(shè)計(jì)課程設(shè)計(jì)-資料下載頁(yè)

【總結(jié)】食品工廠設(shè)計(jì)課程設(shè)計(jì)設(shè)計(jì)負(fù)責(zé)人：王云陽(yáng)設(shè)計(jì)指導(dǎo)教師：岳田利，高振鵬、史亞歌彭幫柱，田曉琴西北農(nóng)林科技大學(xué)食品科學(xué)與工程學(xué)院二零零六年十月一、設(shè)計(jì)步驟1．確定設(shè)計(jì)題目，題目應(yīng)包含生產(chǎn)規(guī)模及其主要產(chǎn)品2．產(chǎn)品方案的確定

2026-07-13 23:47

船閘課程設(shè)計(jì)ppt課件-資料下載頁(yè)

【總結(jié)】船閘工程課程設(shè)計(jì)一．設(shè)計(jì)目的和要求二．設(shè)計(jì)內(nèi)容三．設(shè)計(jì)方法及步驟四．設(shè)計(jì)成果五．設(shè)計(jì)時(shí)間安排六．設(shè)計(jì)參考書(shū)一．設(shè)計(jì)的目的和要求?鞏固已學(xué)的專業(yè)課及基礎(chǔ)課知識(shí)；?提高對(duì)工程實(shí)際問(wèn)題的分析能力；?增強(qiáng)解決實(shí)際問(wèn)題的能力；?提高設(shè)計(jì)能力：計(jì)算．編寫(xiě)

2026-02-12 15:43

mooc課程設(shè)計(jì)ppt課件-資料下載頁(yè)

【總結(jié)】MOOC課程設(shè)計(jì)、制作與教學(xué)傳統(tǒng)教學(xué)三大件?1小時(shí)或多小時(shí)講課?課后作業(yè)?傳統(tǒng)的考試MOOC的教育學(xué)特征?學(xué)生規(guī)模巨型化、學(xué)生身份多元化?結(jié)構(gòu)與內(nèi)容設(shè)計(jì)合理、模式新穎?課程三大部分：，生生互動(dòng)課程講座視頻?每周一節(jié)授課（

2026-04-26 18:16

電子課程設(shè)計(jì)ppt課件-資料下載頁(yè)

【總結(jié)】電子技術(shù)課程設(shè)計(jì)授課教師：薛亞茹姜珊Tel:89731868(o)13621283604（薛亞茹）13241417990（姜珊）辦公室：地質(zhì)樓420室課程安排?上課時(shí)間：11年12月26日～12年1月6日（節(jié)假

2026-04-20 03:09

課程設(shè)計(jì)任務(wù)ppt課件-資料下載頁(yè)

【總結(jié)】食品工廠設(shè)計(jì)課程設(shè)計(jì)任務(wù)書(shū)設(shè)計(jì)負(fù)責(zé)人：鄧隨勝指導(dǎo)教師：鄧隨勝生命科學(xué)系食品科學(xué)與工程專業(yè)2022年11月?一、設(shè)計(jì)步驟1．確定設(shè)計(jì)題目，題目應(yīng)包含生產(chǎn)規(guī)模及其主要產(chǎn)品2．

2026-04-25 12:17

fpga課程設(shè)計(jì)ppt課件-資料下載頁(yè)

【總結(jié)】哈爾濱華德學(xué)院時(shí)間安排：第14教學(xué)周周一至周五全天指導(dǎo)教師：王嘉鵬、張彥飛、孟祥蓮、畢津滔設(shè)計(jì)題目FPGA系統(tǒng)設(shè)計(jì)課程設(shè)計(jì)課程設(shè)計(jì)安排?課程設(shè)計(jì)主要完成內(nèi)容–項(xiàng)目成員（2人）–項(xiàng)目名稱–功能分析–擬實(shí)現(xiàn)的目標(biāo)和效果、創(chuàng)新–擬采用什么方案–任務(wù)分工–時(shí)間安排

2026-04-19 20:56

理學(xué)課程設(shè)計(jì)ppt課件-資料下載頁(yè)

【總結(jié)】§減速器類型§減速器的典型結(jié)構(gòu)§減速器的潤(rùn)滑與密封設(shè)計(jì)§減速器設(shè)計(jì)的一般步驟第十四章減速器設(shè)計(jì)減速器類型?減速器的功用：減速器是由封閉在箱體內(nèi)的齒輪傳動(dòng)或蝸桿傳動(dòng)所組成的獨(dú)立部件，為了提高電動(dòng)機(jī)的效率，原動(dòng)機(jī)提供的回轉(zhuǎn)速度一般比工作機(jī)械所需的轉(zhuǎn)速

2025-11-29 05:13

課程設(shè)計(jì)題目ppt課件-資料下載頁(yè)

【總結(jié)】課程設(shè)計(jì)題目每個(gè)題目由2-4人組成設(shè)計(jì)小組（自愿組合），合力（注意培養(yǎng)團(tuán)對(duì)精神）完成全部設(shè)計(jì)圖紙與設(shè)計(jì)說(shuō)明書(shū)題目1：設(shè)計(jì)一種月球探險(xiǎn)車(chē)模型機(jī)?設(shè)計(jì)一種月球探險(xiǎn)車(chē)，具有爬斜坡、過(guò)壕溝、跨越小障礙的能力，能在崎嶇不平的沙石地面上行走。型式可以采用輪式、腿式、輪腿式、履帶式等。以直流電機(jī)作為驅(qū)動(dòng)裝置。采

2026-04-24 18:17

課程設(shè)計(jì)與開(kāi)發(fā)-資料下載頁(yè)

【總結(jié)】客戶化專業(yè)課程設(shè)計(jì)與開(kāi)發(fā)主講：尚峰學(xué)習(xí)公約保持秩序空杯心態(tài)積極參與真誠(chéng)建議掌聲鼓勵(lì)內(nèi)容綱要課程需求分析Analysis課程整體設(shè)計(jì)Design課程開(kāi)發(fā)撰寫(xiě)Develop課程教學(xué)實(shí)施Implement課程評(píng)估優(yōu)化Evalu

2026-08-07 00:36

編譯原理課程設(shè)計(jì)-資料下載頁(yè)

【總結(jié)】編譯原理課程設(shè)計(jì)翟玉慶、周曉宇1、課程主要目的?加深對(duì)編譯原理及編譯程序構(gòu)造過(guò)程的理解?增強(qiáng)程序設(shè)計(jì)能力?學(xué)會(huì)編寫(xiě)工具軟件2、課程主要實(shí)施方式?分組完成項(xiàng)目–每組三人?分階段提交項(xiàng)目結(jié)果?小組交流?所用程序設(shè)計(jì)語(yǔ)言不限3、項(xiàng)目基本內(nèi)容?通過(guò)自己

2026-07-12 08:09

數(shù)字鬧鐘課程設(shè)計(jì)-資料下載頁(yè)

【總結(jié)】數(shù)字鬧鐘主要內(nèi)容?課設(shè)內(nèi)容及要求?設(shè)計(jì)方案?電路設(shè)計(jì)與器件選擇?整機(jī)電路課設(shè)內(nèi)容及要求?設(shè)計(jì)任務(wù)?設(shè)計(jì)并制作一個(gè)帶有校時(shí)功能，可定時(shí)起鬧的數(shù)字鐘?設(shè)計(jì)指標(biāo)?“時(shí)”、“分”十進(jìn)制顯示，“秒”使用分個(gè)位顯示數(shù)碼管上的DP點(diǎn)閃爍顯示?計(jì)時(shí)以24小時(shí)為周期?校時(shí)功能?預(yù)設(shè)

2026-01-11 06:28

機(jī)械原理課程設(shè)計(jì)-資料下載頁(yè)

【總結(jié)】課程設(shè)計(jì)其他常用機(jī)構(gòu)一、棘輪棘輪1棘輪2棘輪3棘輪4棘輪5雙動(dòng)式棘輪2雙動(dòng)式棘輪3棘輪應(yīng)用2超越離合器棘輪應(yīng)用1雙動(dòng)式棘輪1二、槽輪轉(zhuǎn)角調(diào)節(jié)槽輪內(nèi)槽輪球面槽輪槽輪應(yīng)用其他常用機(jī)構(gòu)三、不完全齒輪不完全齒輪

2026-07-23 17:56

os課程設(shè)計(jì)ppt課件-資料下載頁(yè)

【總結(jié)】?操作系統(tǒng)課程設(shè)計(jì)河北大學(xué)數(shù)學(xué)與計(jì)算機(jī)學(xué)院課程設(shè)計(jì)目的通過(guò)模擬操作系統(tǒng)的實(shí)現(xiàn)，加深對(duì)操作系統(tǒng)工作原理理解，進(jìn)一步了解操作系統(tǒng)的實(shí)現(xiàn)方法，并可練習(xí)合作完成系統(tǒng)的團(tuán)隊(duì)精神和提高程序設(shè)計(jì)能力。課程設(shè)計(jì)內(nèi)容模擬采用多道程序設(shè)計(jì)方法的單用戶操作系統(tǒng)，該操作系統(tǒng)包括進(jìn)程管理、存

2025-10-07 19:01

鄂ICP備17016276號(hào)-1

<wbr id="u6aab"><var id="u6aab"></var></wbr>