To Display the Factorial of any number
CLS
INPUT "Enter any number"; N
F =1
FOR I = 1 TO N
F = F * I
NEXT I
PRINT "Factorial="; F
END
INPUT "Enter any number"; N
F =1
FOR I = 1 TO N
F = F * I
NEXT I
PRINT "Factorial="; F
END
To Find Area of Circle
CLS INPUT "Enter radius"; r A = 22 / 7 * r ^ 2 PRINT "Area of circle="; A END
Comments
Post a Comment