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

---

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

---

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

---

159: 2019/02/13(水)08:26:40.04 ID:ds2YQTN5(1/6)調 AAS
>>154
だから>>134で４行目間違えたって書いてあるだろ
よく読め

---

164(1): 2019/02/13(水)11:23:09.04 ID:B8qJWD6e(2/3)調 AAS
「よく考えたらやっぱり同じだな」だけでは何と何が同じだと思ったのかわからない
悪びれた様子もなく前後の文脈からも推論不可
とてもまともとは思えない

---

606(1): 2019/03/11(月)13:45:52.04 ID:+cahZmCl(2/5)調 AAS
>>605
仕様をきっちり決めないと解釈の違いから沢山の違った回答が出てくる可能性があるのだが、それで良いと。

---

648: 623 2019/03/13(水)02:39:20.04 ID:ZImJqTUY(1)調 AAS
>>646
スマン。漏れの間違い！

key, val などの特定の文字列を置換しているのかと、勘違いしていた

---

665: 2019/03/14(木)15:56:35.04 ID:TPG8S2ma(2/2)調 AAS
>>547

Haskell
内包表記の方が何をやってるか分かり易いと気付いて書き換えた。

import Data.Char

main = (mapM_ print.filename) ["aB.txt","Ab.txt","xx","cd","cD","CD","ab.txt"]

filename [] = []
filename (xs:xss)| length a > 1 = a:filename b
where
a = func (==)
b = func (/=)
func f = [xs' | xs' <- (xs:xss), map toLower xs `f` map toLower xs']
filename (_:xss) = filename xss

---

908(2): 2019/05/14(火)23:52:44.04 ID:AtHJrRxM(1)調 AAS
>>877 Squeak Smalltalk

| fn |

fn := [:str |
((str lines collectWithIndex: [:line :lIdx |
(line reject: #isSeparator) asArray
collect: [:chr | {chr. (line indexOf: chr) - 1. lIdx - 1}]]
) concatenation select: #notEmpty) asStringWithCr
].

fn value: 'a b c

d'

"=>
'#($a 0 0)
#($b 2 0)
#($c 4 0)
#($d 0 2)' "

---

990(3): 2019/05/18(土)15:57:05.04 ID:0itJzGag(1)調 AAS
ハローワールドなら任せて欲しい

---

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

---

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

---

ぬこの手 ぬこTOP 0.034s