INT P	
	INT I
	INT Y
	INT STORE
	PRINT CR ENTER VALUE OF NUMBER : $
	INPUT I
	STORE = I
	P = 1 
	STORE = I
	WHILE I >= 1 	
		P = P * I 
		I = I - 1 
	END_WHILE
	Y = P
	PRINT CR Factorial of STORE is Y LF $