AssiGnMent oF daShAin & tiHar vacAtiOn.

18) WAP to check factorial.

=> CLS
INPUT "Enter any number";N
F=1
FOR I = 1 TO N
F= F*I
NEXT I
PRINT " Factorial";F
END