プログラミングのお題スレ Part18

プログラミングのお題スレ Part18at TECH

プログラミングのお題スレ Part18 - 暇つぶし2ch721:253
20/10/16 23:46:14.30 5gS0lg4h.net
>>705 Perl5
use List::Util max;
print max map{length} sprintf('%b', 20201016) =~ /(1+)/g;

実行結果
$ perl 18_695_bin1.pl
5

次ページ

続きを表示

1を表示