C語言課程設(shè)計報告

1、課程名稱 計算機高級語言課程設(shè)計（c） 教師姓名 劉 剛 本科生姓名 郭 勇 權(quán) 本科生學(xué)號 20121003468 本科生專業(yè) 機械設(shè)計制造及其自動化 所在院系 機 電 學(xué) 院 類別: c. 本科生 日期: 2013.7.11 課程設(shè)計評語對課程論文的評語:平時成績：課程論文成績：總 成 績：評閱人簽名：注：1、無評閱人簽名成績無效；2、必須用鋼筆或圓珠筆批閱，用鉛筆閱卷無效；3、如有平時成績，必須在上面評分表中標(biāo)出，并計算入總成績。目 錄1題目要求12需求分析13總體設(shè)計14詳細設(shè)計25上機操作236總結(jié)287致謝28參考文獻291題目要求模擬手機通信錄管理系統(tǒng)，實現(xiàn)對手機中的通信錄進行管

2、理。功能要求如下：（1）查看功能：選擇此功能時，列出下列3類選擇。辦公類.個人類.商務(wù)類.當(dāng)選中某類時，顯示出此類所有數(shù)據(jù)中的姓名、電話號碼和電子郵件。（2）增加功能：能錄入新數(shù)據(jù)。一個結(jié)點包括：姓名、電話號碼、分類（辦公類、個人類、商務(wù)類）、電子郵件。例如：楊春135896664454商務(wù)類chuny當(dāng)錄入了重復(fù)的姓名和電話號碼時，則提示數(shù)據(jù)錄入重復(fù)并取消錄入；當(dāng)通信錄中超過15條信息時，儲存空間已滿，不能再錄入新數(shù)據(jù)；錄入的新數(shù)據(jù)能按遞增的順序自動進行條目編號。（3）修改功能：選中某個人姓名時，可對此人的相應(yīng)數(shù)據(jù)進行修改。（4）刪除功能：選中某個人的姓名時，可對此人的相應(yīng)數(shù)據(jù)進行刪除，并自

3、動調(diào)整后續(xù)條目的編號。2需求分析根據(jù)題目要求，由于聯(lián)系人信息時存放在文件中，所以應(yīng)提供文件的輸入、輸出等操作；在程序中需要查看聯(lián)系人信息，應(yīng)提供顯示、查看功能；要實現(xiàn)修改和刪除聯(lián)系人功能，所以應(yīng)提供對文件的修改和刪除操作。3總體設(shè)計以下分析整個系統(tǒng)，根據(jù)上面的需求分析，可將這個系統(tǒng)的設(shè)計分為四大模塊（如圖一）：圖一 系統(tǒng)功能模塊圖4詳細設(shè)計【詳細設(shè)計】1. 主函數(shù)程序main() /*主函數(shù)*/menu();2. 主菜單主菜單函數(shù)提供用戶對系統(tǒng)功能的選擇，包括瀏覽聯(lián)系人、增加聯(lián)系人、修改聯(lián)系人、刪除聯(lián)系人。該函數(shù)的流程圖如圖二所示。程序如下。開始顯示一系列功能選項輸入n，判斷n是否是1-4？y

4、根據(jù)n的值調(diào)用各功能模塊函數(shù)結(jié)束圖二 主菜單流程圖程序void menu() /*菜單函數(shù)*/int n=0,w1;do puts(tt*主菜單*nn);puts(tttt1. 查看聯(lián)系人);puts(tttt2. 增加聯(lián)系人);puts(tttt3. 修改聯(lián)系人信息);puts(tttt4. 刪除聯(lián)系人);puts(nntt*n);printf( (請選擇1-4): bb);scanf(%d,&n);if(n4)w1=1;getchar();elsew1=0;while(w1=1);switch(n)case 1:browse();break; /*瀏覽聯(lián)系人模塊*/case 2:add()

5、;break; /*增加聯(lián)系人模塊*/ case 3:modify();break; /*修改聯(lián)系人模塊*/case 4:del();break; /*刪除聯(lián)系人模塊*/3數(shù)據(jù)結(jié)構(gòu)設(shè)計各聯(lián)系人信息包括有姓名、電話號碼、聯(lián)系人類型、電子郵件。可以使用結(jié)構(gòu)體數(shù)組，則姓名、電話、類型和電子郵件作為結(jié)構(gòu)體成員。struct member /*聯(lián)系人結(jié)構(gòu)體*/char name20; /*聯(lián)系人姓名*/char tel11; /*聯(lián)系人電話*/int type; /*聯(lián)系人類型：1為辦公類；2為個人類；3為商務(wù)類*/char email30; /*聯(lián)系人電子郵件*/memn; /*n為全局變量，表示能夠

6、儲存的聯(lián)系人數(shù)量*/4. 瀏覽聯(lián)系人模塊需求分析該模塊的功能是使用戶可以瀏覽或者分類瀏覽各聯(lián)系人信息。如圖三所示，當(dāng)用戶輸入1、2、3、4時，分別顯示辦公類聯(lián)系人、個人類聯(lián)系人、商務(wù)類聯(lián)系人和所有聯(lián)系人。圖三 瀏覽聯(lián)系人模塊流程圖程序void browse() /*瀏覽聯(lián)系人函數(shù)*/int m,n=0,w1;m=load();doputs(nntt *查詢聯(lián)系人*);puts(tttt1. 查詢辦公類聯(lián)系人); /*查詢辦公類聯(lián)系人*/puts(tttt2. 查詢個人類聯(lián)系人); /*查詢個人類聯(lián)系人*/puts(tttt3. 查詢商務(wù)類聯(lián)系人); /*查詢商務(wù)類聯(lián)系人*/puts(tttt4

7、. 查詢所有聯(lián)系人); /*查詢所有聯(lián)系人*/puts(tttt5. 返回主菜單 ); /*返回菜單*/printf(請鍵入數(shù)字(1-5)選擇: bb);scanf(%d,&n);if(n5)w1=1;getchar();elsew1=0;while(w1=1);if(n=1)printf_cle(m); /*顯示辦公類聯(lián)系人*/puts(n信息已顯示，按任意鍵返回菜單 n);system(pause); /*暫停系統(tǒng)工作*/getchar();menu();else if(n=2)printf_per(m); /*顯示個人類聯(lián)系人*/puts(n信息已顯示，按任意鍵返回菜單 n);syste

8、m(pause); /*暫停系統(tǒng)工作*/getchar();menu();else if(n=3)printf_com(m); /*顯示商務(wù)類聯(lián)系人*/puts(n信息已顯示，按任意鍵返回菜單 n);system(pause); /*暫停系統(tǒng)工作*/getchar();menu();else if(n=4)printf_all(m); /*顯示商務(wù)類聯(lián)系人*/puts(n信息已顯示，按任意鍵返回菜單 n);system(pause); /*暫停系統(tǒng)工作*/getchar();menu();elsemenu();5. 增加聯(lián)系人模塊需求分析該模塊的功能是使用戶實現(xiàn)增加新聯(lián)系人的功能，從鍵盤輸入新

9、聯(lián)系人信息并加入到原文件中。該模塊流程圖如圖四所示。程序void add()int m,w1,n,t,w2,i,j; /*m為現(xiàn)有聯(lián)系人數(shù)量*/m=load(); /*加載聯(lián)系人信息，并將聯(lián)系人數(shù)量輸入m*/if(m=n)運行save(int)函數(shù)，將信息保存至文件中是否保存？輸入聯(lián)系人姓名、電話、類型、電子郵箱判斷m是否小于n？運行m=load()函數(shù)，加載現(xiàn)有聯(lián)系人信息開始返回至主菜單輸出：儲存空間已滿，無法輸入 ynny 結(jié)束圖四 增加聯(lián)系人模塊流程圖printf(儲存空間不足！n);printf(按任意鍵返回菜單.);getchar();system(pause);menu();els

10、eputs(t請輸入聯(lián)系人姓名:); /*輸入聯(lián)系人姓名*/scanf(%s,); /*將聯(lián)系人姓名保存至結(jié)構(gòu)體*/puts(t請輸入聯(lián)系人電話號碼:);scanf(%s,memm.tel);do /*選擇聯(lián)系人類型語句*/puts(nnnnn:nnn請選擇聯(lián)系人類型);puts(1, 辦公類t);puts(2, 個人類t);puts(3. 商務(wù)類t);puts(請鍵入數(shù)字選擇聯(lián)系人類型: bb);scanf(%d,&n);if(n!=1)&(n!=2)&(n!=3)w1=1;getchar();elsew1=0;while(w1=1);switch(n) /*將聯(lián)系人類型信

11、息存入結(jié)構(gòu)體中*/case 1:memm.type=1;break;case 2:memm.type=2;break;case 3:memm.type=3;break;puts(t請輸入聯(lián)系人電子郵件地址:);scanf(%s,memm.email);doputs(確定保存? 1.是 2.否 bb);scanf(%d,&t);if(t2)w2=1;getchar();elsew2=0;while(w2=1);if(t=1)for(i=0;im;i+)if(strcmp(,)=0)puts(姓名已存在！不能存儲，請按任意鍵返回菜單!);for(j=0;j20;

12、j+) j=0;for(j=0;j11;j+)memm.telj=0;memm.type=0;for(i=0;i30;i+)memm.emailj=0;system(pause);menu();if(strcmp(memi.tel,memm.tel)=0)puts(姓名已存在！不能存儲，請按任意鍵返回菜單!);for(j=0;j20;j+) j=0;for(j=0;j11;j+)memm.telj=0;memm.type=0;for(i=0;i30;i+)memm.emailj=0;system(pause);menu();save(m); /*保存聯(lián)系人信

13、息至文本文檔*/puts(信息已存儲!n);puts(以下是所有信:n);printf_all(m+1);getchar();puts(請按任意鍵返回菜單);system(pause);menu();if(t=2) /*如果用戶不保存，則將剛剛存入結(jié)構(gòu)體中的數(shù)據(jù)刪除*/for(i=0;i20;i+) i=0;for(i=0;i11;i+)memm.teli=0;memm.type=0;for(i=0;i30;i+)memm.emaili=0;puts(信息存儲失敗!n);puts(:以下是所有信息n);printf_all(m);getchar();puts(請按任意鍵返回菜

14、單);system(pause);menu();6. 修改聯(lián)系人模塊需求分析該模塊的功能的功能是顯示所有聯(lián)系人信息。顯示完后，用戶輸入要修改聯(lián)系人的序號，系統(tǒng)根據(jù)用戶輸入的序號顯示用戶選擇的聯(lián)系人，并提示用戶需要修改哪部分信息，是姓名、電話、類型還是電子郵箱。根據(jù)用戶的選擇修改相應(yīng)的信息。程序 void modify()int m,n,t,w1,w2;m=load();puts(以下是所有信息:t);printf_all(m); /*顯示所有信息，以便用戶確認所要修改的信息*/doputs(請輸入您想修改的聯(lián)系人數(shù)字代號，或按0退出:);scanf(%d,&n);if(nm)w1=1;getc

15、har();else開始w1=0;運行m=load（）函數(shù)，加載現(xiàn)有聯(lián)系人信息，并顯示所有用戶信息while(w1=1);if(n=0)menu();printf_one(n);do輸入nputs(tttt1, 姓名);puts(tttt2. 電話號碼);判斷n是否在015中puts(tttt3. 類型);nputs(tttt4. 電子郵件);puts(tttt0. 退出);yputs(請輸入您想修改的類型數(shù)字代號，或按0退出:);根據(jù)n的值調(diào)用相應(yīng)功能模塊scanf(%d,&t);if(t4)n是否等于0w2=1;getchar();yelsenw2=0;輸入twhile(w2=1);結(jié)束返

16、回至主菜單調(diào)用相應(yīng)功能模塊輸入tn判斷t是否在04中y調(diào)用相應(yīng)功能模塊返回至主菜單結(jié)束圖五 修改聯(lián)系人模塊流程圖if(t=1)modify_name(n,m); /*修改姓名函數(shù)，n為要修改的聯(lián)系人編號；m為總聯(lián)系人數(shù)*/if(t=2)modify_tel(n,m); /*修改電話函數(shù)，n為要修改的聯(lián)系人編號；m為總聯(lián)系人數(shù)*/if(t=3)modify_type(n,m); /*修改類型函數(shù)，n為要修改的聯(lián)系人編號；m為總聯(lián)系人數(shù)*/if(t=4)modify_email(n,m); /*修改email函數(shù)，n為要修改的聯(lián)系人編號；m為總聯(lián)系人數(shù)*/if(t=0)menu();7. 刪除聯(lián)系

17、人模塊需求分析該模塊首先顯示現(xiàn)有所有聯(lián)系人，顯示完成后，用戶輸入要刪除的聯(lián)系人序號。刪除方式是將數(shù)據(jù)從結(jié)構(gòu)體中刪除，然后將后面的記錄向前移。刪除之后將記錄保存至文件中。程序void del()int m,n,w1,w2,t,i;m=load();puts(以下是所有信息:t);printf_all(m);doputs(請輸入您想要刪除的聯(lián)系人數(shù)字代號: bb);scanf(%d,&n);if(nm)w1=1;getchar();elsew1=0;while(w1=1);do /*用do while語句控制用戶的輸入，使用戶只能輸入1或者2*/puts(您確定要刪除此聯(lián)系人:);printf_o

18、ne(n);puts(n您確定要刪除嗎？ 1,是 2,否);scanf(%d,&t);開始運行m=load();加載現(xiàn)有聯(lián)系人信息；并顯示所有聯(lián)系人信息輸入要刪除的聯(lián)系人序號n判斷0nm是否成立ny顯示用戶要刪除的聯(lián)系人的所有信息用戶是否確認刪除ny刪除數(shù)據(jù)，并運行move函數(shù)，將刪除位置后面的數(shù)據(jù)前移運行save函數(shù)，將信息保存至文件中返回至主菜單結(jié)束圖六 刪除聯(lián)系人模塊if(t2)w2=1;getchar();elsew2=0;while(w2=1);if(t=2)puts(信息已保留，請按任意鍵反回菜單n);getchar();system(pause);menu();if(t=1)fo

19、r(i=0;i20;i+)i=0;for(i=0;i11;i+)memn-1.teli=0;memn-1.type=0;for(i=0;i30;i+)memn-1.emaili=0;move(n,m);puts(信息已刪除，請按任意鍵反回菜單n);getchar();system(pause);menu();8. 公共函數(shù)以下為各模塊中可能用到的一些公共函數(shù)。（1） 加載聯(lián)系人信息函數(shù)：int load()說明該函數(shù)用于將文件中的數(shù)據(jù)加載至結(jié)構(gòu)體中，并且可以返回現(xiàn)有聯(lián)系人的數(shù)目。程序int load()file *fp;int i,j;if(fp=fopen(e:vc p

20、rogrammesmembers.txt,rb)=null)/*以只讀方式打開一個二進制文件*/printf(n不能找到信息 );for(i=0;(!feof(fp)&(in);i+)fread(&memi,sizeof(struct member),1,fp);/*將文件中的數(shù)據(jù)加載至結(jié)構(gòu)體中*/fclose(fp); /*關(guān)閉文件*/for(j=0;(strcmp(,0)!=0)&(j0時，首先進入save_1函數(shù)，新建一個文件，同時把mem0的數(shù)據(jù)保存；然后進入save_2函數(shù)，將mem1到memm的數(shù)據(jù)追加至文件中*/ save_2(m);該包含兩個子函數(shù)：void

21、save_1()和void save_2(int m)，當(dāng)結(jié)構(gòu)體中只有一個元素，即m=0時，只執(zhí)行第一個函數(shù)，新建一個文件并將數(shù)據(jù)存入文件中；如果結(jié)構(gòu)體中多于一個元素，即m0時，首先執(zhí)行第一個函數(shù)新建一個文件，然后執(zhí)行第二個函數(shù)，將結(jié)構(gòu)體中下標(biāo)大于0的數(shù)據(jù)存入文件中。程序void save_1()file *fp;if(fp=fopen(e:vc programmesmembers.txt,wb)=null)printf(n不能找到信息 );fwrite(&mem0,sizeof(struct member),1,fp);fclose(fp);程序void save_2(int m)int i

22、;file *fp;if(fp=fopen(e:vc programmesmembers.txt,ab)=null)printf(n不能找到信息 );for(i=1;i=m;i+)fwrite(&memi,sizeof(struct member),1,fp);fclose(fp);（3） 顯示所有聯(lián)系人函數(shù)：void printf_all(int m)說明形參m表示現(xiàn)有聯(lián)系人的數(shù)目。用以控制輸出聯(lián)系人的數(shù)量。該函數(shù)用于輸出所有的聯(lián)系人信息。程序void printf_all(int m)int i;printf(nntt 以下是所有聯(lián)系人 :);printf(nnno. 姓名 電話號碼 類型

23、 電子郵件 n);for(i=0;im;i+) /*判斷聯(lián)系人類別并輸出*/if(memi.type=1)printf(%2d %-20s %-11s 辦公類 %-30sn,i+1,,memi.tel,memi.email);if(memi.type=2)printf(%2d %-20s %-11s 個人類 %-30sn,i+1,,memi.tel,memi.email);if(memi.type=3)printf(%2d %-20s %-11s 商務(wù)類 %-30sn,i+1,,memi.tel,memi.email);（4） 顯示辦公類聯(lián)

24、系人函數(shù)：void printf_cle(int m)說明形參m表示現(xiàn)有聯(lián)系人數(shù)目。用以控制循環(huán)終點。該函數(shù)用于輸出所有辦公類聯(lián)系人信息。程序void printf_cle(int m)int i;printf(nntt 辦公類聯(lián)系人:); printf(nn姓名 電話號碼 類型 電子郵件 n);for(i=0;im;i+)if(memi.type=1) /*判斷聯(lián)系人是否屬于辦公類*/printf(%-20s %-11s 辦公類 %-30sn,,memi.tel,memi.email);（5） 顯示個人類聯(lián)系人函數(shù)：void printf_per(int m)說明形參m表示

25、現(xiàn)有聯(lián)系人數(shù)目。用以控制循環(huán)終點。該函數(shù)用于輸出所有個人聯(lián)系人信息。程序void printf_per(int m)int i;printf(nntt 個人類聯(lián)系人 :);printf(nn姓名 電話號碼 類型 電子郵件 n);for(i=0;im;i+)if(memi.type=2) /*判斷聯(lián)系人是否屬于個人類*/printf(%-20s %-11s 個人類 %-30sn,,memi.tel,memi.email);（6） 顯示商務(wù)類聯(lián)系人函數(shù)：void printf_com(int m)說明形參m表示現(xiàn)有聯(lián)系人數(shù)目。用以控制循環(huán)終點。該函數(shù)用于輸出所有商務(wù)類聯(lián)系人信息。

26、程序void printf_com(int m)int i;printf(nntt 商務(wù)類聯(lián)系人:);printf(nn姓名 電話號碼 類型 電子郵件 n);for(i=0;im;i+)if(memi.type=3) /*判斷聯(lián)系人是否屬于商務(wù)類*/printf(%-20s %-11s 商務(wù)類 %-30sn,,memi.tel,memi.email);（7） 顯示某一聯(lián)系人函數(shù)：void printf_one(int m)說明形參m表示現(xiàn)有聯(lián)系人數(shù)目。用以控制循環(huán)終點。該函數(shù)用于輸出某一指定聯(lián)系人信息。程序void printf_one(int m)printf(姓名 電話號

27、碼 類型 電子郵件 n);if(memm-1.type=1) /*三個if語句判斷聯(lián)系人類型*/printf(%-20s %-11s 辦公類 %-30sn,,memm-1.tel,memm-1.email);if(memm-1.type=2)printf(%-20s %-11s 個人類 %-30sn,,memm-1.tel,memm-1.email);if(memm-1.type=3)printf(%-20s %-11s 商務(wù)類 %-30sn,,memm-1.tel,memm-1.email);（8） 修改姓名函數(shù)：void m

28、odify_name(int n,int m)說明該函數(shù)用于修改聯(lián)系人姓名。形參n為用戶輸入的要修改的聯(lián)系人序號；m表示現(xiàn)有聯(lián)系人數(shù)量。程序void modify_name(int n,int m)char mod_name20; /*用于暫存用戶輸入的更改后的聯(lián)系人姓名*/int i,t,w1;puts(請輸入新姓名:);scanf(%s,mod_name);doputs(確定要存儲嗎? 1.是 2.否 bb);scanf(%d,&t);if(t2)w1=1;getchar();elsew1=0;while(w1=1);if(t=1)/*當(dāng)用戶輸入1，即確認修改時，將原來存在結(jié)構(gòu)體中聯(lián)系人的

29、姓名刪除，并將新的聯(lián)系人姓名賦到結(jié)構(gòu)體中*/for(i=0;i20;i+)i=0;strcpy(,mod_name);save(m-1);puts(儲存成功，按任意鍵繼續(xù).);getchar();system(pause);modify();if(t=2)for(i=0;i20;i+)mod_namei=0;puts(信息存儲失敗，按任意鍵繼續(xù).);getchar();system(pause);modify();（9） 修改電話函數(shù)：void modify_tel(int n,int m)說明該函數(shù)用于修改聯(lián)系人電話。形參n為用戶輸入的要修改的聯(lián)系

30、人序號；m表示現(xiàn)有聯(lián)系人數(shù)量。程序void modify_tel(int n,int m)char mod_tel11;int i,t,w1;puts(請輸入新電話號碼:);scanf(%s,mod_tel);doputs(確定保存嗎? 1.是 2.否 bb);scanf(%d,&t);if(t2)w1=1;getchar();elsew1=0;while(w1=1);if(t=1)for(i=0;i11;i+)memn-1.teli=0;strcpy(memn-1.tel,mod_tel);save(m-1);puts(儲存成功！按任意鍵繼續(xù).);getchar();system(pause

31、);modify();if(t=2)for(i=0;i11;i+)mod_teli=0;puts(信息存儲失??！按任意鍵繼續(xù).);getchar();system(pause);modify();（10） 修改聯(lián)系人類型函數(shù)：void modify_type(int n,int m)說明該函數(shù)用于修改聯(lián)系人電話。形參n為用戶輸入的要修改的聯(lián)系人序號；m表示現(xiàn)有聯(lián)系人數(shù)量。程序void modify_type(int n,int m)int t1,t2,w1;do /*用do while語句控制用戶的輸入，使用戶只能輸入13*/puts(tttt1, 辦公類);puts(tttt2, 個人類);

32、puts(tttt3. 商務(wù)類);puts(tttt請選擇類型: bb);scanf(%d,&t1);if(t13)w1=1;getchar();elsew1=0;while(w1=1);doputs(確定保存嗎? 1.是 2.否 bb);scanf(%d,&t2);if(t22)w1=1;getchar();elsew1=0;while(w1=1);if(t2=1) /*當(dāng)用戶確認保存時，t2的值為1，修改后的數(shù)據(jù)保存至結(jié)構(gòu)體中，運行save函數(shù)后保存在文件中*/memn-1.type=t1;save(m-1);puts(儲存成功！按任意鍵繼續(xù).);getchar();system(paus

33、e);modify();if(t2=2) /*當(dāng)用戶確認不保存時，t2值為2，用戶輸入的修改信息被清空*/t1=0;puts(信息存儲失敗！按任意鍵繼續(xù).);getchar();system(pause);modify();（11） 修改email函數(shù)：void modify_email(int n,int m)說明該函數(shù)用于修改聯(lián)系人電話。形參n為用戶輸入的要修改的聯(lián)系人序號；m表示現(xiàn)有聯(lián)系人數(shù)量。程序void modify_email(int n,int m)char mod_email30;int i,t,w1;puts(請輸入新電子郵件地址:);scanf(%s,mod_email);

34、doputs(確定保存嗎? 1.是 2.否 bb);scanf(%d,&t);if(t2)w1=1;getchar();elsew1=0;while(w1=1);if(t=1)for(i=0;i30;i+)memn-1.emaili=0;strcpy(memn-1.email,mod_email);save(m-1);puts(儲存成功！按任意鍵繼續(xù).);getchar();system(pause);modify();if(t=2)for(i=0;i30;i+)mod_emaili=0;puts(信息存儲失?。“慈我怄I繼續(xù).);getchar();system(pause);modify()

35、;（12） 移動函數(shù)：void move(int n,int m)說明形參n表示移動的起點；m為移動的終點。該函數(shù)用于用戶將某一聯(lián)系人信息刪除后，排在該聯(lián)系人之后的數(shù)據(jù)向前移動。程序void move(int n,int m) /*n是移動的起點；m是移動的終點*/int i,j;for(i=n;i=m;i+) /*采用循環(huán)賦值方法，將后面的數(shù)據(jù)向前移，并將后面的數(shù)據(jù)刪除*/strcpy(,); /*將后面的數(shù)據(jù)賦給前面*/for(j=0;j20;j+) /*將后面的數(shù)據(jù)刪除，準備下一次的賦值*/j=0;strcpy(memi-1.tel,memi.tel);for(j=0;j11;j+)memi.telj=0;memi-1.type=memi.type;memi.type=0;strcpy(memi-1.e