Data commit

Task/Tau-function/Run-BASIC/tau-function.basic

@@ -0,0 +1,15 @@
+print "The tau functions for the first 100 positive integers are:"
+print
+for N = 1 to 100
+    if N < 3 then
+        T = N
+    else
+        T = 2
+        for A = 2 to int((N+1)/2)
+            if N mod A = 0 then T = T + 1
+        next A
+    end if
+    print using("####", T);
+    if N mod 10 = 0 then print
+next N
+end