[go: up one dir, main page]
Menu ▾ ▴

[r19]: / XFACT.MPL  Maximize  Restore  History

Download this file

8 lines (5 with data), 90 Bytes 

+libhdr

f(i) i?i*f(i-1),1

.(i) [
  i=0;++i<=10 @ writef("f(%i2)=%i6*n",i,f(i))
]