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

**デフォルトの名無しさん** · 2019/07/28(日) 19:39:57.54

プログラミングのお題スレです。

【出題と回答例】
1 名前：デフォルトの名無しさん
　　お題：お題本文

2 名前：デフォルトの名無しさん
　　>>1 使用言語
　　回答本文
　　結果がある場合はそれも

【ソースコードが長くなったら】 (オンラインでコードを実行できる)
https://ideone.com/
http://codepad.org/
http://compileonline.com/
http://rextester.com/runcode
https://runnable.com/
https://code.hackerearth.com/
http://melpon.org/wandbox
https://paiza.io/

宿題は宿題スレがあるのでそちらへ。

※前スレ
プログラミングのお題スレ Part14
http://mevius.5ch.net/test/read.cgi/tech/1558168409/

**デフォルトの名無しさん** · 2019/11/13(水) 20:48:13.08

>>941
C++ならSTLのequal_rangeを使えば、二分探索のコードを自前で書かずに済む。
https://ideone.com/KJ134u

この例の条件でしか判定しないなら、5つの定数値との比較にするのが一番簡単で
速そうだな。
https://ideone.com/ef553N

**デフォルトの名無しさん** · 2019/11/13(水) 21:39:03.09

なんで順番に5回も比較してんの？

**デフォルトの名無しさん** · 2019/11/13(水) 21:47:59.14

10回比較するわけにはいかないからでしょ

**デフォルトの名無しさん** · 2019/11/13(水) 21:53:11.46

まずは199との比較では？
あとは範囲を絞ったテーブルとか

int全てをカバーするテーブルも
intが32bitな64bit環境なら一応は可能

**蟻人間** ◆T6xkBnTXz7B0 · 2019/11/13(水) 22:09:59.79

お題: 自動塗り絵。

白地に黒い線で図形が描かれているモノクロ画像が与えられる。
白い領域をそれぞれ適当な単色で塗りつぶせ。可能ならOpenCVを使ってもいい。

**デフォルトの名無しさん** · 2019/11/13(水) 22:51:59.05

ペイントブラシ + スクリプト
で出来そう

**デフォルトの名無しさん** · 2019/11/13(水) 23:03:48.70

>>955
「一番速い」ではなく「一番簡単で速い」だからね。可読性とかバグの
混入しにくさとかも考えると、順番に5回比較するのが一番良いだろ。
特に https://mevius.2ch.net/test/read.cgi/tech/1573214616/3 への
回答としては、最も適している。

**デフォルトの名無しさん** · 2019/11/13(水) 23:40:49.81

一番速くもないし一番簡単でもない

一番「簡単で速い」？
簡単と速いは相反するので一番なんて無い

**デフォルトの名無しさん** · 2019/11/13(水) 23:42:10.65

凡人が安易に｢一番｣とか言わない方が良いよ

**デフォルトの名無しさん** · 2019/11/14(木) 01:06:49.29

俺が一番

**デフォルトの名無しさん** · 2019/11/14(木) 06:15:22.98

>>941 Io
f:=method(a,x,
a map(v,list((v-x)abs,v))min last
)
d:=list(98,100,198,200,298)
f(d,120) println
実行結果
100

**デフォルトの名無しさん** · 2019/11/14(木) 09:31:40.70

一番簡単で速いってなんだよ
一番簡単かつ一番速いなら一番速いって言えばいいだけだろ
ってC++の人かよ

**デフォルトの名無しさん** · 2019/11/14(木) 12:32:18.21

一番に過剰反応してるみなさんwww

**デフォルトの名無しさん** · 2019/11/14(木) 13:14:51.59

一番とか最も適しているとか
頭が悪いやつが良く言うセリフ

**デフォルトの名無しさん** · 2019/11/14(木) 13:27:39.39

それな
あと｢頭悪いやつがよく言う｣ってのも頭悪いやつよく言うセリフだわ

**デフォルトの名無しさん** · 2019/11/14(木) 15:14:06.76

>>941 python

https://ideone.com/g2dWOw

**デフォルトの名無しさん** · 2019/11/14(木) 16:23:41.28

>>963
俺、よくmakehoge書いてる人だけど、その二分探査書いた人は別人。
偶に、俺じゃない人がC++書いてくことがある。
まぁ、俺も貢献度が高いかというと解らんけど。

**デフォルトの名無しさん** · 2019/11/14(木) 22:16:17.11

>>963
「一番簡単で速い」は「一番簡単」かつ「速い」という意味だよ。
一番簡単なコードを書いてみて充分に速ければ、さらに手を加える必要はないってこと。
昨今はCPUが速いので、簡単なコードをささっと書いて終わりにできる場合が多いし、
Cを使うまでもなくRやPythonなどでも実用に耐える。処理条件が変わって速度に
不満が生じたときだけ、書き直せば良い。

**デフォルトの名無しさん** · 2019/11/14(木) 22:21:25.20

配列をキャッシュに乗せるだけで早くなる
配列にするだけで早くなる

**デフォルトの名無しさん** · 2019/11/14(木) 23:43:50.36

>>970
>>941の最も近い値を求める処理(Aと呼ぶ)だけを複数回連続して行う場合はそうだが、
間に別の処理(Bと呼ぶ)がたくさん入る場合はキャッシュから外れるかも知れないし、
AよりもBの方で相対的にだいぶ長い時間がかかっているならば、Aを高速化する
意味はない。

Aを簡単に書き終え、Bを書き進めてプログラム全体を完成させ、各部分の実行時間を
デバッガで分析し、Aを高速化する必要があるか判定するのが効率的な開発方法。
必要なときだけAを書き直してみて、元のAと実行時間を比較し、顕著に速い場合だけ
採用する。あまり変わらない場合は元の簡単な方に戻す。

**デフォルトの名無しさん** · 2019/11/15(金) 06:08:37.20

>>969
なぜ
一番簡単
だと思ったのか

**デフォルトの名無しさん** · 2019/11/15(金) 06:11:01.44

中途半端に最適化するくらいなら
意味通りをそのまま記述した方が良いよ

トリッキーなマクロとか使わないで普通にループでいいし

**デフォルトの名無しさん** · 2019/11/15(金) 07:24:03.38

>>941 J

f =: 4 : 0
{. x /: | x - y
)

a =: 98 100 198 200 250 298
a f 199
198

**デフォルトの名無しさん** · 2019/11/15(金) 08:39:52.88

>>491 python
整数の範囲を 1000000000 にして、リストのサイズをその1/10の　100000000 にしてやった物

https://ideone.com/JL4ZtG

**デフォルトの名無しさん** · 2019/11/15(金) 08:46:57.30

お題はどれ？

**デフォルトの名無しさん** · 2019/11/15(金) 10:34:11.71

>>975 は、>>941 のお題の間違い。

**デフォルトの名無しさん** · 2019/11/15(金) 10:34:39.11

>>972
もっと簡単なのがあると言うなら提示すりゃいいだけ

**デフォルトの名無しさん** · 2019/11/15(金) 10:37:36.49

そんなら一番簡単なんて言ったもん勝ちやんアホクサ

**デフォルトの名無しさん** · 2019/11/15(金) 11:19:40.93

>>979
どういうこと？

**デフォルトの名無しさん** · 2019/11/15(金) 13:20:35.16

発言者に証明責任がある
当たり前

**デフォルトの名無しさん** · 2019/11/15(金) 13:22:00.36

簡単じゃない部分は書いたけどね

**デフォルトの名無しさん** · 2019/11/15(金) 13:25:38.61

本当に一番簡単だと思ってるなら
非常に頭が弱い
というしかない

**デフォルトの名無しさん** · 2019/11/15(金) 16:04:20.43

証明責任が

**デフォルトの名無しさん** · 2019/11/15(金) 18:45:17.65

>>941 Ruby

def f(a,x)
a.min_by{|v|(v-x).abs}
end

**デフォルトの名無しさん** · 2019/11/15(金) 22:18:10.52

>>982
ひょっとして>>973か？
頓珍漢な指摘でドヤられても困るw

**デフォルトの名無しさん** · 2019/11/16(土) 07:59:12.18

お前ちょっとしつこいよ
二人ともどっか行ってくれ

**デフォルトの名無しさん** · 2019/11/16(土) 09:38:56.12

お題: 標準入力から読み取った文字列に対して変換候補の単語を表示するスクリプトを作れ
変換候補は https://www.cs.cmu.edu/~rgs/alice-table.html のテキストを元にし、英文のみの対応とする

例:
in < on
out > ['on', 'once', 'one', 'only']
in < we
out > ['well', 'went', 'were']

**デフォルトの名無しさん** · 2019/11/16(土) 09:39:44.99

>>988
URL訂正: https://www.cs.cmu.edu/~rgs/alice-I.html

**10-11** · 2019/11/16(土) 11:43:03.30

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}

**デフォルトの名無しさん** · 2019/11/16(土) 13:01:44.00

>>988-989 PowerShell
$Words = ([RegEx]"\w+").Matches((Invoke-WebRequest 'https://www.cs.cmu.edu/~rgs/alice-I.html').Content) | Select-Object -ExpandProperty 'Value' | Sort-Object -Unique
'on', 'we' | %{ "'$_' => ['$($Words -cmatch "^$_.*$" -join ''', ''')']" }
--
'on' => ['on', 'once', 'one', 'only']
'we' => ['well', 'went', 'were']

**蟻人間** ◆T6xkBnTXz7B0 · 2019/11/16(土) 14:12:37.63

そろそろ次スレ

**デフォルトの名無しさん** · 2019/11/16(土) 20:00:42.94

>>987
誤解がないように一応言っておくが、同一人物なのは943, 952, 958, 969, 971, 993だけで、
978や986は別人ね。

**デフォルトの名無しさん** · 2019/11/16(土) 20:11:13.21

どうでもいい
匿名掲示板

**デフォルトの名無しさん** · 2019/11/16(土) 22:09:51.31

>>988
@Mathematica

https://ideone.com/3Ad2Nv

**デフォルトの名無しさん** · 2019/11/17(日) 09:01:36.94

次スレ

プログラミングのお題スレ Part16
http://mevius.5ch.net/test/read.cgi/tech/1573948822/

**990** · 2019/11/17(日) 15:37:45.58

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]

**デフォルトの名無しさん** · 2019/11/21(木) 12:06:42.30

>>941 julia
a=[98,100,198,200,250,298]
f(a,x)=a[argmin(map(abs ,a.-x))]
f(a,50)

**デフォルトの名無しさん** · 2019/11/21(木) 17:12:54.10

>>988-989 Squeak Smalltalk。関数で。

| contents words fn |
contents := (HTTPClient httpGet: 'https://www.cs.cmu.edu/~rgs/alice-I.html') 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 => http://ws.stfx.eu/DK48GF5ZH8SF "

**蟻人間** ◆T6xkBnTXz7B0 · 2019/11/21(木) 20:01:07.49

はかい
こうせん
せんもんがっこう

**1001** · Over 1000

このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 116日 0時間 21分 10秒

**1002** · Over 1000

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

───────────────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
───────────────────

会員登録には個人情報は一切必要ありません。
月300円から匿名でご購入いただけます。

▼ プレミアム会員登録はこちら ▼
https://premium.5ch.net/

▼ 浪人ログインはこちら ▼
https://login.5ch.net/login.php