INT P	
	INT I
	INT Y
	INT STORE
	PRINT CR ENTER VALUE OF NUMBER : $
	INPUT I
	STORE = I
	P = 1 
[A] 	
	P = P * I 
	I = I - 1 
	IF I >= 1 GOTO [A] 
	Y = P
	PRINT CR Factorial of STORE is Y LF $