view test/fact0.c @ 935:7672a37e7545 default tip

Raspbery PI ARM support begin
author kono
date Sat, 24 Dec 2016 03:02:57 +0000
parents 5313ed059cee
children
line wrap: on
line source

#include "stdio.h"

main(ac,av)
int ac;
char *av[];
{
    printf("#0006:%d\n",fact(1,1,10 /*atoi(av[1])*/));
    return 0;
}

int
fact(i,j,n) 
/*register*/ int i,j,n;
{
    if (i==n)
        return j;
    return fact(i+1,j*i,n);
}