这个是C语言学完后的一个程序实践的内用。编写一个医院病人管理系统。这个程序有一些BUG，要操作得当，否则可能结果有问题。不过作为作业应付一下还是有模有样的。
#include<stdio.h>
#include<string.h>
#include<stdlib.h>
typedef struct patient
{
char ID[10];
char name[10];
char bingli[300];
int cost[3];
struct patient * next;
}node1;
typedef struct storage
{
int amount[3];
int price[3];
}node2;
node2 init(node2 temp)
{
temp.amount[0]=20;
temp.amount[1]=20;
temp.amount[2]=10;
temp.price[0]=5;
temp.price[1]=9;
temp.price[2]=16;
return temp;
}
void mainmeun()
{
printf("\n");
printf(" 健康是快乐的源泉\n");
printf("********************************\n");
printf("1.注册新病人信息\n");
printf("2.查询病人信息\n");
printf("3.写病历\n");
printf("4.病人消费\n");
printf("5.列出所有病人信息\n");
printf("6.载入所有病人信息\n");
printf("7.保存\n");
printf("8.查询药品库存\n");
printf("9.离开\n");
printf("*********************************\n");
}
node1 * create(node1 *p1)
{
node1 *p;
p=(node1 *)malloc(sizeof(node1));
printf("请输入病人ID\n");
scanf("%s",p->ID);
while(p1->ID&&strcmp(p1->ID,p->ID))
{
p1=p1->next;
}
if(p1==NULL)
{
printf("请输入病人姓名\n");
scanf("%s",p->name);
strcpy(p->bingli,"0");
p->cost[0]=0;
p->cost[1]=0;
p->cost[2]=0;
p->next=NULL;
printf("已注入您的信息\n");
return p;
}
else
{
printf("输入病人ID以存在,注册失败\n");
return p;
}
}
node1 * insert(node1 * head,node1 *p)
{
node1 *p1;
if(head==NULL)
{
head=p;
p->next=NULL;
}
else
{
p1=head;
while(p1->next)
{
p1=p1->next;
}
p1->next=p;
p->next=NULL;
}
return(head);
}
void search(node1 *p1)
{
int sum;
char a[10];
printf("请输入病人ID\n");
scanf("%s",a);
while(p1->ID&&strcmp(p1->ID,a))
{
p1=p1->next;
}
if(p1)
{
printf("ID:%s\n",p1->ID);
printf("姓名:%s\n",p1->name);
printf("病例:%s\n",p1->bingli);
printf("消费记录:\n");
if(p1->cost[0])
printf("巴米尔\t%d\n",p1->cost[0]);
if(p1->cost[1])
printf("感冒灵\t%d\n",p1->cost[1]);
if(p1->cost[2])
printf("病毒灵\t%d\n",p1->cost[2]);
sum=p1->cost[0]*5+p1->cost[1]*9+p1->cost[2]*16;
printf("总费用\t%d\n",sum);
}
else
printf("该病人没有注册\n");
}
void bingli(node1 *p)
{
char a[10];
char bingli[300];
char enter[5]=":\n";
printf("请输入病人ID\n");
scanf("%s",a);
while(p->ID&&strcmp(p->ID,a))
{
p=p->next;
}
if(p==NULL)
{
printf("无该病人信息\n");
}
else
{
printf("请写病例:\n");
scanf("%s",bingli);
strcpy(p->bingli,bingli);
strcat(p->bingli,enter);
}
}
node2 buy(node1 *p,node2 temp)
{
char i[10];
printf("请输入病人ID\n");
scanf("%s",i);
while(p->ID&&strcmp(p->ID,i))
{
p=p->next;
}
while(1)
{
int a,b,c,d;
printf("1.购买巴米尔\n");
printf("2.购买感冒灵\n");
printf("3.购买病毒灵\n");
printf("0.退出\n");
scanf("%d",&a);
switch(a)
{
case 1:
do
{
printf("现有库存%d\n",temp.amount[0]);
printf("购买巴米尔数量:");
scanf("%d",&b);
temp.amount[0]=temp.amount[0]-b;
p->cost[0]+=b*5;
}while(b>20);
break;
case 2:
do
{
printf("现有库存%d\n",temp.amount[1]);
printf("购买感冒灵数量:");
scanf("%d",&c);
temp.amount[1]=temp.amount[1]-c;
p->cost[1]+=c*9;
}while(c>20);
break;
case 3:
do
{
printf("现有库存%d\n",temp.amount[2]);
printf("购买病毒灵数量:");
scanf("%d",&d);
temp.amount[2]=temp.amount[2]-d;
p->cost[2]+=d*16;
}while(d>=10);
break;
case 0:
return temp;
}
}
}
void list(node1 *p)
{
if(p==NULL)
printf("尚无病人信息\n");
else
{
do{
printf("病人ID:%s\n",p->ID);
printf("病人姓名:%s\n",p->name);
printf("病人病例:%s\n",p->bingli);
printf("购买巴米尔费用:%d\n",p->cost[0]);
printf("购买感冒灵费用:%d\n",p->cost[1]);
printf("购买病毒灵费用:%d\n",p->cost[2]);
printf("\n");
p=p->next;
}while(p!=NULL);
}
}
node1 * load(node1 *p)
{
char ID[10],name[10],bingli[300];
int cost0,cost1,cost2;
FILE *fp;
fp=fopen("information.txt","r");
int n=0;
node1 *p1,*p2;
while(!feof(fp))
{
n++;
p1=(node1 *)malloc(sizeof(node1));
fscanf(fp,"%s",ID);
fscanf(fp,"%s",name);
fscanf(fp,"%s",bingli);
fscanf(fp,"%d",&cost0);
fscanf(fp,"%d",&cost1);
fscanf(fp,"%d",&cost2);
strcpy(p1->ID,ID);
strcpy(p1->name,name);
strcpy(p1->bingli,bingli);
p1->cost[0]=cost0;
p1->cost[1]=cost1;
p1->cost[2]=cost2;
p1->next=NULL;
if(n==1)
{
p=p1;
p2=p1;
}
else
{
p2->next=p1;
p2=p1;
}
}
fclose(fp);
return p;
}
void save(node1 *p)
{
FILE *fp;
fp=fopen("information.txt","w");
if(p!=NULL)
do{
fprintf(fp,"%s\n",p->ID);
fprintf(fp,"%s\n",p->name);
fprintf(fp,"%s\n",p->bingli);
fprintf(fp,"%d\n",p->cost[0]);
fprintf(fp,"%d\n",p->cost[1]);
fprintf(fp,"%d\n",p->cost[2]);
p=p->next;
}while(p!=NULL);
fclose(fp);
}
void liststock(node2 temp)
{
printf("药品\t数量\t价格\t\n");
printf("巴米尔\t%d\t%d\t\n",temp.amount[0],temp.price[0]);
printf("感冒灵\t%d\t%d\t\n",temp.amount[1],temp.price[1]);
printf("病毒灵\t%d\t%d\t\n",temp.amount[2],temp.price[2]);
}
chose()
{
node1 *head=NULL,*p;
node2 temp;
temp=init(temp);
while(1)
{
mainmeun();
int a;
scanf("%d",&a);
switch(a)
{
case 1:
p=create(head);
head=insert(head,p);
break;
case 2:
search(head);
break;
case 3:
bingli(head);
break;
case 4:
temp=buy(head,temp);
break;
case 5:
list(head);
break;
case 6:
head=load(head);
break;
case 7:
save(head);
break;
case 8:
liststock(temp);
break;
case 9:
printf("谢谢使用\n");
return(0);
default:
printf("输入有误，重新输入\n");
break;
}
}
}
void main()
{
chose();
}
运行时的截图，由于模块太多，就看看主页面吧。
更多学习资料请关注专题《管理系统开发》。
以上就是本文的全部内容，希望对大家的学习有所帮助，也希望大家多多支持脚本之家。
