[過去ﾛｸﾞ] プログラミングのお題スレ Part17 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
95: 2020/04/05(日)12:56 ID:yw9/uuhJ(1/2) AAS
粘着君ってなんやねん
スレチだって言われてんだろ
96: 2020/04/05(日)13:01 ID:SfC0ZJYK(2/5) AAS
えw それ言ってるのが粘着君じゃないの？w
どの辺がスレチなのか知らんけど君の意見なんか誰も同調しないかのように回答わさわさなのを見てどんな気持ち？？？w
97: 2020/04/05(日)13:06 ID:yw9/uuhJ(2/2) AAS
あほくさ
98: 2020/04/05(日)13:06 ID:liJZihU7(1) AAS
>>72 GNU Smalltalk
| fn |
fn := [:str | str isEmpty ifTrue: [str] ifFalse: [str asNumber]].
(#('090' '0080' '123' '0' '000' '') collect: fn) display.
=> (90 80 123 0 0 '' )
外部ﾘﾝｸ:ideone.com
99: 2020/04/05(日)13:07 ID:SfC0ZJYK(3/5) AAS
わざわざ他スレから出張してまで粘着するも自分の思い通りにならず涙目敗北草不可避w
100: 2020/04/05(日)13:08 ID:5b4pXRMu(1) AAS
ID:SfC0ZJYKは有名な荒しだよ
スルーしな
101: 2020/04/05(日)13:10 ID:SfC0ZJYK(4/5) AAS
そのように言っている自分自身の策略書き込みがスルーされているという悲劇ww
102: 2020/04/05(日)13:13 ID:QyCQlkmw(1) AAS
共有NG入ってて草
>>72が自力で解けない時点で脳みそに障害あるだろコイツ
103: 2020/04/05(日)13:15 ID:SfC0ZJYK(5/5) AAS
ブツブツと負け惜しみを垂れ流しているその姿はまさに哀愁満点 w
104: 2020/04/07(火)16:39 ID:WiIyPE7p(1) AAS
>>72
部分解なら lisp で
(loop for i in (list 090 0080 123 0 000 ) do (format t "~d~%" i))
90
80
123
0
0
105: 2020/04/07(火)19:00 ID:i9ABTPYd(1) AAS
であればもうこれで十分って感じがしてきた^^;
>>72 GNU Smalltalk
#(090 0080 123 0 000 '') display.
=> (90 80 123 0 0 '' )
外部ﾘﾝｸ:ideone.com
106(8): 2020/04/08(水)07:58 ID:5CDGaVzP(1) AAS
お題: レスの被アンカー数をレスごとにカウントし、降順に整列して出力せよ
入力は1レス1行で入力され、1行のフォーマットは「レス番:レス内容」でコロンで区切ってある
レスの入力がすべて終わった段階でレスごとに被アンカー数を計算し、「レス番:カウント数」のフォーマットで出力せよ
入力と出力例: 外部ﾘﾝｸ:ideone.com
107: 2020/04/08(水)16:25 ID:gvYQZ6Pp(1/2) AAS
こんな感じで作ったな
select_word_and_anchor.pl
外部ﾘﾝｸ:ideone.com
cat ~/.w3m/keymap
# vim: set nowrap
keymap a EXEC_SHELL "w3m -cols 200 $( echo $W3M_URL| sed 's/[-l][0-9]\+//' ) | /home/web/extract_body_of_2ch.sh | /home/bin/select_word_and_anchor.pl|less"
108: 2020/04/08(水)16:30 ID:gvYQZ6Pp(2/2) AAS
動作はこんな感じ 例にあるような常用2chアンカー機能する
画像ﾘﾝｸ[png]:i.imgur.com
109: 2020/04/08(水)23:06 ID:jh8IMM/7(1) AAS
>>106 Perl5
for (<>) {
($r, @a) = /([-\d]+)/g;
push @s, $r;
for (@a) {
@b = /(\d+)/g;
$h{$_}++ for $b[0]..$b[-1]
}
}
printf "%d: %d\n", $_, $h{$_}//0 for @s;
省2
110(2): 2020/04/09(木)00:05 ID:VEjEdiDF(1) AAS
>>106 Perl5、ｺﾞﾒﾝ「降順に整列」が抜けてた…orz、やり直し
for (<>) {
($r, @a) = /([-\d]+)/g;
push @s, $r;
for (@a) {
@b = /(\d+)/g;
$h{$_}++ for $b[0]..$b[-1]
}
}
@t = sort{$h{$b} <=> $h{$a}} @s;
省3
111: 2020/04/09(木)10:38 ID:Sx5ouxFp(1) AAS
>>106
話題そらそうと粘着君が必死だねｗｗｗ負け組だっさｗｗｗ
112: 2020/04/09(木)12:42 ID:5swiwcjH(1) AAS
？
113(2): 2020/04/09(木)15:48 ID:pqMoXxyo(1) AAS
荒らしは必ず、2回書き込む。
「そうだよね」とか、同意するレスを付けて、人数が多いように見せる
くだすれPython(超初心者用) その47【Ruby禁止】
Ruby禁止とか、色々なスレのタイトルを勝手に変える
工学部というコテハンだろ。
ソースコードを書かないし、プログラマーじゃないから相手をしないように！
114: 2020/04/09(木)16:48 ID:G208HopB(1) AAS
>>113
そのスレは別のスレであり話題としてスレ違い。
そもそもそれらのスレでRuby禁止と付けられる原因を作っているお前が言うな。
お前こそコテハンをつけるか書き込みをやめるかしろよ。
上下前次1-新書関写板覧索設栞歴
あと 888 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.032s