Program To find prime factors of a number input

Program To find prime factors of a number input (Qbasic Code)
CLS
INPUT "ENTER ANY NUMBER"; N
FOR I = 1 TO N
    C = 0
    FOR J = 1 TO I
        IF I MOD J = 0 THEN C = C + 1
    NEXT J
    IF N MOD I = 0 AND C = 2 THEN PRINT I;
NEXT I
PRINT "The prime factors of given number";
END

Share :

X