Landon Curt Noll
d2a42f42e8
We we move 1988-2004 entries from all of a year's winning entries in a single directory to each winner being in their own sub-directory under the given year directory.
45 lines
433 B
Plaintext
45 lines
433 B
Plaintext
/* A factorial program */
|
|
int
|
|
putstr(char *s)
|
|
{
|
|
while(*s)
|
|
putchar(*s++);
|
|
}
|
|
|
|
int
|
|
fac(int n)
|
|
{
|
|
if (n == 0)
|
|
return 1;
|
|
else
|
|
return n*fac(n-1);
|
|
}
|
|
|
|
int
|
|
putn(int n)
|
|
{
|
|
if (9 < n)
|
|
putn(n / 10);
|
|
putchar((n%10) + '0');
|
|
}
|
|
|
|
int
|
|
facpr(int n)
|
|
{
|
|
putstr("factorial ");
|
|
putn(n);
|
|
putstr(" = ");
|
|
putn(fac(n));
|
|
putstr("\n");
|
|
}
|
|
|
|
int
|
|
main()
|
|
{
|
|
int i;
|
|
i = 0;
|
|
while(i < 10)
|
|
facpr(i++);
|
|
return 0;
|
|
}
|