HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2010
0228
雷轟 (投稿者削除)1未解決


雷轟

リンク

2010/2/28(Sun) 04:45:02|NO.30882

この記事は投稿者により削除されました。
2010/2/28(Sun) 11:52:43



この記事に返信する


M

リンク

2010/2/28(Sun) 11:51:12|NO.30885

うむむ。もし、10進数nを二進数にしたら、どのビットが立っているかを調べたいのであったなら、こんな感じのリストになります。
やっぱり、ビットシフトを使って、何番目のビットが立っているかを調べる。

;10進数nを二進数にしたら、どのビットが立っているかを調べるプログラム n=123 ;調べたい値 #define TOTALBITS 16 ;総ビット数(1〜31) dim BITLIST,TOTALBITS ;BITLIST(TOTALBITS〜0)に、結果が入る i=0x1 repeat TOTALBITS if (n&(i<<cnt))!0:BITLIST(cnt)=1 loop ;結果表示 repeat TOTALBITS mes str(cnt+1)+":"+str(BITLIST(cnt)) loop




ONION software Copyright 1997-2018(c) All rights reserved.