プログラミングのお題スレ Part9 [無断転載禁止]©2ch.net

**デフォルトの名無しさん** · 2016/12/01(木) 16:58:30.97

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

前スレ
プログラミングのお題スレ Part8©2ch.net
http://echo.2ch.net/test/read.cgi/tech/1444216746/

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

2 名前：デフォルトの名無しさん
　　>>1 使用言語
　　回答本文

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

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

**デフォルトの名無しさん** · 2017/12/21(木) 14:38:13.66

あ、あと出力方法は自分好みに適当にいじってる

**デフォルトの名無しさん** · 2017/12/21(木) 15:58:54.33

訂正
ただし解は1つでありかつ線が通らないマスは無いことを前提とする
ではなく
解が存在すればすべての解は全てのマスを通ることを前提とする

**デフォルトの名無しさん** · 2017/12/22(金) 19:30:58.88

お題
22の分割(たとえば3+3+5+8)のうち
分割したそれぞれの数の逆数の和が1になるものを求める

**デフォルトの名無しさん** · 2017/12/22(金) 19:39:05.90

早速間違えましたすみません
3 +5 +6 +8
でした

**デフォルトの名無しさん** · 2017/12/22(金) 20:06:25.02

>>883 ruby
f=->n,k{n==1?[[k]]:(1..k/n).flat_map{|i|f[n-1,k-i].map{|j|[i,*j].sort}}.uniq}
(1..22).each{|i|f[i,22].each{|a|p a if a.map{|e|1r/e}.sum==1}}

#=>[2, 4, 8, 8]
[2, 5, 5, 10]
[3, 3, 4, 12]

**デフォルトの名無しさん** · 2017/12/22(金) 21:21:23.60

C++で書いたけど、オセー。
デバッグ大変だ。
うーん。困ったなぁ。

**デフォルトの名無しさん** · 2017/12/22(金) 22:04:05.10

https://ideone.com/3ZWKv1
C++。こんなコード書いてみたけど、無理ゲー。
ちょっと厳しいなぁ。最近解けてないなぁ。
ちなみにデバッグ不完全なのであしからず。

**デフォルトの名無しさん** · 2017/12/22(金) 22:16:42.15

こういう数学的な問題を解くにはやっぱりプログラミング以前に数学を勉強した方がいいのでしょうか？

**デフォルトの名無しさん** · 2017/12/22(金) 22:23:25.38

>>888
数学は大事だよー。
俺数学出来ないから、解けない問題がそれなりにある。
算数では限界だ～～。
まぁ、数学とプログラミングって習得時はオーバーラップするところが少ないから融合するまでちょっと大変かな。
でも数学は強力なツールです。

**デフォルトの名無しさん** · 2017/12/22(金) 22:40:51.06

一般論でいえば必要だろうけど>>883なんて全部列挙したところで計算量はたかが知れてるし
目下必要なのは論理学的思考能力なのでは

**デフォルトの名無しさん** · 2017/12/22(金) 22:51:38.40

>>883 Java
https://ideone.com/WiMkNl

22くらいなら大丈夫だけど桁が増えると(´・ω・`)

**デフォルトの名無しさん** · 2017/12/23(土) 10:08:16.78

お題
52をいくつかの自然数に分解して
それらの最小公倍数を最大化せよ

**デフォルトの名無しさん** · 2017/12/23(土) 10:30:51.64

分解って、積じゃなくて和で良いんだよね？
数学の知識を使うと一瞬だけど

**デフォルトの名無しさん** · 2017/12/23(土) 10:47:21.72

>>892
2*3*5*7*11*23

**デフォルトの名無しさん** · 2017/12/23(土) 10:51:04.98

>>894
ダメだろ

**デフォルトの名無しさん** · 2017/12/23(土) 10:54:01.61

数学の知識が無いなら素直にコンピューターの力を借りなさい

**デフォルトの名無しさん** · 2017/12/23(土) 11:07:49.77

そもそも数学で簡単にとけない問題を力わざでとくための計算機だろ

**デフォルトの名無しさん** · 2017/12/23(土) 11:20:55.96

>>894
よくわからんが52の場合は
180180 [3, 4, 5, 7, 9, 11, 13]
ということらしいぞ

**デフォルトの名無しさん** · 2017/12/23(土) 11:22:52.27

2+3+5+7+11+13+11=52

**デフォルトの名無しさん** · 2017/12/23(土) 11:23:44.11

C++17発行されたから開発環境がさっさと対応してGCDくらい使えるようになりたい。

**デフォルトの名無しさん** · 2017/12/23(土) 20:45:26.14

>>768の問題で0<=b<10,0<c<10という制限がついた時
移動を何回か繰り返すと必ず元に戻るんだけど
その回数はbには無関係にc,10-c,10の最小公倍数で
okかな？

**デフォルトの名無しさん** · 2017/12/23(土) 23:54:31.73

一回の移動ではd=1ね。
ま、その制限を付けなくともd,c,10-c,10の最小公倍数になるんだろうけど

**デフォルトの名無しさん** · 2017/12/24(日) 06:15:12.28

>>901-902
10-c,10の最小公倍数じゃね？

**デフォルトの名無しさん** · 2017/12/24(日) 12:14:01.21

>>899
>>896

**デフォルトの名無しさん** · 2017/12/24(日) 13:55:05.53

数学云々言ってる奴って、何故かその成果見せないよな。
俺でも出来そうなFUD、いやマウントかな。

**デフォルトの名無しさん** · 2017/12/24(日) 16:16:06.49

ていうか、計算機はどちらかというと算数だよな。
数学は公式とか証明とか、そういう手順みたいなものを考えるわけで、プログラミングに近い。
コンピュータは作られたプログラムに従って計算結果を出すだけ。
もちろんプログラムそのものをコンピュータに作らせることも可能だけどね。これは次元が違う話だよね。

**デフォルトの名無しさん** · 2017/12/24(日) 20:21:20.17

プログラムには算数と三角関数とかがあればいい
あとN進法

**デフォルトの名無しさん** · 2017/12/24(日) 22:49:45.08

行列演算とか諸々の配列操作関数がないと無理だな

**デフォルトの名無しさん** · 2017/12/24(日) 23:49:37.37

では簡単なお題を
bを底とする値vを、2～36進数に変換し表示してください。
なお、bは2～36の整数、vは0以上の整数とし、不正な入力はないものとしてよい。
また、底と値の区切り文字は入出力ともに特に問わない。
[入力例]
16 deadbabe
[出力例]
2#11011110101011011011101010111110
3#100122100210210001200
4#3132223123222332
5#30122344134421
6#1414413520330
7#161402600604
8#33653335276
9#10570723050
10#3735927486
11#1647919685
(略)
27#9h9ll1i
28#7l225hi
29#6842o9l
30#53m7kg6
31#46f9hir
32#3farelu
33#2tf7mor
34#2e7m366
35#214kbpb
36#1ps9w3i

**デフォルトの名無しさん** · 2017/12/25(月) 00:09:45.09

>>909 Java 手抜き実装二つ
https://ideone.com/jybq1N
https://ideone.com/Wm8OQ2

◆QZaw55cn4c · 2017/12/25(月) 00:32:41.94

>>909
c++old http://mevius.2ch.net/test/read.cgi/tech/1434079972/29

**デフォルトの名無しさん** · 2017/12/25(月) 02:44:06.33

>>909 ruby
n=eval"%2$p.to_i %1$d"%"16 deadbabe".split
(2..36).each{|i|puts"%d#%s"%[i,n.to_s(i)]}

**デフォルトの名無しさん** · 2017/12/25(月) 04:27:01.50

>>909
https://ideone.com/dxqIrP
C++。まぁこれくらいなら算数でも解ける範囲やな。
ただしコードがバグってないとは言ってない。へへ。

**デフォルトの名無しさん** · 2017/12/25(月) 06:21:01.65

>>909 lisp
https://ideone.com/6D7LRp

**デフォルトの名無しさん** · 2017/12/25(月) 12:28:00.12

>>909
Kotlinらしくしてみようとはしたが、あまりにも短く、更に俺がまだよくKotlinを知らないためにこんな風になった。
https://paiza.io/projects/BpAXUQuDCaOSD6Q6GN4O8A
肝心な所はJavaとほぼ同じ。

**デフォルトの名無しさん** · 2017/12/25(月) 19:56:50.93

>>909 F#
https://ideone.com/rRZ949

**デフォルトの名無しさん** · 2017/12/26(火) 10:23:38.85

>>909 Squeak/Pharo Smalltalk

| n |
n := '16 deadbabe' replaceAll: Character space with: $r; asNumber.
2 to: 36 do: [:i | Transcript cr; show: i; space; show: (n radix: i) asLowercase]

**デフォルトの名無しさん** · 2017/12/28(木) 04:53:27.57

お題を捏造してやるぜ。
アンサーが42になる式を捏造せよ。という数学パズル。
小難しい式をでっち上げた人が優勝。
算数から数学、物理まで式になってればすべての手法が使用可能。統計とかでもいいよ。
制約は答えが42になることのみ。
解けるものはいるか？

**デフォルトの名無しさん** · 2017/12/28(木) 04:55:12.31

あー、忘れてた。
ちゃんと検算して答えを確認できること。
俺、算数しかできないから、各種サービスにかけて検算できるのが望ましい。

**デフォルトの名無しさん** · 2017/12/28(木) 04:57:55.88

ぷろぐらみんぐ・・・？

**デフォルトの名無しさん** · 2017/12/28(木) 05:01:29.85

ベンチマーク的な感じだな。
たまには本気を出したいだろ？お前ら。

**デフォルトの名無しさん** · 2017/12/28(木) 05:04:57.45

当たり前だが、必要な関数が標準ライブラリになかったら自作すること。

**デフォルトの名無しさん** · 2017/12/28(木) 07:10:57.10

>>918 ruby
require 'open-uri'

expr = "the Answer to the Ultimate Question of Life, the Universe, and Everything"

uri = "https://www.google.com/complete/search?output=toolbar&;q=%s"
puts open(format(uri, expr.gsub(' ', '%20'))).string[/data="\K[^"]*/]
#=> 42

**デフォルトの名無しさん** · 2017/12/28(木) 07:34:31.76

>>923
元ネタはそれ。正解の一端。

**デフォルトの名無しさん** · 2017/12/28(木) 08:07:25.24

>>918
brainfuck
https://ideone.com/eJSjws

**デフォルトの名無しさん** · 2017/12/28(木) 09:35:15.49

>>918
難しさの判定を人間が気分でするしかないとなると死ぬまで気に入らないと
言い続けて終わらないようにもできてしまうわけで、少なくともお題の判定
方法としては適切ではないのではないか？

**デフォルトの名無しさん** · 2017/12/28(木) 11:19:23.23

式を捏造せよと言ってんのに、検算して答えがあってることを確かめろとか矛盾してて草

**デフォルトの名無しさん** · 2017/12/28(木) 11:41:23.15

>>925
基本的かつ合理的。

>>926
投票制にする？

>>927
答えは42になることだけは決まってるんだから、検算できないのはどういう理由？
プログラミングやるんだから、イデオンとか使うんじゃだめなの？

**デフォルトの名無しさん** · 2017/12/28(木) 15:25:23.94

片山に次ぐ逸材かもしれないが出題者が馬鹿だとやる気が出ないという良い見本

**デフォルトの名無しさん** · 2017/12/28(木) 15:31:12.30

自由を泳げないって不便だね。
何やっても良いんだからなんかすればいいって話なんだけど。
定型の答えなんか求めてないのは出題見ればわかるだろ。
発想力が欠如してるんじゃないか？

基本的にベンチマークだと言ってるでしょ？
捏造っていう言葉が悪かったら謝るが。構成しろってことにすれば大体同じや。

**デフォルトの名無しさん** · 2017/12/28(木) 15:32:51.23

口だけのやつはぶっぶーですわ。

**デフォルトの名無しさん** · 2017/12/28(木) 16:00:26.20

自由を泳げないって

**デフォルトの名無しさん** · 2017/12/28(木) 18:49:12.75

Cコ:彡

**デフォルトの名無しさん** · 2017/12/29(金) 00:30:23.43

>>909 rust
https://ideone.com/H6mdNM
・BigInt不使用
・n.to_s(b)の形にしたかったが素早く諦めた
・色んなところに迷いと妥協が見え隠れ

**デフォルトの名無しさん** · 2017/12/29(金) 02:28:40.84

お題：入力があったら6面のサイコロを振って出た目を出力してください
ただし数字を使ってはならない

**デフォルトの名無しさん** · 2017/12/29(金) 03:07:31.93

そういう数字を使ってはいけないって誰得なの？

**デフォルトの名無しさん** · 2017/12/29(金) 05:31:16.53

>>935
Unicode の U+2680 ～ U+2685 は?
??????

**デフォルトの名無しさん** · 2017/12/29(金) 09:00:41.20

>>936
さぁ。。。

>>937
確認してないけどいいのでは

**デフォルトの名無しさん** · 2017/12/29(金) 09:20:10.35

>>935
https://ideone.com/GrYSWB
C++。こんな感じ？

**デフォルトの名無しさん** · 2017/12/29(金) 09:29:20.12

https://ideone.com/ZRXCD5
こっちの方がそれっぽいか。

**デフォルトの名無しさん** · 2017/12/29(金) 20:57:46.71

数字を使ってはならないってのが謎
AAで出力しろってか？

**デフォルトの名無しさん** · 2017/12/29(金) 21:21:03.51

>>935
Rubyで。
p rand('abcdef'.length) + 'z'.length

**デフォルトの名無しさん** · 2017/12/29(金) 21:28:13.36

数字を使うなって表示なのかそれともソースなのか？

表示なら
●●●●●●とか

**デフォルトの名無しさん** · 2017/12/29(金) 21:29:41.90

両方だろ

**デフォルトの名無しさん** · 2017/12/29(金) 21:50:46.64

そもそも入力が何なのかすら意味不明。却下

**デフォルトの名無しさん** · 2017/12/29(金) 22:22:21.11

お題
自然数 n を入力とし, a と b を乗ずると n になるような自然数 a と b を出力する.
a と b の侯補が複数存在する場合は, a と b の和がもっとも小さなものを出力すること.

**デフォルトの名無しさん** · 2017/12/29(金) 22:32:07.85

>>938
じゃあUnicodeのU+2680からの文字を使った版。Kotlinで。
https://paiza.io/projects/GElJ8jIbi45jocyYirbO8w
入力があったらの部分は最初の readLine() だ。
下の「入力」タブの所で改行を一つ入れてあるので開いたら即出力がある。

**デフォルトの名無しさん** · 2017/12/29(金) 23:03:49.04

>>935
また Kotlin。
サイコロの目の一つは5x5ビットあれば表現できるので配列に詰め込んで後で変換して出すようにした。
https://paiza.io/projects/uGhQ6cuRqbnlGc2TTvT92w?language=kotlin
別に配列でなくてもとにかく 5*5*6 (=150) bit 詰め込めるなら何でも良い。

**デフォルトの名無しさん** · 2017/12/29(金) 23:13:30.16

>>946
15.times{|n|
sqrt_n = Integer.sqrt(n)
(2 * sqrt_n..n + 1).each { |s|
(sqrt_n..n).each { |i|
next unless i * (s - i) == n
puts '%d * %d = %d' % [i, s - i, n]
break
} || break
}
}

0 * 0 = 0
1 * 1 = 1
1 * 2 = 2
1 * 3 = 3
2 * 2 = 4
5 * 1 = 5
2 * 3 = 6
7 * 1 = 7
2 * 4 = 8
3 * 3 = 9
5 * 2 = 10
11 * 1 = 11
3 * 4 = 12
13 * 1 = 13
7 * 2 = 14

**デフォルトの名無しさん** · 2017/12/29(金) 23:14:32.74

>>949はRuby2.5.0ね

**デフォルトの名無しさん** · 2017/12/29(金) 23:25:01.60

>>935
https://paiza.io/projects/dpm1gJDuxMLd6pvQau8rig?language=kotlin

**デフォルトの名無しさん** · 2017/12/30(土) 00:34:17.12

>>946
def r9_946(n)
Math.sqrt(n).to_i.downto(1) do |e|
return [e, n / e] if (n / e) * e == n
end
end

1.upto(100) do |n|
a, b = r9_946(n)
printf("%d = %d * %d¥n", n, a, b)
end

**デフォルトの名無しさん** · 2017/12/30(土) 00:45:39.83

>>949から100倍くらい早くなった
https://ideone.com/4qZ3Di

**デフォルトの名無しさん** · 2017/12/30(土) 01:37:16.58

>>951
出目が0～6？

確率的には
0: 1.56%
1: 9.38%
2: 23.44%
3: 31.25%
4: 23.44%
5: 9.38%
6: 1.56%
くらいか？

**デフォルトの名無しさん** · 2017/12/30(土) 09:12:17.38

>>946
https://ideone.com/GSawYb
C++。条件足りてるかよくわかってないけど、適当に書いたらそれぽい感じになった。
あってる保証はない。

**デフォルトの名無しさん** · 2017/12/30(土) 09:19:03.41

なんか俺の劣化>>953みたいな感じだな。
うーん。名案だとは思ったのだけど。むむむ・・・。

**デフォルトの名無しさん** · 2017/12/30(土) 09:31:25.37

うほ、フィルターしてる条件にバグがあった。良く動いてたな。

**デフォルトの名無しさん** · 2017/12/30(土) 09:33:18.81

これ、片方1のやつって素数かな？
エラトステネスの篩とどっちが軽いかな。

**デフォルトの名無しさん** · 2017/12/30(土) 12:46:04.20

お題
要素が素数, かつ要素の総和が2018になる集合のうち, 要素数がもっとも大きい集合を出力する.

**デフォルトの名無しさん** · 2017/12/30(土) 12:59:47.50

>>959
[2]*(2018/2)

**デフォルトの名無しさん** · 2017/12/30(土) 14:25:23.55

>>959
https://ideone.com/lwcNQR
C++。DPの練習。必要な数はわかったが過程の表示の仕方がわからない。
どうすれバインダー。Orz

**デフォルトの名無しさん** · 2017/12/30(土) 15:14:55.24

>>961
https://ideone.com/DdepmL
C++。あってるか知らんけど、力業でベタ作業した結果、それっぽい数字にたどり着いた。
と、思ったら全然違う数字を指していた。

**デフォルトの名無しさん** · 2017/12/30(土) 15:16:57.66

>>959
https://ideone.com/XzeJ1E
C++。でけたー。DP難しいなぁ。

**デフォルトの名無しさん** · 2017/12/30(土) 15:18:24.57

>>959
それ1なのでは?

**デフォルトの名無しさん** · 2017/12/30(土) 15:25:04.70

要素数だから、コンテナカウントだと思って書いたんだけど。
え？題意勘違いしてる？

**デフォルトの名無しさん** · 2017/12/30(土) 15:25:53.45

element countだよね？

**デフォルトの名無しさん** · 2017/12/30(土) 15:30:31.85

2が1009個ある集合、>>960で答えが出てる

**デフォルトの名無しさん** · 2017/12/30(土) 15:32:23.03

>>967
あー、それそういう意味だったのか。
うわー俺、蛇足だった。

**デフォルトの名無しさん** · 2017/12/30(土) 15:36:57.18

>>967
それをさ、プログラムで解くのきつくない？
総当たりしないと俺は無理。重複許可すると途端に大変になる。

**デフォルトの名無しさん** · 2017/12/30(土) 16:05:45.05

https://ideone.com/RVtf4i
適当に拡張してみたが、搭載メモリ8Gを使い切ってしまいデバッグ不可。
これ、意外と難問かもしれん。

**デフォルトの名無しさん** · 2017/12/30(土) 16:20:15.12

ちょっとくどいけど、
これさ、量子アニーリングじゃないと解けないやつかなぁ？？
なんかさっきからいじってるけど、ローカルポケットに落ちてる気がする。
グローバルポケットに落とす方法が皆目見当つかない。
解説頼む。

**デフォルトの名無しさん** · 2017/12/30(土) 16:48:17.65

すみません, お題での集合は Ruby では Setクラスのような, 要素に重複や順序性のないものを考えていました.
想定していた回答例は以下です.
answer
(2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101 103 107 113 127 131 137 139)
(apply #'+ answer)
2018
(length answer)
33

**デフォルトの名無しさん** · 2017/12/30(土) 17:07:30.49

9個まではすぐ見つかるんだけど10個になった途端重くなる
10個の場合は存在しない？
逆に21個や33個の場合はすぐ見つかるんだ、どういう分布なんだろな

**デフォルトの名無しさん** · 2017/12/30(土) 17:11:07.91

>>972
おー、よかった。どこまで深淵があるのか怖かったよ。
多分、>>963であってると思う。たぶん。

**デフォルトの名無しさん** · 2017/12/30(土) 18:48:52.49

>>959 C#
https://ideone.com/J9MmxS
33個と決め打ちした場合は4通りがすぐ出る
そのあと延々ループしてるがTime limit exceededで打ち切ってくれる

**デフォルトの名無しさん** · 2017/12/30(土) 21:03:54.80

>>959
１も素数なんだが１が2018個ある集合はありなのか?
それだとお題としてほとんど意味のないひっかけ問題みたいになるわけだが、
そうではないなら問題を修正しろ。

**デフォルトの名無しさん** · 2017/12/30(土) 21:15:48.77

＞１も素数なんだが
＞１も素数なんだが
＞１も素数なんだが

**デフォルトの名無しさん** · 2017/12/30(土) 21:23:36.74

>>977
あ、2か。
でも問題がこれだと同じことだよなあ。

**デフォルトの名無しさん** · 2017/12/30(土) 21:26:45.29

>>976
4つ上のレスも確認できないくせに何言ってんの

**デフォルトの名無しさん** · 2017/12/30(土) 21:42:01.90

一般に, 素数は 1およびその数自身のほかに約数を有しない正の整数と定義されますので, ここではその定義に従います.

また一般に, 重複や順序性のないもののあつまりを集合(set) と呼ぶことが多いので, ここではその用法に従います.
集合(set)に対して, ものをならべたものは列(sequence)と呼ぶことが多いです.
ここでは『AABBCC』は文字列ですが, 文字集合ではないとします.

% irb
irb(main):001:0> require 'prime'
=> true
irb(main):002:0> 1.prime?
=> false
irb(main):003:0> 2.prime?
=> true
irb(main):004:0> require 'set'
=> true
irb(main):005:0> Set.new([1]*2018).size
=> 1