Factor using sub
DECLAFE SUB FACTOR(N)
CLS
INPUT"ENTER ANY NO";N
CALL FACTOR(N)
END
SUB FACTOR(N)
FOR I=1 TO N
IF N MOD I=0 THEN PRINT I
NEXT I
END SUB
Factor using sub
DECLAFE SUB FACTOR(N) CLS INPUT"ENTER ANY NO";N CALL FACTOR(N) END SUB FACTOR(N) FOR I=1 TO N IF N MOD I=0 THEN PRINT I NEXT I END SUB
Comments
Post a Comment