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)
页面执行时间:3.835毫秒