[過去ﾛｸﾞ] プログラミングのお題スレ Part15 (1002ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

257(8): 2019/09/01(日)18:40 ID:lGQcNl0x(1) AAS
お題: nバイトのデータxをビット列にして出力しなさい

---

258: 2019/09/01(日)19:01 ID:KcbCTlPY(1) AAS
>>257 Java
外部ﾘﾝｸ:ideone.com

---

259(2): 2019/09/01(日)19:32 ID:VqTK6sxa(1) AAS
>>257 Perl5

$n = 24;
@a = map{int rand 255} 1..$n;;
print "@a\n";
@b = map{sprintf'%08b', $_} @a;
$" = '';
print "@b\n

実行例
~ $ perl 15_257.pl
155 105 94 58 85 82 124 6 242 94 119 175 69 205 95 25 79 154 237 248 169 254 46 93
省1

---

260: 2019/09/01(日)19:42 ID:931SdLmv(1) AAS
>>257 Common Lisp
外部ﾘﾝｸ:ideone.com

---

265: 2019/09/02(月)06:37 ID:6t6D41pn(1/2) AAS
>>257 Ruby

n = 16
x = Array.new(n){rand(0x100)}
b = n.times.reduce(0){|s, i| x[~i] * 0x100**i + s}

puts "%p => %0#{n}b" % [x, b]

# => [31, 95, 43, 108, 105, 54, 1, 122, 100, 48, 137, 121, 131, 188, 105, 244] =>
11111010111110010101101101100011010010011011000000001011110100110010000110000100010010111100110000011101111000110100111110100

---

268: 2019/09/02(月)12:49 ID:YYsNPCXj(1) AAS
>>257
外部ﾘﾝｸ:ideone.com
C++。気が向いたのでstd::byte動かしてみたけど、ideonが対応してなくてグレードダウンした・・・。

---

287: 2019/09/03(火)15:31 ID:FbgAnO5f(1) AAS
>>257 Ruby
N = 10
X = Random.new.bytes(N)
puts X.unpack('C*').map{|c| '%02X' % c}.join(' '), X.unpack('B*')

結果
82 30 D4 E1 07 32 27 3E A2 E5
10000010001100001101010011100001000001110011001000100111001111101010001011100101

---

305: 2019/09/03(火)22:33 ID:dCTs9gWx(1) AAS
>>257
VB
外部ﾘﾝｸ:paiza.io

---

365: 2019/09/08(日)02:51 ID:bEtb/TpC(1) AAS
>>257
Kotlin
外部ﾘﾝｸ:paiza.io

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.033s