Algorithm 版 (精华区)

发信人: shs (花雨飘), 信区: Algorithm
标  题: 遗传算法（8）
发信站: 哈工大紫丁香 (Sat Sep  9 12:59:25 2000), 转信

//factorial.c

#include "f:\coy\mywork\lunwen\gaopc\thesis.h"
unsigned long factorial(n)
int n;
{
  unsigned long  tot = 1;
  if(n < 0)
    {
      printf("\n\n  Negative factorial in routine FACTORIAL \n\n");
      exit(0);
    }
  while(n > 1)
    tot = tot * n--;
  return(tot);
}

--
○/ Ｖ／＼Ｖ \
\ㄨ/<○> ┃
○＜＞<┃><//>
((<\\>  ))
＼○／ ┃／\
脖子扭扭，屁股扭扭，大家一起来跳舞

※ 修改:．shs 于 Sep  9 12:57:08 修改本文．[FROM: as.hit.edu.cn]
※ 来源:．武汉白云黄鹤站 bbs.whnet.edu.cn．[FROM: 211.69.196.11]
--
※ 转寄:．武汉白云黄鹤站 bbs.whnet.edu.cn．[FROM: as.hit.edu.cn]

--
☆ 来源:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: shs.bbs@bbs.whnet.ed]