Base 16 numbers needing a to f: Difference between revisions

Base 16 numbers needing a to f en Yabasic
(Base 16 numbers needing a to f en BASIC256)
(Base 16 numbers needing a to f en Yabasic)
Line 2,279:
301 such numbers found.
</pre>
 
 
=={{header|Yabasic}}==
<lang yabasic>sub needs_af (n)
while n > 0
if mod(n, 16) > 9 then return true : fi
n = int(n / 16)
wend
return false
end sub
 
for i = 1 to 500
if needs_af(i) then print i, " ", : fi
next i
end</lang>
2,124

edits