Data commit

Task/Tau-number/Craft-Basic/tau-number.basic

@@ -0,0 +1,31 @@
+define count = 0, num = 0, mod = 0
+define nums = 100, tau = 0
+
+do
+
+	let count = count + 1
+	let tau = 0
+	let mod = 1
+
+	do
+
+		if count % mod = 0 then
+
+			let tau = tau + 1
+
+		endif
+
+		let mod = mod + 1
+
+	loop mod < count + 1
+
+	if count % tau = 0 then
+
+		let num = num + 1
+		print count
+
+	endif
+
+loop num < nums
+
+end