Jump to content

Count in octal: Difference between revisions

(→‎LOLCODE: Add implementation)
Line 998:
<lang runbasic>input "Begin number:";b
input " End number:";e
 
for i = b to e
print i;" ";toBase$(8,i)
next i
end
 
function toBase$(base,base10)
maxIntegerBitSize =len( str$( base10))
toBase$ =""
for i = 10 to 1 step -1
toBase$ = str$(base10 mod base) +toBase$
base10 = int(base10 / base)
if base10 < 1 then exit for
next i
Anonymous user
Cookies help us deliver our services. By using our services, you agree to our use of cookies.