100 cls
110 print "The first 100 tau numbers are:"
120 n = 0
130 num = 0
140 limit = 100
150 while num < limit
160  n = n+1
170  tau = 0
180  for m = 1 to n
190   if n mod m = 0 then tau = tau+1
200  next m
210  if n mod tau = 0 then
220   num = num+1
230   if num mod 10 = 1 then print
240   print n,
250  endif
260 wend
270 print
280 end