To Display the Factors of any number
CLS
INPUT "Enter any number"; N
FOR I = 1 TO N
IF N MOD I = 0 THEN PRINT I
NEXT I
END
INPUT "Enter any number"; N
FOR I = 1 TO N
IF N MOD I = 0 THEN PRINT I
NEXT I
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