100 dim nuggets(100)
110 for six = 0 to 100/6
120  for nine = 0 to 100/9
130   for twenty = 0 to 100/20
140    n = six*6+nine*9+twenty*20
150    if n <= 100 then nuggets(n) = 1
160   next twenty
170  next nine
180 next six
190 for n = 100 to 1 step -1
200  if nuggets(n) <> 1 then
210   print "Maximum non-McNuggets number is: ";n
220   end
230  endif
240 next n
250 end