Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
15
Task/Tau-function/Yabasic/tau-function.basic
Normal file
15
Task/Tau-function/Yabasic/tau-function.basic
Normal file
|
|
@ -0,0 +1,15 @@
|
|||
print "The tau functions for the first 100 positive integers are:\n"
|
||||
|
||||
for N = 1 to 100
|
||||
if N < 3 then
|
||||
T = N
|
||||
else
|
||||
T = 2
|
||||
for A = 2 to int((N+1)/2)
|
||||
if mod(N, A) = 0 then T = T + 1 : fi
|
||||
next A
|
||||
end if
|
||||
print T using "###";
|
||||
if mod(N, 10) = 0 then print : fi
|
||||
next N
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue