LilacPark 版 (精华区)
发信人: tst (洛之秋◎盲眼刺客), 信区: LilacPark
标 题: 工大医院看病程序源代码
发信站: 哈工大紫丁香 (2001年12月16日13:19:23 星期天), 转信
By Sloth
/*HIT Hospital Running Programme*/
#include <药品.h>
#include <器械.h>
#include <三个代表.h>
#include <医疗档案.h>
#include <医疗制度.h>
#include <医生.h>
#include <护士.h>
#include <东郭先生.h>
#include <清洁工.h>
#include <病人.h>
int 院长;
int 主任[6];
int main()
{
int 医生[8,12],护士[12,16];
int 病人[n],清洁工[4,8];
switch(病人)
{case 领导:
态度一;
break;
case 家属:
态度二;
break;
case 教师:
态度三;
break;
case 学生:
态度四;
break;
}
if (病情>=阑尾炎) goto 医大;
for(病情=发烧;病情<=吐血;病情++;)
处置=黄连素;
printf(回家床上躺着);
if (病情=疑难杂症)
{
delay(1000000000000000);
ask 清洁工[3,5] for help;
answer 偏方治大病;
处置=点滴生理盐水;
}
if(意见!=0) goto 主任;
if(意见>10) goto 院长;
if(意见>100)
return 精神病院;
}
呵呵,没时间写了,谁把它升级到2.0
--
且将新火试新茶
诗酒趁年华
-
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 天外飞仙]
--
※ 修改:·Christy 於 12月16日19:57:39 修改本文·[FROM: 天外飞仙]
※ 转载:.哈工大紫丁香 bbs.hit.edu.cn.[FROM: mtlab4.hit.edu.cn]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间:2.213毫秒