home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Professional
/
OS2PRO194.ISO
/
os2
/
prgramer
/
mltiscop
/
fibon.c
< prev
next >
Wrap
Text File
|
1989-07-28
|
244b
|
16 lines
/* Fibonacci numbers */
unsigned int dofibon(i,j,limit)
unsigned int i,j,limit;
{
if (j>limit) return i;
else return dofibon(j, i+j,limit);
}
unsigned int Fibonacci(limit)
unsigned int limit;
{
return dofibon(1,2,limit);
}