ZEman, в бета-бейсике есть оператор переводящий из десятичной в двоичную )
Вид для печати
ZEman, в бета-бейсике есть оператор переводящий из десятичной в двоичную )
ZX_NOVOSIB, только вот, сам он "сьедает" килобайта три, если не больше.
ZEman, а надо было перевести в строку, а то я печаталку сделал :)
Двоичное число: 2^7*d7+2^6*d6+2^5*d5+...+2^0*d0, здесь d7-d0 двоичные числа.
- - - Добавлено - - -
или так:
http://i93.fastpic.ru/big/2017/0715/...49dce408cd.pngВложение 61655
2 килобайта спасут прекалком(:
Компромис между скоростью и прекалком:
Код:10 DEF FN c$(a)=z$(1+a TO 4+a)
20 DEF FN b$(n)=FN c$(INT (n/16)*4)+FN c$((n-INT (n/16)*16)*4)
25 LET z$="0000000100100011010001010110011110001001101010111100110111101111"