INPUT "number:", a FOR b = 1 TO a IF a / b = a \ b THEN PRINT b, "is"; a / b NEXT b SYSTEM