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

[r99]: / XFACT.MPL  Maximize  Restore  History

Download this file

8 lines (5 with data), 96 Bytes 

##LIBHDR

F(I) I ? I*F(I-1),1

MAIN(I) [
  I=0;++I<=10 @ WRITEF("F(%I2)=%I6*N",I,F(I))
]