(零售行業(yè))音響店DVD零售出租管理數(shù)據(jù)庫

1、（零售行業(yè)）音響店DVD 零售出租管理數(shù)據(jù)庫20XX年XX月多年的企業(yè)咨詢豉問經(jīng)驗(yàn).經(jīng)過實(shí)戰(zhàn)驗(yàn)證可以落地機(jī)行的卓越管理方案，值得您下載擁有大型數(shù)據(jù)庫課程設(shè)計(jì)設(shè)計(jì)報(bào)告題 目：音響店DVD出租/零售管理系統(tǒng)學(xué) 號(hào)： 1 2 1 0 0 6 3 14學(xué)生姓名：劉 可指導(dǎo)教師：劉 寧提交時(shí)間：目錄第 1需求分析 4.1.1 需求調(diào)查 4.1.2 系統(tǒng)功能分析 1.第 2概念結(jié)構(gòu)設(shè)計(jì) 2.2.1 局部E-R 圖 2.2.2 全局E-R 圖 3.第 3邏輯結(jié)構(gòu)設(shè)計(jì) 4.3.1 E-R 圖向關(guān)系模式轉(zhuǎn)換 4.3.2 建立關(guān)系模式 4.3.3 關(guān)系模式規(guī)范化處理 4.3.4 用戶子模式建立 4.3.5 關(guān)系模

2、式邏輯結(jié)構(gòu)定義 5.第 4數(shù)據(jù)庫物理結(jié)構(gòu)設(shè)計(jì) 7.4.1數(shù)據(jù)庫物理設(shè)計(jì) 7.第 5數(shù)據(jù)庫實(shí)施 8.5.1數(shù)據(jù)庫及數(shù)據(jù)庫對(duì)象建立 8.第 6數(shù)據(jù)庫完整性設(shè)計(jì) 9.6.1 主鍵 9.6.2 參照完整性設(shè)計(jì) 9.6.3 觸發(fā)器設(shè)計(jì)9.6.4 視圖設(shè)計(jì)12第7章 數(shù)據(jù)庫存儲(chǔ)過程設(shè)計(jì) 13總結(jié)14參考文獻(xiàn)： 1.4第1章需求分析1.1 需求調(diào)查通過對(duì)各個(gè)用戶的調(diào)查，該音響店DVD零售出租管理系統(tǒng)如下需求：1）系統(tǒng)管理：實(shí)現(xiàn)系統(tǒng)管理人員對(duì)系統(tǒng)的管理，包括添加刪除用戶，更改密碼等功能。2）數(shù)據(jù)管理：實(shí)現(xiàn)管理人員系統(tǒng)的管理，包括 DVD入庫，出租，出售，歸還等功能。3）基本信息：實(shí)現(xiàn)顯示客戶和 DVD基本信息

3、（包括客戶信息和客戶所租賃DVD信息,DVD基本信息）。4）查詢：查詢當(dāng)前 DVD狀況；查詢當(dāng)前用戶租賃狀況及歷史租賃狀況。1.2 系統(tǒng)功能分析用 戶 信 息 管 理1） DVD信息管理：存放及查看各 DVD的基本信息和數(shù)量。2）用戶信息管理：用于對(duì)用戶基本信息的錄入、查詢、修改、維護(hù)、刪除等常用功能, 并記錄用戶的租賃情況。3） DVD入庫管理：用于對(duì) DVD的入庫情況進(jìn)行記錄，并修改 DVD總量。4） DVD零售管理：用于記錄 DVD的零售情況，并修改 DVD總量。5） DVD借還管理：用于統(tǒng)計(jì)各 DVD的借還情況。第2章概念結(jié)構(gòu)設(shè)計(jì)2.1局部E-R圖:(2)對(duì)用戶建立E-R圖DVD名稱庫

4、存(1)對(duì)DVD '建立 E-R圖(3)對(duì)DVD租賃建立E-R圖DVDDVD編號(hào)租賃日期DVD名稱DVD租賃租賃用戶編號(hào)(4)對(duì)DVD歸還建立E-R(5)對(duì)DVD零售建立E-R圖DVD編號(hào)DVD名稱出售日期DVD零售出售數(shù)量(6)對(duì)DVD入庫建立E-R2.2全局E-R圖:DVD編號(hào)入庫日期DVD編號(hào)歸還用戶編號(hào)主演提供逾期天數(shù)姓名DVD提供DVD名稱用戶編號(hào)DVD零售庫存出售日期歷史租賃租賃日期DVD名稱DVD編號(hào)租賃編號(hào)DVD租賃第3章邏輯結(jié)構(gòu)設(shè)計(jì)3.1 E-R圖向關(guān)系模式轉(zhuǎn)變邏輯結(jié)構(gòu)是獨(dú)立于任何一種數(shù)據(jù)模型的，在實(shí)際應(yīng)用中，一般所用的數(shù)據(jù)庫環(huán)境已經(jīng)給定（如SQL Server或Or

5、acel或MySql）。由于目前使用的數(shù)據(jù)庫基 本上都是關(guān)系數(shù)據(jù)庫，因此首先需要將 E-R圖轉(zhuǎn)換為關(guān)系模型，然后根據(jù)具體 DBMS的特點(diǎn)和限制轉(zhuǎn)換為特定的DBMS支持下的數(shù)據(jù)模型，最后進(jìn)行優(yōu)化系 模式轉(zhuǎn)換3.2 建立關(guān)系模式DVD信息、（DVD編號(hào)，DVD名稱，主演，現(xiàn)貨，庫存）用戶信息（用戶編號(hào)，姓名，性別，當(dāng)前租賃，歷史租賃）DVD租賃（DVD編號(hào)，DVD名稱，租賃日期，租賃期限，租賃用戶編號(hào)，租賃編號(hào)）DVD歸還（DVD編號(hào)，DVD名稱，歸還日期，逾期天數(shù)，歸還用戶編號(hào)，歸還編號(hào)）DVD零售（DVD編號(hào)，DVD名稱，出售日期，出售數(shù)量）DVD入庫（DVD編號(hào)，DVD名稱，入庫日期，入庫數(shù)

6、量）3.3 關(guān)系模式規(guī)范化處理根據(jù)F,分析每一個(gè)關(guān)系模式是否滿足3NF ,對(duì)不滿足3NF的關(guān)系模式要進(jìn)行規(guī)范化處理。3.4 用戶子模式建立根據(jù)需求分析，研究建立滿足不同需求的用戶子模式，子模式表示形式為:子模式名（屬性列表）3.5 關(guān)系模式邏輯結(jié)構(gòu)定義1 .DVD詳細(xì)信息字段名數(shù)據(jù)類型長度約束DVD編號(hào)char4主鍵DVD名稱char10不為空主演char10不為空現(xiàn)貨int不為空庫存int不為空2 .用戶詳細(xì)信息字段名數(shù)據(jù)類型長度約束用戶編號(hào)char4主鍵姓名char10不為空性別nchar1男或女當(dāng)前租賃int可為空歷史租賃int可為空3 .DVD租賃信息字段名數(shù)據(jù)類型長度約束DVD編號(hào)c

7、har4外鍵DVD名稱char10不為空租賃日期datetime不為空租賃期限int不為空租賃用戶編號(hào)char4外鍵租賃編號(hào)char20主鍵4.DVD歸還信息字段名數(shù)據(jù)類型長度約束DVD編號(hào)char4外鍵DVD名稱char10不為空歸還日期datetime不為空逾期天數(shù)int不為空歸還用戶編號(hào)char4外鍵歸還編號(hào)char20主鍵，外鍵5.DVD零售信息字段名數(shù)據(jù)類型長度約束DVD編號(hào)char4主鍵，外鍵DVD名稱char10不為空出售日期datetime主鍵出售數(shù)量int不為空6.DVD入庫信息字段名數(shù)據(jù)類型長度約束DVD編號(hào)char4主鍵，外鍵DVD名稱char10不為空入庫日期datet

8、ime主鍵入庫數(shù)量int不為空第4章數(shù)據(jù)庫物理結(jié)構(gòu)設(shè)計(jì)4.1 數(shù)據(jù)庫物理設(shè)計(jì)數(shù)據(jù)庫物理設(shè)計(jì)：設(shè)計(jì)數(shù)據(jù)庫的物理結(jié)構(gòu)，根據(jù)數(shù)據(jù)庫的邏輯結(jié)構(gòu)來選定RDBMS （如Oracle、Sybase等），并設(shè)計(jì)和實(shí)施數(shù)據(jù)庫的存儲(chǔ)結(jié)構(gòu)、存取方式等。數(shù)據(jù)庫物理設(shè)計(jì)是后半段。將一個(gè)給定邏輯結(jié)構(gòu)實(shí)施到具體的環(huán)境中時(shí)， 邏輯數(shù)據(jù)模型 要選取一個(gè)具體的工作環(huán)境，這個(gè)工作環(huán)境提供了數(shù)據(jù)存儲(chǔ)結(jié)構(gòu)與存取方法，這個(gè)過程就是數(shù)據(jù)庫的物理設(shè)計(jì)。物理結(jié)構(gòu)依賴于給定的 DBMS和和硬件系統(tǒng)，因此設(shè)計(jì)人員必須充分了解所用RDBMS的內(nèi)部特征、存儲(chǔ)結(jié)構(gòu)、存取方法。數(shù)據(jù)庫的物理設(shè)計(jì)通常分為兩步，第一，確定數(shù)據(jù)庫的 物理結(jié)構(gòu)，第二，評(píng)價(jià)實(shí)施空間

9、效率和時(shí)間效率確定數(shù)據(jù)庫的物理結(jié)構(gòu)包含下面四方面的內(nèi)容：1、確定數(shù)據(jù)的存儲(chǔ)結(jié)構(gòu)2、設(shè)計(jì)數(shù)據(jù)的存取路徑3、確定數(shù)據(jù)的存放位置4、確定系統(tǒng)配置數(shù)據(jù)庫物理設(shè)計(jì)過程中需要對(duì)時(shí)間效率、空間效率、維護(hù)代價(jià)和各種用戶要求進(jìn)行權(quán)衡，選擇一個(gè)優(yōu)化方案作為數(shù)據(jù)庫物理結(jié)構(gòu)。在數(shù)據(jù)庫物理設(shè)計(jì)中， 最有效的方式是集中地存儲(chǔ)和檢索對(duì)象。第5章數(shù)據(jù)庫實(shí)施5.1數(shù)據(jù)庫及數(shù)據(jù)庫對(duì)象建立(1)創(chuàng)建數(shù)據(jù)庫：create database音響店DVD零售出租管理系統(tǒng)數(shù)據(jù)庫on(name ='音響店DVD零售出租管理系統(tǒng)數(shù)據(jù)文件,音響店DVD零售出租管理系統(tǒng)數(shù)據(jù)文件.mdf',size =15MB,maxsize =

10、50MB,filegrowth =5%)log on(name ='音響店DVD零售出租管理系統(tǒng)日志文件 ',音響店DVD零售出租管理系統(tǒng)日志文件.ldf',size = 2MB,maxsize = 5MB,filegrowth = 1MB)(2)創(chuàng)建表：create table DVD 信息表(DVD 編號(hào) char(4) not null primary key,DVD 名稱 char(10) not null,主?M char(10) not null,現(xiàn)貨 int not null,庫存 int not null )create table用戶信息表(用戶編號(hào)

11、char(4) not null primary key,姓名 char(10) not null,性別 nchar not null,當(dāng)前租賃int null,歷史租賃int null) create table DVD 租賃表(DVD 編號(hào) char(4) not null,DVD 名稱 char(10) not null,租賃日期 datetime not null,租賃用戶編號(hào) char(4) not null,租賃編號(hào) char(20) not null primary key,foreign key(DVD 編號(hào))references DVD foreign key( 租賃用戶編號(hào)

12、)references)create table DVD 歸還表(DVD 編號(hào) char(4) not null,DVD 名稱 char(10) not null,歸還日期 datetime not null,逾期天數(shù)int null,歸還用戶編號(hào) char(4) not null,歸還編號(hào) char(20) not null primary key,foreign key(DVD 編號(hào))references DVD foreign key( 歸還編號(hào))references DVD foreign key( 歸還用戶編號(hào))references)create table DVD 零售表信息l表（

13、DVD編號(hào)），用戶信息表（用戶編號(hào)）信息I表（DVD編號(hào)），租賃表（租賃編號(hào)）,用戶信息表（用戶編號(hào)）(DVD 編號(hào) char(4) not null,DVD 名稱 char（10） not null,出售日期 date not null,出售數(shù)量 int not null,primary key（DVD編號(hào)，出售日期），foreign key（DVD 編號(hào)）references DVD信息表（DVD 編號(hào)）create table DVD 入庫表（DVD 編號(hào) char（4） not null,DVD 名稱 char（10） not null,入庫日期 date not null,入庫數(shù)量

14、int not null,primary key（DVD編號(hào)，入庫日期），foreign key（DVD 編號(hào)）references DVD信息表（DVD 編號(hào)）第6章數(shù)據(jù)庫完整性設(shè)計(jì)6.1 主鍵表名主鍵DVD信息表（DVD編號(hào)）用戶信息表（用戶編號(hào)）DVD租賃表（租賃編號(hào)）DVD歸還表（歸還編號(hào)）DVD零售表（DVD編號(hào)，出售日期）DVD入庫表（DVD編號(hào)，入庫日期）6.2 參照完整性設(shè)計(jì)表名外鍵參照DVD租賃表（DVD編號(hào)，租賃用戶編號(hào)）DVD信息表.DVD編號(hào)用戶信息表.用戶編號(hào)DVD歸還表（DVD編號(hào)，歸還用戶編號(hào)）DVD信息表.DVD編號(hào)用戶信息表.用戶編號(hào)DVD零售表（DVD編號(hào)）

15、DVD信息表.DVD編號(hào)DVD入庫表（DVD編號(hào)）DVD信息表.DVD編號(hào)6.3 觸發(fā)器設(shè)計(jì)1 .實(shí)現(xiàn)出租時(shí)自動(dòng)修改DVD現(xiàn)貨及客戶的當(dāng)前租賃數(shù)量create trigger _rent on DVD租賃表-租賃觸發(fā)器for insertasbeginupdate DVD 信息表 set現(xiàn)貨=現(xiàn)貨-1from DVD 信息表 ,insertedwhere DVD 信息表.DVD 編號(hào)=inserted.DVD 編號(hào)update 用戶信息表 set當(dāng)前租賃=當(dāng)前租賃+1from 用戶信息表,insertedwhere 用戶信息表 用戶編號(hào)=inserted.租賃用戶編號(hào)end2 .實(shí)現(xiàn)歸還時(shí)自動(dòng)

16、修改DVD現(xiàn)貨及客戶的當(dāng)前租賃數(shù)量和歷史租賃數(shù)量create trigger _return on DVD 歸還表-歸還觸發(fā)器for insert as beginupdate DVD 信息表 set現(xiàn)貨=現(xiàn)貨+1from DVD 信息表 ,insertedwhere DVD 信息表.DVD 編號(hào)=inserted.DVD 編號(hào)update 用戶信息表 set當(dāng)前租賃=當(dāng)前租賃-1from 用戶信息表,insertedwhere 用戶信息表用戶編號(hào)=inserted.歸還用戶編號(hào)update 用戶信息表 set歷史租賃=歷史租賃+1from 用戶信息表,insertedwhere 用戶信息表用

17、戶編號(hào)=inserted.歸還用戶編號(hào)update DVD 歸還表 set DVD 編號(hào)=DVD 租賃表.DVD編號(hào),DVD名稱=DVD 租賃表.DVD名稱，歸還用戶編號(hào)=DVD租賃表.租賃用戶編號(hào)from DVD 租賃表,DVD 歸還表 ,insertedwhere DVD 租賃表.租賃編號(hào)=inserted.歸還編號(hào) end3 .實(shí)現(xiàn)入庫時(shí)自動(dòng)修改DVD庫存create trigger _buy on DVD入庫表-入庫觸發(fā)器for insert asupdate DVD 信息表 set庫存=庫存+inserted. 入庫數(shù)量from DVD 信息表 ,insertedwhere DVD

18、信息表.DVD 編號(hào)=inserted.DVD 編號(hào)4 .實(shí)現(xiàn)零售時(shí)自動(dòng)修改DVD庫存create trigger _sale on DVD 零售表-零售觸發(fā)器for insert asupdate DVD信息表 set庫存=庫存-inserted.出售數(shù)量from DVD 信息表 ,insertedwhere DVD 信息表.DVD 編號(hào)=inserted.DVD 編號(hào)5 .實(shí)現(xiàn)歸還時(shí)自動(dòng)計(jì)算并存入逾期天數(shù)create trigger _days on DVD 歸還表-逾期天數(shù)觸發(fā)器for insert asdeclare days intset days=（select cast（inse

19、rted. 歸還日期 as int）-cast（DVD租賃表.租賃日期 as int）from DVD 租賃表,insertedwhere DVD 租賃表.租賃編號(hào)=inserted.歸還編號(hào)）if days（select DVD租賃表.租賃期限 from DVD 租賃表，inserted where DVD租賃表.租賃編號(hào)=inserted. 歸還編號(hào)）beginupdate DVD 歸還表set逾期天數(shù)=days-（select DVD 租賃表.租賃期限from DVD 租賃表where DVD 租賃表.租賃編號(hào)=inserted.歸還編號(hào)）from DVD 租賃表,DVD 歸還表 ,in

20、sertedwhere DVD 租賃表.租賃編號(hào)=inserted.歸還編號(hào)endelsebeginupdate DVD 歸還表set逾期天數(shù)=0from DVD 租賃表,DVD 歸還表,insertedwhere DVD 租賃表.租賃編號(hào)=inserted.歸還編號(hào)end6.4視圖設(shè)計(jì)創(chuàng)建視圖查詢各類DVD的庫存情況create view number asselect DVD 編號(hào),DVD名稱，現(xiàn)貨，庫存 from DVD 信息表第7章數(shù)據(jù)庫存儲(chǔ)過程設(shè)計(jì)創(chuàng)建存儲(chǔ)過程統(tǒng)計(jì)某段時(shí)間內(nèi)各DVD的銷售、借還數(shù)量create procedure tongji begintime date,endti

21、me date,type char(6)asdeclare leixing char(6)set leixing=typebeginif leixing=' 零售select begintime as起始日期，endtime as 截至日期,DVD編號(hào)，SUM(出售數(shù)量)as銷售量from DVD 零售表group by DVD 編號(hào)else if leixing=' 出租'select begintime as起始日期，endtime as 截至日期，DVD 編號(hào)，count（DVD 編號(hào)）as 出租量from DVD 租賃表where 租賃日期 >=begin

22、time and 租賃日期 <二endtimegroup by DVD 編號(hào)else if leixing=' 歸還'select begintime as起始日期，endtime as 截至日期，DVD 編號(hào),count（DVD 編號(hào)）as 歸還量from DVD 歸還表where 歸還日期 >=begintime and 歸還日期 <二endtimegroup by DVD 編號(hào)else print '請(qǐng)輸入正確的查詢類型 ' end總結(jié)在做本次課程設(shè)計(jì)的過程中，遇到了許多困難，正是這些困難，讓我把這門課學(xué)得更好，有了更深一步的理解，明白了

23、理論和實(shí)踐要想充分地結(jié)合，需要非常扎實(shí)的基本功。這就說明學(xué)好基礎(chǔ)知識(shí)是理論付諸實(shí)踐的前提。參考文獻(xiàn)：1 .王珊,薩師熠.數(shù)據(jù)庫系統(tǒng)概論M.高等教育出版社，20052 .鄭阿奇等.SQLServer實(shí)用教程（第3版）M.電子工業(yè)出版社，20093 .趙乃真等.信息系統(tǒng)設(shè)計(jì)與應(yīng)用.清華大學(xué)出版社，2005附錄: 隨機(jī)插入用戶信息表數(shù)據(jù)存儲(chǔ)過程代碼:set xing= rxing%35create procedure dbo.usermassage_proc1/*為用戶表輸入數(shù)據(jù)*/asdeclare num int,rmd floatdeclare gender nchar(1) declare

24、userid intdeclare xing int,rxing int, na nvarchar(8)-姓declare ming int,rming int,me nvarchar(10)-名 declare name nvarchar(20)- 姓名 set num=0while num<1000beginset num=num+1set rmd=rand()- 產(chǎn)生的隨機(jī)數(shù) rmdif(rmd>0.5)-隨機(jī)確定性別set gender=' 男'else set gender=' 女'set rxing=floor(rmd*100)if (m

25、ing=1 andrmd<=0.5) set me='洪霞'set rming=floor(rmd*10000)-rxing*100 if xing=1beginset na='王'set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏'if (ming=2 and rmd>0.5) set me='天一'if (ming=3 and rmd>0.5) set me='洪軍'if (ming=4 and rmd>0.5) set m

26、e='天霸'if (ming=5 and rmd>0.5) set me='杰'if (ming=6 and rmd>0.5) set me='小童'if (ming=7 and rmd>0.5) set me='力凱'if (ming=8 and rmd>0.5) set me='小寶'if (ming=9 and rmd>0.5) set me='海軍'if (ming=10 and rmd>0.5) set me='勇'if (ming=11

27、 and rmd>0.5) set me='智'if (ming=12 and rmd>0.5) set me='洪志if (ming=13 and rmd>0.5) set me='志強(qiáng)if (ming=14and rmd>0.5) set me='云凱if (ming=15and rmd>0.5) set me='云龍if (ming=16and rmd>0.5) set me='玉衡if (ming=2 andrmd<=0.5) set me='樂樂'if (ming=3 a

28、ndrmd<=0.5) set me='洪娟'if (ming=4 andrmd<=0.5) set me='雪'if (ming=5 andrmd<=0.5) set me='冉冉'if (ming=6 andrmd<=0.5) set me='曉旭'if (ming=7 andrmd<=0.5) set me='曉場(chǎng)'if (ming=8 andrmd<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='

29、;思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=15 andrmd<=0.5) set me='晶晶if (ming=16 andrmd<=0.5) set me=&

30、#39;小璐if (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=2beginset na='李set ming= (rming%17)if (ming=6 andrmd<=0.5) set me='曉旭'if (ming=2 andrmd>0.5) set me='天一'if (ming=3 andrmd>0.5) set me='洪軍'if (ming=4 andrmd>0.5) set me='天霸'if (ming=5

31、andrmd>0.5) set me='杰'if (ming=6 andrmd>0.5) set me='小童'if (ming=7 andrmd>0.5) set me='力凱'if (ming=8 andrmd>0.5) set me='小寶'if (ming=9 andrmd>0.5) set me='海軍'if (ming=10 andrmd>0.5) set me='勇'if (ming=11 andrmd>0.5) set me='智&#

32、39;if (ming=12 andrmd>0.5) set me='洪志if (ming=13 andrmd>0.5) set me='志強(qiáng)if (ming=14and rmd>0.5) set me='云凱'if (ming=15and rmd>0.5) set me='云龍'if (ming=16and rmd>0.5) set me='玉衡'if (ming=0 and rmd>0.5) set me='克強(qiáng)'if (ming=1 andrmd<=0.5) set

33、me='洪霞if (ming=2 andrmd<=0.5) set me='樂樂if (ming=3 andrmd<=0.5) set me='洪娟if (ming=4 andrmd<=0.5) set me='雪'if (ming=7 andrmd<=0.5) set me='曉場(chǎng)'if (ming=8 andrmd<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='思思'if (ming=10and rmd<=0.5

34、) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=15 andrmd<=0.5) set me='晶晶if (ming=16 andrmd<=0.5) set me='小璐if (ming=0 and rmd<=0.5)

35、set me='蓉蓉'endelse if xing=3beginset na='張'set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏if (ming=2 and rmd>0.5) set me='天一if (ming=3 and rmd>0.5) set me='洪軍if (ming=4 and rmd>0.5) set me='天霸if (ming=5 and rmd>0.5) set me='杰'if (ming=6 a

36、nd rmd>0.5) setme='小童'if (ming=7 and rmd>0.5) setme='力凱'if (ming=8 and rmd>0.5) setme='小寶'if (ming=9 and rmd>0.5) setme='海軍'if (ming=10 and rmd>0.5) setme='勇'if (ming=11 and rmd>0.5) setme='智'if (ming=12 and rmd>0.5) setme='洪志&

37、#39;if (ming=13 and rmd>0.5) setme='志強(qiáng)'if (ming=14and rmd>0.5) setme='云凱'if (ming=15and rmd>0.5) setme='云龍'if (ming=16and rmd>0.5) setme='玉衡'if (ming=0 and rmd>0.5) set me='克強(qiáng)'if (ming=1 and rmd<=0.5) set me='洪霞'if (ming=2 and rmd<

38、=0.5) setme='樂樂'if (ming=3 and rmd<=0.5) setme='洪娟'if (ming=4 and rmd<=0.5) setme='雪'if (ming=5 and rmd<=0.5) setme='冉冉'if (ming=6 and rmd<=0.5) setme='曉旭,if (ming=7 and rmd<=0.5) setme='曉場(chǎng)'if (ming=8 and rmd<=0.5) setme='燕'if (mi

39、ng=9 and rmd<=0.5) setme='思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=15 andrmd<=0.5) set me='晶晶if (

40、ming=16 andrmd<=0.5) set me='小璐if (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=4beginset na='劉set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏if (ming=2 and rmd>0.5) set me='天一if (ming=3 and rmd>0.5) set me='洪軍if (ming=4 and rmd>0.5) set me=

41、9;天霸if (ming=5 and rmd>0.5) set me='杰'if (ming=6 and rmd>0.5) set me='小童if (ming=7 and rmd>0.5) set me='力凱if (ming=8 and rmd>0.5) set me='小寶if (ming=9 and rmd>0.5) set me='海軍if (ming=10 and rmd>0.5) set me='勇if (ming=16 and rmd<=0.5) set me='小璐if

42、(ming=12 andrmd>0.5) set me='洪志'if (ming=13 andrmd>0.5) set me='志強(qiáng)'if (ming=14and rmd>0.5) set me='云凱'if (ming=15and rmd>0.5) set me='云龍'if (ming=16and rmd>0.5) set me='玉衡'if (ming=0 and rmd>0.5) set me='克強(qiáng)'if (ming=1 andrmd<=0.5)

43、set me='洪霞'if (ming=2 andrmd<=0.5) set me='樂樂'if (ming=3 andrmd<=0.5) set me='洪娟'if (ming=4 andrmd<=0.5) set me='雪'if (ming=5 andrmd<=0.5) set me='冉冉'if (ming=6 andrmd<=0.5) set me='曉旭'if (ming=7 andrmd<=0.5) set me='曉場(chǎng)'if (mi

44、ng=8 andrmd<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'i

45、f (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=5beginset na='蘇set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏'if (ming=2 and rmd>0.5) set me='天一'if (ming=3 and rmd>0.5) set me='洪軍'if (ming=4 and rmd>0.5) set me='天霸'if (ming=5 and

46、rmd>0.5) set me='杰'if (ming=6 and rmd>0.5) set me='小童'if (ming=7 and rmd>0.5) set me='力凱'if (ming=8 and rmd>0.5) set me='小寶'if (ming=9 and rmd>0.5) set me='海軍'if (ming=10 and rmd>0.5) set me='勇'if (ming=11 and rmd>0.5) set me='

47、智'if (ming=12 and rmd>0.5) set me='洪志if (ming=13 and rmd>0.5) set me='志強(qiáng)if (ming=14and rmd>0.5) set me='云凱if (ming=15and rmd>0.5) set me='云龍if (ming=16and rmd>0.5) set me='玉衡'if (ming=0 and rmd>0.5) set me='克強(qiáng)'if (ming=1 andrmd<=0.5) set me=&#

48、39;洪霞'if (ming=2 andrmd<=0.5) set me='樂樂'if (ming=3 andrmd<=0.5) set me='洪娟'if (ming=4 andrmd<=0.5) set me='雪'if (ming=5 andrmd<=0.5) set me='冉冉'if (ming=6 andrmd<=0.5) set me='曉旭'if (ming=7 andrmd<=0.5) set me='曉場(chǎng)'if (ming=8 andr

49、md<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=1

50、5 andrmd<=0.5) set me='晶晶if (ming=16 andrmd<=0.5) set me='小璐if (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=6beginset na='陳set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏'if (ming=2 and rmd>0.5) set me='天一'if (ming=3 and rmd>0.5) set m

51、e='洪軍'if (ming=4 and rmd>0.5) set me='天霸'if (ming=5 and rmd>0.5) set me='杰'if (ming=6 and rmd>0.5) set me='小童'if (ming=7 and rmd>0.5) set me='力凱'if (ming=8 and rmd>0.5) set me='小寶'if (ming=9 and rmd>0.5) set me='海軍'if (ming=10

52、 and rmd>0.5) set me='勇'if (ming=11 and rmd>0.5) set me='智'if (ming=12 and rmd>0.5) set me='洪志if (ming=13 and rmd>0.5) set me='志強(qiáng)if (ming=14and rmd>0.5) set me='云凱'if (ming=15and rmd>0.5) set me='云龍'if (ming=16and rmd>0.5) set me='玉衡&#

53、39;if (ming=0 and rmd>0.5) set me='克強(qiáng)'if (ming=1 and rmd<=0.5) set me='洪霞if (ming=2 and rmd<=0.5) set me='樂樂if (ming=3 and rmd<=0.5) set me='洪娟if (ming=4 andrmd>0.5) set me='天霸'if (ming=5 andrmd<=0.5) set me='冉冉'if (ming=6 andrmd<=0.5) set me=

54、'曉旭'if (ming=7 andrmd<=0.5) set me='曉場(chǎng)'if (ming=8 andrmd<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.

55、5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=15 andrmd<=0.5) set me='晶晶if (ming=16 andrmd<=0.5) set me='小璐if (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=7beginset na='楊'set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏if (m

56、ing=2 and rmd>0.5) set me='天一if (ming=5 andrmd>0.5) set me='杰'if (ming=6 andrmd>0.5) set me='小童'if (ming=7 andrmd>0.5) set me='力凱'if (ming=8 andrmd>0.5) set me='小寶'if (ming=9 andrmd>0.5) set me='海軍'if (ming=10 andrmd>0.5) set me='勇

57、'if (ming=11 andrmd>0.5) set me='智'if (ming=12 andrmd>0.5) set me='洪志if (ming=13 andrmd>0.5) set me='志強(qiáng)if (ming=14and rmd>0.5) set me='云凱'if (ming=15and rmd>0.5) set me='云龍'if (ming=16and rmd>0.5) set me='玉衡'if (ming=0 and rmd>0.5) set me='克強(qiáng)'if (ming=1 andrmd<=0.5) set me='洪霞if (ming=2 andrmd<=0.5) set me='樂樂if (ming=3