プログラミングのお題スレ Part15at TECH
プログラミングのお題スレ Part15 - 暇つぶし2ch1010:デフォルトの名無しさん
19/11/15 13:25:38.61 pd2oXw5y.net
本当に一番簡単だと思ってるなら
非常に頭が弱い
というしかない

1011:デフォルトの名無しさん
19/11/15 16:04:20.43 y6ix6SXf.net
証明責任が

1012:デフォルトの名無しさん
19/11/15 18:45:17.65 YlbiRAmO.net
>>941 Ruby
def f(a,x)
a.min_by{|v|(v-x).abs}
end

1013:デフォルトの名無しさん
19/11/15 22:18:10.52 1XAUh39O.net
>>982
ひょっとして>>973か?
頓珍漢な指摘でドヤられても困るw

1014:デフォルトの名無しさん
19/11/16 07:59:12.18 PKd8UO5d.net
お前ちょっとしつこいよ
二人ともどっか行ってくれ

1015:デフォルトの名無しさん
19/11/16 09:38:56.12 R3eXoa4h.net
お題: 標準入力から読み取った文字列に対して変換候補の単語を表示するスクリプトを作れ
変換候補は URLリンク(www.cs.cmu.edu) のテキストを元にし、英文のみの対応とする
例:
in < on
out > ['on', 'once', 'one', 'only']
in < we
out > ['well', 'went', 'were']

1016:デフォルトの名無しさん
19/11/16 09:39:44.99 R3eXoa4h.net
>>988
URL訂正: URLリンク(www.cs.cmu.edu)

1017:10-11
19/11/16 11:43:03.30 nyexrMnj.net
Mathematica
ビットテーブル使ったからいまいち
f[x_]:=Round[Exp[x*49/2^9]*10]+Mod[BitShiftRight[8518656,x],2]
f[Range[0,23]]
{10,11,12,13,15,16,18,20,22,24,27,30,33,36,39,43,47,51,56,62,68,75,82,91}

1018:デフォルトの名無しさん
19/11/16 13:01:44.00 9Ne+J8hx.net
>>988-989 PowerShell
$Words = ([RegEx]"\w+").Matches((Invoke-WebRequest 'URLリンク(www.cs.cmu.edu)').Content) | Select-Object -ExpandProperty 'Value' | Sort-Object -Unique
'on', 'we' | %{ "'$_' => ['$($Words -cmatch "^$_.*$" -join ''', ''')']" }
--
'on' => ['on', 'once', 'one', 'only']
'we' => ['well', 'went', 'were']

1019:蟻人間
19/11/16 14:12:37.63 wI2tFyzM.net
そろそろ次スレ

1020:デフォルトの名無しさん
19/11/16 20:00:42.94 ycfnvugG.net
>>987
誤解がないように一応言っておくが、同一人物なのは943, 952, 958, 969, 971, 993だけで、
978や986は別人ね。

1021:デフォルトの名無しさん
19/11/16 20:11:13.21 SjIOWxyj.net
どうでもいい
匿名掲示板

1022:デフォルトの名無しさん
19/11/16 22:09:51.31 ByTTIV4m.net
>>988
@Mathematica
URLリンク(ideone.com)

1023:デフォルトの名無しさん
19/11/17 09:01:36.94 xqEdXdr6.net
次スレ
プログラミングのお題スレ Part16
スレリンク(tech板)

1024:990
19/11/17 15:37:45.58 WMPUR+bY.net
BitGet使うんだった(Mathematicaに慣れてないのばればれ)
(* 49/2^9 = 0.095703125 *)
f[x_]:=Round[Exp[x*0.095703125]*10]+BitGet[8518656,x]
もう少し頑張っても16ビット以内にビットテーブルは縮小出来ず…。
(* 785/2^13 = 0.0958251953125 *)
f[x_]:=Round[Exp[x*0.0958251953125]*10]+BitGet[130048,x]

1025:デフォルトの名無しさん
19/11/21 12:06:42.30 p+kY48sO.net
>>941 julia
a=[98,100,198,200,250,298]
f(a,x)=a[argmin(map(abs ,a.-x))]
f(a,50)

1026:デフォルトの名無しさん
19/11/21 17:12:54.10 x85mexbT.net
>>988-989 Squeak Smalltalk。関数で。
| contents words fn |
contents := (HTTPClient httpGet: 'URLリンク(www.cs.cmu.edu)') contents.
words := (contents replaceAll: Character lf with: Character space; asTextFromHtml) asString subStrings: ' !"''()*,-.:;?`'.
words := words asSet asSortedArray.
fn := [:in | words select: [:word | word beginsWith: in]].
fn value: 'on'. "=> #('on' 'once' 'one' 'only') "
fn value: 'we'. "=> #('well' 'went' 'were') "
"for Pharo => URLリンク(ws.stfx.eu) "

1027:蟻人間
19/11/21 20:01:07.49 KAM+noJg.net
はかい
こうせん
せんもんがっこう

1028:1001
Over 1000 Thread.net
このスレッドは1000を超えました。
新しいスレッドを立ててください。
life time: 116日 0時間 21分 10秒

1029:1002
Over 1000 Thread.net
5ちゃんねるの運営はプレミアム会員の皆さまに支えられています。
運営にご協力お願いいたします。

──────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
──────────
会員登録には個人情報は一切必要ありません。
月300円から匿名でご購入いただけます。
▼ プレミアム会員登録はこちら ▼
URLリンク(premium.5ch.net)
▼ 浪人ログインはこちら ▼
URLリンク(login.5ch.net)

1030:過去ログ ★
[過去ログ]
■ このスレッドは過去ログ倉庫に格納されています


最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch