<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>95.家庭财务管理小程序-经典C语言程序设计100例 - 脚本编程学习 for unix linux freebsd</title>
<link href="/css.css" rel="stylesheet" type="text/css" />
</head>
<body>
<DIV id=Top>
本站内容有下面分类知识，欢迎您的到来^_^
<P>shell相关:<a href="/shell-commands/">指令篇</a> <a href="/shell-base/">基础篇</a> <a href="/shell-script/">脚本欣赏</a> <a href="/cool-shell-scripts/">编程实例</a> <a href="/shell-question/">shell问问</a> <a href="/shell-video/">shell视频教程</a> <a href="/shell-apply/index.html">技巧篇</a> <a href="/shell-test/index.html">水平测试</a> <a href="/shell-en/index.html">E文资料</a> <a href="/shell-vi/">vi编辑器</a> <a href="/advanced-bash/">高级Bash脚本编程指南</a><br />其他:<a href="/mysql/">mysql</a> <a href="/perl/">perl</a> <a href="/c/">c语言</a></P></DIV>
<div id=Dao>
<table bgColor="#3DB836" border="0" cellPadding="0" cellSpacing="0" width=100% >
<tr>
<td width="70%" rowSpan="2"></td>
<td width="20%" rowSpan=2 align=center><a href="http://www.soyo123.com" onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://www.soyo123.com/');return(false);" style="behavior: url(#default#homepage)"><font color=#FFFFFF>设soyo123为首页</font></a></td>
<td rowSpan="2" width="10%" align="center" class="f9pt"><a href="javascript:window.external.AddFavorite('http://www.soyo123.com/', '脚本编程学习')" target="_self"><font color="#FFFFFF">收藏本站</font></a></td>
</tr>
</table>
<script type="text/javascript"><!--
google_ad_client = "pub-4030588698981917";
/* 728x15, 创建于 08-6-12 */
google_ad_slot = "6240212624";
google_ad_width = 728;
google_ad_height = 15;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
</div>
<div id=Tit>
<span>当前位置:</span>|<a href='http://www.soyo123.com/'>主页</a>><a href='/c/index.html'>c语言教程</a>><br />
<h1>95.家庭财务管理小程序-经典C语言程序设计100例</h1>
</div>
<DIV id=Mian>
<DIV id=left>
<div align="center"><A title="Baidu搜藏" href="javascript:u=location.href;t=document.title;c = %22%22 + (window.getSelection ? window.getSelection() : document.getSelection ? document.getSelection() : document.selection.createRange().text);var url=%22http://cang.baidu.com/do/add?it=%22+encodeURIComponent(t)+%22&iu=%22+encodeURIComponent(u)+%22&dc=%22+encodeURIComponent(c)+%22&fr=ien#nw=1%22;window.open(url,%22_blank%22,%22scrollbars=no,width=600,height=450,left=75,top=20,status=no,resizable=yes%22); void 0">百度收藏</a>
<A href="javascript:window.open('http://shuqian.qq.com/post?title='+encodeURIComponent(document.title)+'&uri='+encodeURIComponent(document.location.href)+'&jumpback=2&noui=1','favit','width=960,height=600,left=50,toolbar=no,menubar=no,location=no,scrollbars=yes,status=yes,resizable=yes');void(0)">QQ搜藏</a>
</div>
<font color="#990000">【程序95】</font><br />题目：家庭财务管理小程序<br />1.程序分析：<br />2.程序源代码：<br />/*money management system*/<br />#include "stdio.h"<br />#include "dos.h"<br />main()<br />{<br />FILE *fp;<br />struct date d;<br />float sum,chm=0.0;<br />int len,i,j=0;<br />int c;<br />char ch[4]="",ch1[16]="",chtime[12]="",chshop[16],chmoney[8];<br />pp: clrscr();<br />sum=0.0;<br />gotoxy(1,1);printf("|---------------------------------------------------------------------------|");<br />gotoxy(1,2);printf("| money management system(C1.0) 2000.03 |");<br />gotoxy(1,3);printf("|---------------------------------------------------------------------------|");<br />gotoxy(1,4);printf("| -- money records -- | -- today cost list -- |");<br />gotoxy(1,5);printf("| ------------------------ |-------------------------------------|");<br />gotoxy(1,6);printf("| date: -------------- | |");<br />gotoxy(1,7);printf("| | | | |");<br />gotoxy(1,8);printf("| -------------- | |");<br />gotoxy(1,9);printf("| thgs: ------------------ | |");<br />gotoxy(1,10);printf("| | | | |");<br />gotoxy(1,11);printf("| ------------------ | |");<br />gotoxy(1,12);printf("| cost: ---------- | |");<br />gotoxy(1,13);printf("| | | | |");<br />gotoxy(1,14);printf("| ---------- | |");<br />gotoxy(1,15);printf("| | |");<br />gotoxy(1,16);printf("| | |");<br />gotoxy(1,17);printf("| | |");<br />gotoxy(1,18);printf("| | |");<br />gotoxy(1,19);printf("| | |");<br />gotoxy(1,20);printf("| | |");<br />gotoxy(1,21);printf("| | |");<br />gotoxy(1,22);printf("| | |");<br />gotoxy(1,23);printf("|---------------------------------------------------------------------------|");<br />i=0;<br />getdate(&d);<br />sprintf(chtime,"%4d.%02d.%02d",d.da_year,d.da_mon,d.da_day);<br />for(;;)<br />{<br />gotoxy(3,24);printf(" Tab __browse cost list Esc __quit");<br />gotoxy(13,10);printf(" ");<br />gotoxy(13,13);printf(" ");<br />gotoxy(13,7);printf("%s",chtime);<br />j=18;<br />ch[0]=getch();<br />if(ch[0]==27)<br />break;<br />strcpy(chshop,"");<br />strcpy(chmoney,"");<br />if(ch[0]==9)<br />{<br />mm:i=0;<br />fp=fopen("home.dat","r+");<br />gotoxy(3,24);printf(" ");<br />gotoxy(6,4);printf(" list records ");<br />gotoxy(1,5);printf("|-------------------------------------|");<br />gotoxy(41,4);printf(" ");<br />gotoxy(41,5);printf(" |");<br />while(fscanf(fp,"%10s%14s%f\n",chtime,chshop,&chm)!=EOF)<br />{ if(i==36)<br />{ getch();<br />i=0;}<br />if ((i%36)<17)<br />{ gotoxy(4,6+i);<br />printf(" ");<br />gotoxy(4,6+i);}<br />else<br />if((i%36)>16)<br />{ gotoxy(41,4+i-17);<br />printf(" ");<br />gotoxy(42,4+i-17);}<br />i++;<br />sum=sum+chm;<br />printf("%10s %-14s %6.1f\n",chtime,chshop,chm);}<br />gotoxy(1,23);printf("|---------------------------------------------------------------------------|");<br />gotoxy(1,24);printf("| |");<br />gotoxy(1,25);printf("|---------------------------------------------------------------------------|");<br />gotoxy(10,24);printf("total is %8.1f$",sum);<br />fclose(fp);<br />gotoxy(49,24);printf("press any key to.....");getch();goto pp;<br />}<br />else<br />{<br />while(ch[0]!='\r')<br />{ if(j<10)<br />{ strncat(chtime,ch,1);<br />j++;}<br />if(ch[0]==8)<br />{<br />len=strlen(chtime)-1;<br />if(j>15)<br />{ len=len+1; j=11;}<br />strcpy(ch1,"");<br />j=j-2;<br />strncat(ch1,chtime,len);<br />strcpy(chtime,"");<br />strncat(chtime,ch1,len-1);<br />gotoxy(13,7);printf(" ");}<br />gotoxy(13,7);printf("%s",chtime);ch[0]=getch();<br />if(ch[0]==9)<br />goto mm;<br />if(ch[0]==27)<br />exit(1);<br />}<br />gotoxy(3,24);printf(" ");<br />gotoxy(13,10);<br />j=0;<br />ch[0]=getch();<br />while(ch[0]!='\r')<br />{ if (j<14)<br />{ strncat(chshop,ch,1);<br />j++;}<br />if(ch[0]==8)<br />{ len=strlen(chshop)-1;<br />strcpy(ch1,"");<br />j=j-2;<br />strncat(ch1,chshop,len);<br />strcpy(chshop,"");<br />strncat(chshop,ch1,len-1);<br />gotoxy(13,10);printf(" ");}<br />gotoxy(13,10);printf("%s",chshop);ch[0]=getch();}<br />gotoxy(13,13);<br />j=0;<br />ch[0]=getch();<br />while(ch[0]!='\r')<br />{ if (j<6)<br />{ strncat(chmoney,ch,1);<br />j++;}<br />if(ch[0
100个C语言的例子
需积分: 0 5 浏览量
2009-01-13
12:29:57
上传
评论
收藏 259KB RAR 举报
C100例.rar （97个子文件） 
C100例 
20080530887.html 6KB 20080530857.html 6KB 20080530905.html 6KB 20080530883.html 7KB 20080530861.html 6KB 20080530843.html 6KB 20080530900.html 6KB 20080530886.html 7KB 20080530895.html 6KB 20080530837.html 7KB 20080530888.html 7KB 20080530834.html 7KB 20080530909.html 6KB 20080530897.html 7KB 20080530898.html 6KB 20080530881.html 6KB 20080530871.html 6KB 20080530875.html 7KB 20080530823.html 6KB 20080530902.html 6KB 20080530890.html 7KB 20080530827.html 6KB 20080530854.html 7KB 20080530844.html 7KB 20080530885.html 7KB 20080530899.html 6KB 20080530848.html 7KB 20080530826.html 6KB 20080530878.html 7KB 20080530839.html 7KB 20080530917.html 7KB 20080530853.html 7KB 20080530911.html 7KB 20080530891.html 8KB 20080530896.html 7KB 20080530825.html 6KB 20080530824.html 6KB 20080530894.html 6KB 20080530916.html 7KB 20080530865.html 6KB 20080530904.html 6KB 20080530873.html 6KB 20080530856.html 7KB 20080530889.html 7KB 20080530830.html 7KB 20080530910.html 6KB 20080530870.html 6KB 20080530859.html 6KB 20080530913.html 7KB 20080530849.html 6KB 20080530867.html 7KB 20080530866.html 7KB 20080530903.html 6KB 20080530877.html 7KB 20080530893.html 7KB 20080530912.html 11KB 20080530915.html 7KB 20080530872.html 6KB 20080530879.html 6KB 20080530880.html 6KB 20080530868.html 6KB 20080530828.html 7KB 20080530892.html 6KB 20080530821.html 7KB 20080530914.html 6KB 20080530846.html 7KB 20080530901.html 6KB 20080530864.html 7KB 20080530908.html 6KB 20080530876.html 7KB 20080530836.html 7KB 20080530838.html 7KB 20080530847.html 6KB 20080530862.html 6KB 20080530835.html 7KB 20080530852.html 6KB 20080530869.html 6KB 20080530884.html 7KB 20080530907.html 6KB 20080530831.html 7KB 20080530874.html 7KB 20080530832.html 6KB 20080530851.html 6KB 20080530850.html 6KB 20080530860.html 6KB 20080530882.html 8KB 20080530829.html 7KB 20080530841.html 6KB 20080530822.html 7KB 20080530858.html 6KB 20080530840.html 7KB 20080530855.html 6KB 20080530845.html 7KB 20080530833.html 7KB 20080530863.html 7KB 20080530842.html 6KB 20080530906.html 7KB资源评论
