CLS
INPUT "F=", f
INPUT "G=", g
n = f \ g
m = f MOD g
IF m=0 THEN PRINT n ELSE IF n=0 THEN PRINT STR$(f) & "/" STR$(g) ELSE PRINT STR$(n) & "(" & STR$(f) & "/" STR$(m) & ")"
END
CLS
INPUT "F=", f
INPUT "G=", g
n = f \ g
m = f MOD g
IF m=0 THEN PRINT n ELSE IF n=0 THEN PRINT STR$(f) & "/" STR$(g) ELSE PRINT STR$(n) & "(" & STR$(f) & "/" STR$(m) & ")"
END