Excel（関数）で変換
 
　1:
=INT(MOD(A1/32768,2))&INT(MOD(A1/16384,2))&INT(MOD(A1/8192,2))&INT(MOD(A1/4096,2))&INT(MOD(A1/2048,2))&INT(MOD(A1/1024,2))&INT(MOD(A1/512,2))&INT(MOD(A1/256,2))&INT(MOD(A1/128,2))&INT(MOD(A1/64,2))&INT(MOD(A1/32,2))&INT(MOD(A1/16,2))&INT(MOD(A1/8,2))&INT(MOD(A1/4,2))&INT(MOD(A1/2,2))&INT(MOD(A1,2))

プログラム言語なの？とかは突っ込んじゃだめです。
セルA1に10進数を（0〜65535）をセルB1などに↑の関数を入れると答えが表示されるです〜
あくまでもExcelの関数で実現させてるです。もっといい方法があるのかも（VBA以外で
TOPに戻る　　 いろいろな言語へ戻る