lib-src/numeric/b.cc

   1 //////////////////////////////////////////////////////////////////////////////
   2 // NOTICE:
   3 //
   4 // ADLib, Prop and their related set of tools and documentation are in the
   5 // public domain.   The author(s) of this software reserve no copyrights on
   6 // the source code and any code generated using the tools.  You are encouraged
   7 // to use ADLib and Prop to develop software, in both academic and commercial
   8 // settings, and are free to incorporate any part of ADLib and Prop into
   9 // your programs.
  10 //
  11 // Although you are under no obligation to do so, we strongly recommend that
  12 // you give away all software developed using our tools.
  13 //
  14 // We also ask that credit be given to us when ADLib and/or Prop are used in
  15 // your programs, and that this notice be preserved intact in all the source
  16 // code.
  17 //
  18 // This software is still under development and we welcome any suggestions
  19 // and help from the users.
  20 //
  21 // Allen Leung
  22 // 1994
  23 //////////////////////////////////////////////////////////////////////////////
  24
  25 #include <integer.h>
  26 #include <iostream.h>
  27
  28 int main(int argc, char * argv[])
  29 {  Integer fact = 1;
  30    int limit = 100;
  31    if (argc == 2) sscanf(argv[1],"%d",&limit);
  32    for (int i = 1; i <= limit; i++) {
  33       fact *= i;
  34    }
  35    cout << "Done\n"; cout.flush();
  36    cout << "fact(" << limit << ") = " << fact << '\n';
  37    return 0;
  38 }