10 FOR N=0 TO 14
 20 LET X=N
 30 GOSUB 130
 40 LET A=FX
 50 LET X=N+1
 60 GOSUB 130
 70 LET B=FX
 80 LET X=2*N
 90 GOSUB 130
100 PRINT N,FX/(B*A)
110 NEXT N
120 STOP
130 LET FX=1
140 FOR I=1 TO X
150 LET FX=FX*I
160 NEXT I
170 RETURN