home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Interactive Reference Guide / C-C++ Interactive Reference Guide.iso / c_ref / csource3 / 106_01 / fact.mou < prev    next >
Encoding:
Text File  |  1980-07-09  |  256 b   |  11 lines
  1. ("!Enter a number "m?=
  2.   m.^
  3.   nm.=
  4.   1
  5.   (n.^
  6.     n.*  nn.1-=
  7.     )
  8.   "!Factorial ("  m.!  ")=" ! "!-------------------------"
  9.   )
  10. $$
  11.