16 lines
317 B
Text
16 lines
317 B
Text
|
|
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
|