RosettaCodeData/Task/Tau-function/Frink/tau-function.frink

6 lines
81 B
Plaintext

tau[n] := length[allFactors[n]]
for n=1 to 100
print[tau[n] + " "]
println[]