1 2 3 4 5 6 7 | 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 |
1 2 3 4 5 6 7 | 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 |