BCX Console Demonstration Program s37.bas |

PRINT "The known factorial of 34 is 2.952328e+038" PRINT "The calculated factorial of 34 is ";Factorial!(34) FUNCTION Factorial!(R!) IF (R! > 0) AND(R! <= 34) THEN FUNCTION = R! * Factorial!(R!-1) ELSE FUNCTION = 1 END IF END FUNCTION

*Result:*

The known factorial of 34 is 2.952328e+038 The calculated factorial of 34 is 2.952328E+38