* fixed some email addresses
[qbasicapps.git] / math / divides.bas
diff --git a/math/divides.bas b/math/divides.bas
deleted file mode 100755 (executable)
index 57310cb..0000000
+++ /dev/null
@@ -1,7 +0,0 @@
-INPUT "number:", a\r
-\r
-FOR b = 1 TO a\r
-  IF a / b = a \ b THEN PRINT b, "is"; a / b\r
-NEXT b\r
-SYSTEM\r
-\r