[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2ch.scのread.cgiへ]
Update time : 11/28 03:01 / Filesize : 280 KB / Number-of Response : 1039
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

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



1 名前:デフォルトの名無しさん mailto:sage [2016/12/01(木) 16:58:30.97 ID:gTkHDluD.net]
プログラミングのお題スレです。

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

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

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

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

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

2 名前:デフォルトの名無しさん mailto:sage [2016/12/01(木) 19:14:53.02 ID:sow3BhsA.net]
即死回避

3 名前:デフォルトの名無しさん mailto:sage [2016/12/01(木) 21:04:32.24 ID:bG1bMw/g.net]
puts 'そ'

4 名前:デフォルトの名無しさん mailto:sage [2016/12/01(木) 22:56:02.34 ID:sN9AIsZM.net]
printfn "れ"

5 名前:デフォルトの名無しさん mailto:sage [2016/12/01(木) 23:26:28.91 ID:Vh7HCfjU.net]
pc10.2ch.net/test/read.cgi/tech/1169413998/656
この問題
2つの1バイトのビットパターン b,w (b&w == 0) に対して
r = base[b|w]+b (or base[b|w]+w)
を重複なく定める配列

6668まで縮める配列を見つけたけどもっと縮める或は6561ぴったりにする配列はあるのだろうか

int base[] = {
612,614,1681,1054,4528,3808,6078,2684,3278,3262,6349,336,5719,4410,6249,
700,1587,1584,5960,2284,4738,3352,6230,2412,4496,3514,5924,516,4770,3546,6636,
2876,4371,3096,6497,1952,5977,3880,5

6 名前:696,2668,6153,4268,5708,320,6235,3984,6182,
812,4354,4282,6549,1576,5713,3384,6541,2372,6029,4350,6425,1508,6155,4090,6605,
1760,3620,3496,5182,692,6058,3612,6094,1020,3694,3774,6317,580,4732,3480,6217,
716,6260,3740,5672,1416,6050,3768,6086,2180,6254,3674,6256,1288,6048,3898,6284,
2844,6522,2968,5680,1936,5711,3864,6142,1132,6093,3646,6313,564,6169,3936,6297,
1140,6510,4226,6489,2156,6508,3192,6514,2540,6025,4222,6413,1572,6027,4048,6380,
2716,4396,3266,5559,548,4690,3712,5628,980,5319,3246,5555,368,4540,3214,5567,
908,5380,3258,5800,1544,4876,3320,4938,972,5436,3486,5828,1512,4706,3290,5491,
2308,4693,3250,4755,1980,5833,3792,5791,1912,5285,4204,5281,1956,5769,3198,5265,
1888,4691,4218,5866,1960,5860,3728,5839,2348,5862,3450,5636,256,4428,4026,5201,
1696,4947,3500,5150,568,4969,3456,4961,556,4945,3642,4977,464,4636,3658,4993,
876,4955,3608,5640,1424,4682,3512,4906,2148,5410,3390,5376,1284,5404,3802,5459,
1252,4685,2952,5146,1908,5721,3472,5122,996,4701,4176,4949,448,4620,4188,5130,
732,4699,2944,5792,2064,5735,3200,4866,2468,5374,2940,4687,260,4426,2942,4427,0
};
[]
[ここ壊れてます]

7 名前:デフォルトの名無しさん mailto:sage [2016/12/02(金) 00:12:44.35 ID:gTW8SJ/a.net]
リンク開けねーし日本語意味不明だし

8 名前:デフォルトの名無しさん mailto:sage [2016/12/02(金) 00:32:31.53 ID:IjczpQdN.net]
二つの2^8の形で表されている実質3^8の状態を一回の256要素の配列の参照と加算で
0から6561になるべく近いユニークな数に変換するその配列を求めるって問題

for (w = 0; w < 256; w++) {
for (b = 0; b < 256; b++) {
if ((b & w) == 0) {
if (++a[base[b | w] + b] > 1)
printf ("err\n");
}
}
}
これをエラーが出ないように通す配列

9 名前:デフォルトの名無しさん mailto:save [2016/12/06(火) 09:57:55.18 ID:4tk1iq5o.net]
>>1おつ

10 名前:デフォルトの名無しさん [2016/12/07(水) 14:23:07.62 ID:ltGABuaa.net]
景気付けにどうぞ

お題:以下の数列を出力するプログラム
[0, 10, 1110, 110, 2110, 122110, 11222110, 2122110, 1211222110, 11122122110,...]



11 名前:デフォルトの名無しさん mailto:sage [2016/12/07(水) 18:06:29.71 ID:qM0eFzSC.net]
法則性が分からん

12 名前:デフォルトの名無しさん mailto:sage [2016/12/07(水) 19:07:54.18 ID:ijEXmeus.net]
>>9 Java
ideone.com/SjEe5N

>>10と同じで法則性考えるのに時間がかかったわ

13 名前:デフォルトの名無しさん mailto:sage [2016/12/07(水) 19:15:52.19 ID:Gz2S0y7j.net]
>>9 Nim
https://ideone.com/WLvRqB

14 名前:デフォルトの名無しさん mailto:sage [2016/12/08(木) 00:20:55.59 ID:Gvasb8BC.net]
>>9
・法則見つけた瞬間までがピーク
・実際書くと何一つスッキリ書けなくて悔しい
https://ideone.com/n0RoNr

[

15 名前:デフォルトの名無しさん mailto:sage [2016/12/08(木) 00:21:30.57 ID:Gvasb8BC.net]
>>9 ruby
・法則見つけた瞬間までがピーク
・実際書くと何一つスッキリ書けなくて悔しい
https://ideone.com/n0RoNr

["0", "10", "1110", "110", "2110", "122110", "11222110", "2122110", "1211222110", "11122122110", "12211222110", "11222122110"]

16 名前:デフォルトの名無しさん mailto:sage [2016/12/08(木) 00:53:14.68 ID:T7wNCBuS.net]
>>9 ruby ちょい整理
https://ideone.com/kyw9bm

17 名前:デフォルトの名無しさん mailto:sage [2016/12/08(木) 22:20:30.70 ID:eRjONenV.net]
・前項の数字の1の位から順に見てって、数字が連続する数を数えていく。
・数字とその連続数を1の位から順に埋める
・3の数字は削除する

18 名前:デフォルトの名無しさん mailto:sage [2016/12/09(金) 16:43:25.82 ID:pZMdQcgu.net]
お題: 文字列に含まれる複数のURLをHTMLのaタグで囲って出力してください。詳細な仕様はないです。
例: ideone.com/NY2ooA

19 名前:デフォルトの名無しさん mailto:sage [2016/12/09(金) 21:12:11.14 ID:Ees/IyTq.net]
例に出されたURLも不正だし
>詳細な仕様はないです。
となると判別不能では

20 名前:デフォルトの名無しさん mailto:sage [2016/12/09(金) 21:52:57.66 ID:BOiFZI5h.net]
>>9 Nim
あまりに不細工だったので書き直し
https://ideone.com/9q80v4

正規表現使うバージョン(ただしideoneは古すぎてコンパイルできない)
https://ideone.com/01ktu2



21 名前:デフォルトの名無しさん mailto:sage [2016/12/10(土) 04:17:33.77 ID:mNmdekz4.net]
イデオンって投稿時にURL置換するんだよな。

22 名前:17 mailto:sage [2016/12/10(土) 11:48:18.29 ID:E4ED1H/i.net]
ideone.comをフィルターしてるのかと思ったらURL全般だめっぽい

23 名前:デフォルトの名無しさん mailto:sage [2016/12/11(日) 18:00:53.14 ID:RSXbZT65.net]
>>9 Perl
use feature qw{:5.16};
sub {
$_ = join'', @_;
exit if length > 12;
say;
@_ = ();
while (/((.)\2*)$/) {
$len = length($1);
$len = '' if $len > 2;
unshift @_, $len . $2;
$_ = $`
}
goto __SUB__;
}->(0);

無名関数の末尾再帰を使って記述してみました。

24 名前:片山博文MZ ◆T6xkBnTXz7B0 mailto:sage [2016/12/13(火) 23:58:53.18 ID:AlD2ABgf.net]
お題:C言語に関する質問に答えられる人工知能を作れ。

25 名前:デフォルトの名無しさん mailto:sage [2016/12/14(水) 02:25:35.75 ID:EQpNWDBR.net]
自分で作れ

26 名前:デフォルトの名無しさん mailto:sage [2016/12/17(土) 22:23:37.55 ID:zexuiF2f.net]
案1 Amazon Mechanical Turk を使う。
案2 知恵袋に投げて、回答を転記する。
案3 IBM Watson 使う。

27 名前:デフォルトの名無しさん mailto:sage [2016/12/17(土) 22:35:16.13 ID:R0k7IOIa.net]
大穴 自分の脳をささげる。

28 名前:デフォルトの名無しさん mailto:sage [2016/12/19(月) 21:40:29.23 ID:KFYYsgKs.net]
入力音声を2chのスレに書き込む
レスがあったら音声出力する
処理時間→数分〜数日

29 名前:デフォルトの名無しさん mailto:sage [2016/12/19(月) 22:14:03.89 ID:TQpl8Z1r.net]
お題:ペントミノパズルの12種類のピースを表示する

30 名前:デフォルトの名無しさん mailto:sage [2016/12/20(火) 00:24:55.91 ID:j+0pMEUE.net]
>>28 bash
ideone.com/51ZjFV

端末でどうぞ



31 名前:デフォルトの名無しさん mailto:sage [2016/12/20(火) 23:33:43.23 ID:kU3OD1WB.net]
お題:ペントミノパズルの全解を列挙する

32 名前: ◆QZschizo.iSO mailto:sage [2016/12/31(土) 18:31:14.25 ID:nvhfPpJn.net]
瞬速年忘れ問題
2017は素数か?素数なら何番目か?

33 名前:デフォルトの名無しさん mailto:sage [2016/12/31(土) 19:13:55.05 ID:39E0aGGL.net]
>>31
C
ideone.com/bUbh6M

34 名前:デフォルトの名無しさん mailto:sage [2016/12/31(土) 19:23:15.93 ID:39E0aGGL.net]
たった今一部訂正

35 名前:デフォルトの名無しさん mailto:sage [2016/12/31(土) 22:12:03.44 ID:FA/ffAJp.net]
>>31
同じくC
みなさん今年はお世話になりました
https://paiza.io/projects/Sio8sqlqmX547VHnZkpj_Q

36 名前:デフォルトの名無しさん mailto:sage [2016/12/31(土) 22:16:03.44 ID:oE9oDlU2.net]
ああ、2017ぐらいなら何の工夫もせず力技でごり押ししても大丈夫なのか。
そりゃそうだなw

しかし俺は大みそかに何でこんなスレ覗いてるんだw

37 名前:デフォルトの名無しさん mailto:sage [2016/12/31(土) 22:56:06.40 ID:07cXWtfS.net]
>>31 Emacs Lisp

(require 'cl-lib)

(defun a (x)
(cl-assert (and (integerp x) (> x 1)))
(let ((l (let ((max-lisp-eval-depth most-positive-fixnum)
(max-specpdl-size most-positive-fixnum))
(b (cl-loop for i from 2 to x collect i)))))
(when (= (car (last l)) x) (length l))))

(defun b (l)
(when l
(cons (car l) (b (cl-remove-if (lambda (x) (= (% x (car l)) 0)) (cdr l))))))

(mapcar (lambda (x) (cons x (a x))) '(2 3 4 5 2017))
((2 . 1) (3 . 2) (4) (5 . 3) (2017 . 306))

38 名前:デフォルトの名無しさん mailto:sage [2016/12/31(土) 23:05:34.75 ID:39E0aGGL.net]
>>32で9999991(664579番目の素数)を計算させたら
14.708sかかった
>>34では0.391s
(Athron X2 1.8GHz)

39 名前:デフォルトの名無しさん mailto:sage [2017/01/01(日) 11:09:07.28 ID:IDYigKuX.net]
>>31 Squeak/Pharo Smalltalk

(Integer primesUpTo: 2017+1) indexOf: 2017 "=> 306 "

40 名前:デフォルトの名無しさん mailto:sage [2017/01/01(日) 12:49:27.41 ID:AcyWguNB.net]
>>31 ruby2.0.0
require 'prime'
def f9031(n)
Prime.prime?(n) && Prime.each_with_index.find {|p, _| p == n}
end
p f9031(4), f9031(2), f9031(2017)

false
[2, 0]
[2017, 305]



41 名前:デフォルトの名無しさん mailto:sage [2017/01/02(月) 13:41:39.67 ID:jOTKTTu2.net]
>>31
Bash
seq 2017 | factor | awk '{happy = $1;new=0}NF==2{year++;new=1} END{
print happy,new?year "th":"no","prime"}'

42 名前:片山博文MZ ◆T6xkBnTXz7B0 mailto:sage [2017/01/02(月) 15:29:42.51 ID:h8C28I9Z.net]
お題:与えられたクレジットカードの番号が正しいかどうか判定するプログラム。

43 名前:片山博文MZ ◆T6xkBnTXz7B0 mailto:sage [2017/01/02(月) 15:34:59.42 ID:h8C28I9Z.net]
お題:個人情報(氏名、年齢、住所、電話番号)のダミーデータ(偽物のデータ)を大量に作成するプログラムを作れ。

44 名前:デフォルトの名無しさん mailto:age [2017/01/02(月) 15:41:47.73 ID:h8C28I9Z.net]
上げまして

45 名前:デフォルトの名無しさん mailto:sage [2017/01/02(月) 15:47:49.69 ID:jOTKTTu2.net]
>>42
wget -r -l 0 URL で適当なサイトから住所のデータを持ってきてシャッフルしダミーデータを生成

46 名前:デフォルトの名無しさん mailto:sage [2017/01/02(月) 16:37:06.06 ID:4fVv1Ig/.net]
正しいかどうかはクレカ会社でないとわからない
Luhnアルゴリズムの計算だけでいいならわりと楽だけど

47 名前:片山博文MZ ◆T6xkBnTXz7B0 mailto:sage [2017/01/02(月) 17:26:44.05 ID:h8C28I9Z.net]
>>45
正論だね。じゃあルーンのアルゴリズムだけにしましょう。

48 名前:片山博文MZ ◆T6xkBnTXz7B0 mailto:sage [2017/01/02(月) 17:28:27.34 ID:h8C28I9Z.net]
>>44
住所と電話番号の関係についてもっとよく考えて下さい。

49 名前:デフォルトの名無しさん mailto:sage [2017/01/02(月) 17:39:17.52 ID:fYcUjGFM.net]
ダミーだから、実在する住所、通話可能な番号は許可しないんだよな?

50 名前:片山博文MZ ◆T6xkBnTXz7B0 mailto:sage [2017/01/02(月) 18:22:02.26 ID:h8C28I9Z.net]
>>48
それはちょっと難しいだろう。実在するかどうやって確認するのかい?



51 名前:片山博文MZ ◆T6xkBnTXz7B0 mailto:sage [2017/01/02(月) 18:27:21.29 ID:h8C28I9Z.net]
住所や電話番号の一部を伏せ字にすれば迷惑が掛からないとは思うが。。。
ダミーデータの用途によるんだよね。データベースのテスト用とか、●●●●用とか。

52 名前:片山博文MZ ◆T6xkBnTXz7B0 mailto:sage [2017/01/02(月) 18:48:13.86 ID:h8C28I9Z.net]
ヒント:住所テキストデータの意味の定義は郵便局が行っている。

53 名前:デフォルトの名無しさん mailto:sage [2017/01/04(水) 12:00:38.64 ID:y99Ue0/2.net]
お題:□に自然数を入れて式を成立させる。^は、べき乗。
□^□+□^□=2017

54 名前:デフォルトの名無しさん mailto:sage [2017/01/04(水) 12:44:11.80 ID:WgerS0Nf.net]
回答無限個あるけどいいの?

55 名前:デフォルトの名無しさん mailto:sage [2017/01/04(水) 13:15:36.49 ID:UpZyqzsr.net]
なにわろてんねん

56 名前:デフォルトの名無しさん mailto:sage [2017/01/04(水) 18:33:26.02 ID:dwq5ZcuT.net]
ideone.com/BinLDz
C++??なんかへんな問題だな。

57 名前:片山博文MZ ◆T6xkBnTXz7B0 mailto:sage [2017/01/04(水) 18:36:48.39 ID:83LRywdJ.net]
1^X+2016^1=2017
という形の解が無数に存在する。
これに対する制限がなければ面白くない。

58 名前:52 mailto:sage [2017/01/04(水) 19:17:06.25 ID:y99Ue0/2.net]
では□に入れるのを2以上の自然数に変更させてください

59 名前:デフォルトの名無しさん mailto:sage [2017/01/04(水) 23:01:48.48 ID:tU35eaIW.net]
>>57
C++
自然数nがa^b (a>=2,b>=2)で表せるかどうか判定する関数(isFact)の
キャストが糞だから誰かいい書き方教えてください…
ideone.com/cB1Ncw

60 名前:デフォルトの名無しさん mailto:sage [2017/01/04(水) 23:17:21.92 ID:dwq5ZcuT.net]
>>57
ideone.com/LbWS0f
C++。初期条件変更。
答えがバッサリ減った。



61 名前:デフォルトの名無しさん mailto:sage [2017/01/04(水) 23:37:14.33 ID:I0E1npQu.net]
>>57
C
ideone.com/v5btSV

62 名前:デフォルトの名無しさん mailto:sage [2017/01/04(水) 23:41:45.40 ID:I0E1npQu.net]
パフォーマンス改良
ideone.com/WDu0Ox

63 名前:デフォルトの名無しさん mailto:sage [2017/01/04(水) 23:54:08.76 ID:dwq5ZcuT.net]
>>57
ideone.com/uxu5Bl
C++。頑張って最適化。これ以上はアルゴリズム変えないと大変。

64 名前:デフォルトの名無しさん mailto:sage [2017/01/05(木) 00:33:24.56 ID:FeYPKi0Y.net]
>>57 Java
https://ideone.com/vRiP1c

65 名前:デフォルトの名無しさん mailto:sage [2017/01/05(木) 01:06:45.10 ID:FeYPKi0Y.net]
>>57 Java
ideone.com/hNhAMC

>>63の ArrayList<String>[] list = new ArrayList[n]; がすんげぇメモリの無駄に思えたので

66 名前:デフォルトの名無しさん mailto:sage [2017/01/05(木) 01:50:33.81 ID:Tpy8rHG5.net]
>>57
C++
Σ_i=1~m □^□ = nに拡張してみた
ideone.com/KKHS6o

67 名前:デフォルトの名無しさん mailto:sage [2017/01/05(木) 23:04:17.78 ID:Rf7MYzqE.net]
>>57
ideone.com/9NAHBd

ひまつぶしにやってみた。C言語。

68 名前:デフォルトの名無しさん mailto:sage [2017/01/06(金) 07:39:18.38 ID:zAIptLYs.net]
>>66
12^3 + 17^2 = 2017
17^2 + 12^3 = 2017
AB入れ替わりのこれはあるのに

3^4 + 44^2 = 2017
9^2 + 44^2 = 2017
がないのはなんでなんだぜ?

69 名前:デフォルトの名無しさん mailto:sage [2017/01/06(金) 08:14:14.51 ID:6Va7LE9a.net]
ループ2が43で十分ってことになってるからかな??

70 名前:デフォルトの名無しさん mailto:sage [2017/01/06(金) 08:20:39.24 ID:FKYJf0Ai.net]
全てのパターンを調べろっていうお題じゃないからな



71 名前:デフォルトの名無しさん mailto:sage [2017/01/06(金) 09:28:08.44 ID:0R4aMgJq.net]
>>57 Squeak/Pharo Smalltalk

| ans |
ans := OrderedCollection new.
(2 to: 2017 sqrt) asDigitsToPower: 4 do: [:digits |
 ((digits first: 2) raisedTo: (digits last: 2)) sum = 2017
  ifTrue: [ans add: ('{1}^{3}+{2}^{4}' format: digits)]
].
^ans asStringWithCr

72 名前:デフォルトの名無しさん mailto:sage [2017/01/06(金) 21:50:55.39 ID:aMqQPymQ.net]
>>66
コメントアウトで書いた議論をそのままコードにすればいいのに、そんなにマジックナンバー埋め込んでどうすんだ

73 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 13:22:26.64 ID:XDbKIsfA.net]
画面に並んでいるコントロールに左上から右下にタブ順を割り振るアルゴリズムってどう書きますか?
要するに矩形のソート方法です
綺麗に並んでるとは限りませんし重なっているものもあります
目で見た感覚的に正しくなるようにできますかね?

74 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 14:54:28.66 ID:pxQLZoyB.net]
>>72
(1) 重心の座標を求めて、
(2) Yでソート後Xでソート

とか。

まあ「感覚的に正しい」なんて要件はこの手の問題じゃ曖昧以外の何でもないし
どうやっても厳密な定義は無理だから、普通に左上座標で妥協してもいいんじゃないの

75 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 15:11:05.77 ID:RSx5of9s.net]
ひな形作った
jsbin.com/doniwanoqi/edit?html,output

76 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 17:11:20.51 ID:8OGZNgRf.net]
完全にスレチです。
JSスレでどうぞ。

77 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 17:17:34.30 ID:5tCF0ZUl.net]
>>72
要件が曖昧すぎる
どこを左上として、どこを右下とするのかで結果が変わるだろうし、あなたの感覚とズレが生じることもありえる
円形や一直線に並んでいる場合どこを左上とするのか、
画面右上、左下、右下を結んだ三角形(凾フような形)に並んでいるとき、左上と呼べるようなコントロールが存在しないけど、どうするのか

78 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 17:27:52.04 ID:MJfiP+Ss.net]
>>76
いや,逆にあいまいな要件のみ提示されていて,それに感覚的に適合する実装を示せ,というお題だろう
客は自分のしたいことを本当には知っていない

79 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 17:33:29.68 ID:pxQLZoyB.net]
>>77
こういう営業さんがいる会社は悲惨なことになるねw
冗談抜きで、IT業界の一部の労働環境が劣悪な理由はこういう安請け合いにある。

80 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 17:43:37.92 ID:MJfiP+Ss.net]
>>78
あいまいな要件に対して実装を提案することは問題ないだろう?
問題はその実装をちゃぶ台返しにされないようにすることだろう?
実装の提案ができないようだと仕事にならないのでは?



81 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 17:54:48.18 ID:pxQLZoyB.net]
>>79
甘いと思うよ。
それ、製品の完成後にこちらの提案が「やっぱり何か違う」ってちゃぶ台返しされるリスクを
考えてないでしょ。

まあスレ違いなんでこれ以上言わないけどさ。

82 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 18:05:19.61 ID:RSx5of9s.net]
これ業務じゃないんだし、自分だったらこう実装するっていうのを書いてけばええやん

83 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 18:21:10.87 ID:XDbKIsfA.net]
というかこの問題は順位付けに自明な定義がないところが肝です
AIなどでもそうですけど最近は曖昧かつ感覚に矛盾しない答えを求められる事が増えてきています

84 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 22:47:32.14 ID:Qw43e7Zm.net]
で、お題ってどれ?

85 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 23:19:01.41 ID:4zEbWvNh.net]
左上と右下を結ぶ線が垂直軸となる座標系に変換して
上から順に拾っていくだけじゃないの?

86 名前:デフォルトの名無しさん mailto:sage [2017/01/08(日) 23:27:18.98 ID:c38VN46k.net]
>>84
それだと(0, 80は(100, 0)より順番が若くなる気がするんだけどw

87 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 00:07:13.57 ID:g5s54bF4.net]
>>85
何が言いたいのか分からないのでコメントしにくいけど
何かがおかしいとしたらあなたが考えた座標の変換が間違ってるんだろう

88 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 00:12:11.15 ID:i1HzEaEu.net]
>>86
自分で自分の言ってることが分かってないのかw

A = (0, 80)、 B = (100, 0)とすると、お前さんが言ってる座標兼では
AはBの「上」になる。

このぐらいのことそれを思いついた5秒後に分かれよほんと

89 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 03:09:12.91 ID:iIb+NoJa.net]
xでソートしてからyでソートだよな?
違う?

90 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 07:01:36.39 ID:s6rymSkb.net]
>>88
(10,0)と(5,10000)で後者が先に選択されるのはいやだ


次のような長方形からなる集合Uを定義する:
∀a∈ U に対し,∃b∈ a.center ⊂ b or b.center ⊂ aが成立する



91 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 07:04:25.54 ID:s6rymSkb.net]
ミスった

次のような長方形からなる集合Uを定義する:
∀a∈ U に対し,∃b∈Uが存在し a.center ⊂ b or b.center ⊂ aが成立する
要するに連結した長方形を集めるイメージですね
タグの順位付けしたい長方形の集合を連結した長方形の集合に分割してから

92 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 07:08:49.40 ID:s6rymSkb.net]
>>90
ほんとごめんなさい
集合Uの頂点を、最も原点(0,0)と集合Uの要素の長方形との距離が最も小さくなる長方形の左上の点と定義して
集合についてソートして、集合の要素についてxでソートするのが個人的に自然な感覚かなぁ

93 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 07:18:31.23 ID:s6rymSkb.net]
xでソートしたらこのケースでダメだ
i.imgur.com/wpFEt5J.png
集合の頂点を与える長方形を始点として中心点が近い要素順に並べるのが自然か

94 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 08:02:40.56 ID:g5s54bF4.net]
>>87
> A = (0, 80)、 B = (100, 0)とすると、お前さんが言ってる座標兼では
> AはBの「上」になる。

AがBの上になるのはあなたがそう変換した(あなたが決めた)からですよ

現在の座標系と左上と右下を結ぶ線が垂直軸となる座標系との関係性には
自由度があります(1秒で気付くと思いますが)
どのような関係にするかはお題の人間の感覚的に正しく見えるような関係を
選ぶべきであって、あなたが選択した関係に従って変換された座標に対して
あなたがおかしいと思ったというだけですね

95 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 10:48:32.68 ID:LhlDvgN3.net]
>>93
何が言いたいのかさっぱりわからんな。
数学弱いなら無理しなくていいのに

96 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 10:56:12.03 ID:LhlDvgN3.net]
ああ、きっと>>93の世界では平行移動で2点間の相対的な位置関係が
変わるんだろうねw

97 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 17:11:09.51 ID:s0WlKSpH.net]
>>57
echo.2ch.net/test/read.cgi/tech/1434079972/19
やっとコンパイルが通ったよ,ママ‥

98 名前:デフォルトの名無しさん mailto:sage [2017/01/09(月) 19:58:25.90 ID:nfkV3o0K.net]
>>52 >>57 c
https://ideone.com/KhbiRx

99 名前:デフォルトの名無しさん mailto:sage [2017/01/10(火) 18:29:09.08 ID:Ilw6o9KC.net]
>>94
自己紹介かな
座標軸の張り方次第だっつーのw

100 名前:デフォルトの名無しさん mailto:sage [2017/01/10(火) 20:42:50.38 ID:ld93epow.net]
>>98
じゃあ具体的にどういう座標系ならBがAの上になるのか言ってみろ馬鹿。
重症だな



101 名前:デフォルトの名無しさん [2017/01/10(火) 21:08:13.05 ID:fM7Pfoze.net]
キチガイ降臨age

102 名前:デフォルトの名無しさん mailto:sage [2017/01/10(火) 21:19:39.42 ID:NXUZz/0q.net]
多分アマゾンギフトの人だよ

103 名前:デフォルトの名無しさん mailto:sage [2017/01/10(火) 21:52:46.22 ID:KKLCbaCP.net]
煽って教えてもらうメソッドか
低能って嫌だな

104 名前:デフォルトの名無しさん mailto:sage [2017/01/10(火) 22:22:58.60 ID:EjxLrxqR.net]
どっちかっていうと消えてくれた方がありがたい

105 名前:デフォルトの名無しさん [2017/01/10(火) 22:34:23.43 ID:U9oYccVU.net]
>>102
誰に物をいってるんだ?
身の程をわきまえろ

106 名前:デフォルトの名無しさん [2017/01/10(火) 22:36:50.29 ID:U9oYccVU.net]
>>99
煽って教えてもらうメソッドか
低能って嫌だな

107 名前:デフォルトの名無しさん mailto:sage [2017/01/11(水) 12:22:04.85 ID:gkYh8YCT.net]
教えるも糞も最初から正解は書いてある>>87

108 名前:デフォルトの名無しさん [2017/01/11(水) 14:49:58.96 ID:iTAjJX4H.net]
>>104-105
uyか?Qか?

109 名前:デフォルトの名無しさん mailto:sage [2017/01/11(水) 19:39:31.27 ID:J0kepQ6p.net]
QZ=>>96

110 名前:デフォルトの名無しさん [2017/01/11(水) 21:08:00.35 ID:0XwQtfyu.net]
QZ怒りのマンガでわかる心理学



111 名前:デフォルトの名無しさん [2017/01/11(水) 21:11:32.29 ID:NdPILmY+.net]
>>86
おい!お前のせいでキチガイが増殖してるじゃねえか
責任とって全部持って帰れ

112 名前:デフォルトの名無しさん [2017/01/11(水) 21:13:18.42 ID:NdPILmY+.net]
>>106
いや何を書いたとかじゃなくてさ、
>>99
煽って教えてもらうメソッドか
低能って嫌だな

113 名前:デフォルトの名無しさん [2017/01/11(水) 21:14:22.15 ID:NdPILmY+.net]
心理学怒りのマンガでわかるQZ

114 名前:デフォルトの名無しさん [2017/01/11(水) 21:18:25.47 ID:NdPILmY+.net]
頭の中がQZでいっぱいな心理学おじさんはQ呼称で自分だけは特別な存在アピール

115 名前:デフォルトの名無しさん mailto:sage [2017/01/11(水) 23:33:02.72 ID:IQVyJq11.net]
感覚に頼るような変なお題出すからキチガイが湧くんだよ

116 名前:デフォルトの名無しさん mailto:sage [2017/01/12(木) 00:14:22.68 ID:OC4R5S2o.net]
IDが出るようになったのになぜQはコテを消したのか?
とんだチキンだったのではないだろうか?

117 名前:デフォルトの名無しさん [2017/01/12(木) 07:39:01.18 ID:sAp1jMS4.net]
心理学怒涛の寝ても覚めてもQZ

118 名前:デフォルトの名無しさん mailto:sage [2017/01/12(木) 13:04:44.00 ID:OdpRjvqI.net]
>>16
ようQ

119 名前:デフォルトの名無しさん mailto:sage [2017/01/12(木) 13:06:09.71 ID:OdpRjvqI.net]
×>>16
>>116
似ても焼いても一つも人の役に立てないQ

120 名前:デフォルトの名無しさん [2017/01/12(木) 21:59:23.34 ID:yV1HOyPB.net]
心理学最終手段の居直りQ連呼



121 名前:デフォルトの名無しさん [2017/01/12(木) 22:00:27.56 ID:yV1HOyPB.net]
心理学おじさんとQZを同じ部屋にとじこめたらどうなるの?

122 名前:デフォルトの名無しさん mailto:sage [2017/01/12(木) 22:38:03.38 ID:KUw+Fq2e.net]
ラップでも始めるんじゃね。

123 名前:デフォルトの名無しさん mailto:sage [2017/01/13(金) 18:15:01.00 ID:hu5eqRYQ.net]
QZ=>>96

124 名前:デフォルトの名無しさん mailto:さげ [2017/01/13(金) 21:36:42.18 ID:A97spPPP.net]
お題:平面上に四つの点を二点間の距離が二種類になるように配置する

125 名前:デフォルトの名無しさん mailto:sage [2017/01/13(金) 23:31:20.40 ID:Z31HhTHu.net]
正三角形+中心
一辺を共有する二つの正三角形
正方形

他にあるかな?

126 名前:デフォルトの名無しさん mailto:sage [2017/01/14(土) 03:29:31.67 ID:OgQ0DzZw.net]
異なる辺の長さa,bに対して
1)a:5本, b:1本
正三角形(辺の長さa)×2の菱形のみ
2)a:4本, b:2本
2辺と対角線の長さがaの凧型
正方形(辺の長さa)
3)a:3本, b:3本
正三角形と重心

3)はまだまだありそう

127 名前:デフォルトの名無しさん mailto:sage [2017/01/18(水) 21:37:38.36 ID:6wTe0sJ+.net]
sage>>123
 ●

 ●

● ●
ーーー
  ●


●   ●
  ●
ーーー
 ●  ●

●    ●
ーーー
● ●

● ●
ーーー
  ●

  ●

●   ●
ーーー
  ●   ●



●   ●

128 名前:デフォルトの名無しさん mailto:sage [2017/01/18(水) 22:19:10.68 ID:vpMv+OF/.net]
>>126
座標で書いてくれw

129 名前:デフォルトの名無しさん mailto:sage [2017/01/18(水) 22:50:29.86 ID:nuz5iQOv.net]
プログラムで書いてくれ

130 名前:デフォルトの名無しさん mailto:sage [2017/01/19(木) 12:26:45.56 ID:ZgJp4HEV.net]
>>123
平面上に3点P1、P2、P3を配置して三角形を作る時、正三角形を含む二等辺三角形でなければならない
これ以外の配置のやり方をすると辺の長さが3種類となって前提に反する

上記のように配置した3点3点P1、P2、P3に4点目P4を配置するとき、
A) 二等辺三角形P1P2P3と底辺を共有し、長さが等しい辺と同じ長さの2辺をもつ2等辺三角形となるようにP4を配置する
(底辺を共有するように二等辺三角形二つを配置する)
または
B) 三角形P1P2P3が正三角形のとき、外接円の中心と一致するようにP4を配置する

の二通りの配置の仕方がある。逆に言えば、この条件に従うように座標を決定すれば無限の配置の仕方が可能



131 名前:デフォルトの名無しさん mailto:sage [2017/01/19(木) 13:43:42.27 ID:ff1dOA50.net]
>>123 Javascript
codepen.io/anon/pen/mRRxXx?editors=1011

観測的手法で 分解能に依存するけど網羅できるはず

132 名前:デフォルトの名無しさん mailto:sage [2017/01/19(木) 14:02:27.30 ID:ff1dOA50.net]
って、>>123よく読んだら>>130じゃダメだ! orz
失敬 撤回しますわ

133 名前:デフォルトの名無しさん mailto:sage [2017/02/21(火) 19:03:19.21 ID:vHI0u4yb.net]
お題:ある数 n が与えられたとして、n の原始根の位数を求めよ
条件:原始根については https://ja.wikisource.org/wiki/%E5%88%9D%E7%AD%89%E6%95%B4%E6%95%B0%E8%AB%96%E8%AC%9B%E7%BE%A9/%E7%AC%AC1%E7%AB%A0/%E5%8E%9F%E5%A7%8B%E6%A0%B9%EF%BC%8C%E6%8C%87%E6%95%B0
を参照せよ、ただし、このテキストでは n が素数であることを前提にしているが、原始根は n が素数でなくても存在する。n が素数でない場合にも対応せよ。
原始根を、小さい数から順次位数を力技で求める方法は認めない。
n の原始根が存在しない場合にアルゴリズムが停止する必要は要請しない。

134 名前:デフォルトの名無しさん mailto:sage [2017/03/02(木) 16:39:35.38 ID:TV66ybVQ.net]
なんでお前偉そうなの
宿題は自分でやりな

135 名前:デフォルトの名無しさん mailto:sage [2017/03/03(金) 09:55:45.90 ID:SUJ1/PZz.net]
C言語スレよりロンダリング

x面体のサイコロy個を振って得られる出目のヒストグラムを出力するプログラムを作ろう
dice.exe 6 3 (6面体のサイコロ3個) の出力例
出目 出現回数 出現率
---- -------- ------
  3    1  0.46
  4    3  1.39 <

136 名前:br>   5    6  2.78
  6    10  4.63
  7    15  6.94
  8    21  9.72
  9    25 11.57
 10    27 12.50
 11    27 12.50
 12    25 11.57
 13    21  9.72
 14    15  6.94
 15    10  4.63
 16    6  2.78
 17    3  1.39
 18    1  0.46
[]
[ここ壊れてます]

137 名前:デフォルトの名無しさん mailto:sage [2017/03/03(金) 18:25:27.76 ID:P2edee8O.net]
厳密解を出す場合なら動的計画法で素朴にやるとO(x^2y^2)

138 名前:デフォルトの名無しさん mailto:sage [2017/03/03(金) 20:41:14.23 ID:yCeb1kZ1.net]
>>134 Java
https://ideone.com/mVatvl

139 名前:デフォルトの名無しさん mailto:sage [2017/03/03(金) 21:29:12.11 ID:SEBfdj3K.net]
この問題のポイントはサイコロを正N面体に限定してないところだな
それと3面体なんていう指定をされたらどうするとかな

140 名前:デフォルトの名無しさん mailto:sage [2017/03/04(土) 01:08:57.14 ID:eNSOp3uJ.net]
>>136
やるなあ
パスカルの三角形のもう一段階上みたいな感じか



141 名前:デフォルトの名無しさん mailto:sage [2017/03/04(土) 04:55:45.63 ID:VvbFezkO.net]
>>134 C
https://ideone.com/FmyEy7

142 名前:デフォルトの名無しさん [2017/03/05(日) 03:05:26.21 ID:FnE3e1tn.net]
お題: ハート・ダイヤ・クラブ・スペードを各13枚ずつもつ52枚のカードから13枚のカードが配られます.

Q1. 配られたカードの種類がもっとも均質でない(13・0・0・0)確率P1と, もっとも均質である(4・3・3・3)確率P2を求めてください.
Q2. 確率P1よりも低い確率の組み合わせが存在する場合, その組み合わせと確率を求めてください.
Q3. 確率P2よりも高い確率の組み合わせが存在する場合, その組み合わせと確率を求めてください.

143 名前:デフォルトの名無しさん mailto:sage [2017/03/05(日) 07:48:05.16 ID:KWf32tSz.net]
宿題は自分でやろう

144 名前:デフォルトの名無しさん mailto:sage [2017/03/05(日) 09:20:54.74 ID:FnE3e1tn.net]
>>134 Emacs Lisp

(require 'cl-lib)

(defun dice (x y)
(let ((b '(0)))
(dotimes (i y)
(setq b (reduce (lambda (a b) (append a b)) (loop for n in (loop for i from 1 to x collect i) collect (loop for m in b collect (+ n m))))))
(pp (loop for n in (remove-duplicates b) collect (list n (count n b) (/ (float (count n b)) (length b)))))))

(dice 6 3)
((3 1 0.004629629629629629)
(4 3 0.013888888888888888)
(5 6 0.027777777777777776)
(6 10 0.046296296296296294)
(7 15 0.06944444444444445)
(8 21 0.09722222222222222)
(9 25 0.11574074074074074)
(10 27 0.125)
(11 27 0.125)
(12 25 0.11574074074074074)
(13 21 0.09722222222222222)
(14 15 0.06944444444444445)
(15 10 0.046296296296296294)
(16 6 0.027777777777777776)
(17 3 0.013888888888888888)
(18 1 0.004629629629629629))

145 名前:デフォルトの名無しさん mailto:sage [2017/03/05(日) 11:59:20.94 ID:h/zPOUa4.net]
>>134 Squeak/Pharo Smalltalk

| dice |
dice := [:x :y |
 | bag |
 bag := Bag new.
 (1 to: x) asDigitsToPower: y do: [:ary | bag add: ary sum].
 bag sortedElements collect: [:kv | {kv key. kv value. kv value / bag size * 100s2}]
].

dice value: 6 value: 3

"=> {
 {3 . 1 . 0.46s2}.
 {4 . 3 . 1.38s2}.
 {5 . 6 . 2.77s2}.
 {6 . 10 . 4.62s2}.
 {7 . 15 . 6.94s2}.
 {8 . 21 . 9.72s2}.
 {9 . 25 . 11.57s2}.
 {10 27 12.50s2}.
 {11 27 12.50s2}.
 {12 . 25 . 11.57s2}.
 {13 . 21 . 9.72s2}.
 {14 . 15 . 6.94s2}.
 {15 . 10 . 4.62s2}.
 {16 . 6 . 2.77s2}.
 {17 . 3 . 1.38s2}.
 {18 . 1 . 0.46s2}
} "

146 名前:デフォルトの名無しさん mailto:sage [2017/03/05(日) 15:38:00.05 ID:Z6iNRFEa.net]
プログラミングする意味のないお題ばっか

147 名前:デフォルトの名無しさん mailto:sage [2017/03/05(日) 17:57:56.52 ID:I6Dgph4B.net]
>>144
プログラミングする意味のあるお題作ってくれよ

148 名前:デフォルトの名無しさん mailto:sage [2017/03/05(日) 18:17:30.28 ID:WuF+gNTE.net]
>>134 ocaml
https://ideone.com/SWZRyZ

149 名前:デフォルトの名無しさん mailto:sage [2017/03/05(日) 20:12:40.81 ID:Oe+PHv4r.net]
いや>>134は10面体10個を10秒以内で計算するとかの条件付けるとプログラミングの意味あるぞ

>>136はよく出来てるとオモタ

150 名前:デフォルトの名無しさん mailto:sage [2017/03/07(火) 18:28:24.63 ID:sN5zB8qN.net]
>>144
そんなこといわずに >>132 を解いてくれよぅ
原始根の存在定理を素数以外に拡張していいのかどうか、いまいち確信がもてないんだ…



151 名前:140 mailto:sage [2017/03/12(日) 13:40:16.63 ID:VxOAsp1C.net]
乱数を使用して10億回試行してみたところ,4・3・3・3の出現回数は105357474 (10.5%), 13・0・0・0は0(12・1・0・0は3)でした.
4・3・3・3よりも出現回数の多い組み合わせは以下の4通りでした.

4・4・3・2 215505541回 (21.6%)
5・3・3・2 155167267回 (15.5%)
5・4・3・1 129327030回 (12.9%)
5・4・2・2 105786216回 (10.6%)

このお題はHAKMEM MIT AI Memo 239 ITEM 46 (Schroeppel)を参考にしました.
www.inwap.com/pdp10/hbaker/hakmem/number.html#item46

152 名前:デフォルトの名無しさん mailto:sage [2017/03/24(金) 16:34:29.50 ID:krVzShuL.net]
A+B+C+D+E+F+G+H+I+J+K=170
A-B=−2
A>B>C>D>E>F>G>H>I>J>K
A>0のとき
この式を満たすA〜Kを全て求めよ

153 名前:デフォルトの名無しさん mailto:sage [2017/03/24(金) 16:44:02.34 ID:IzMGTasH.net]
A-B=−2
A>B
この二つを同時に満たせません

154 名前:デフォルトの名無しさん mailto:sage [2017/03/24(金) 1 ]
[ここ壊れてます]

155 名前:9:36:54.08 ID:krVzShuL.net mailto: 済みません間違えてました
A-B=2でした
[]
[ここ壊れてます]

156 名前:デフォルトの名無しさん mailto:sage [2017/03/24(金) 19:49:23.03 ID:3IaHiZWx.net]
そっちを直すのか

157 名前:デフォルトの名無しさん mailto:sage [2017/03/24(金) 19:50:50.29 ID:IzMGTasH.net]
修正がA>B>C...→A<B<C...じゃなくてA-B=-2→A-B=2だと無数に求められるから全て求めるのは無理じゃないかな?

158 名前:デフォルトの名無しさん mailto:sage [2017/03/24(金) 19:57:24.58 ID:IzMGTasH.net]
例えばこんなん
int A=68,B=66,C=8,D=7,E=6,F=5,G=4,H=3,I=2,J=1,K=0;
while(true) {
A++; B++; K-=2;
}

159 名前:デフォルトの名無しさん mailto:sage [2017/03/24(金) 22:00:38.98 ID:DBVfNEjn.net]
こういうお題を書きたいのなら制約条件を良く考えないと

A+B+C+D+E+F+G+H+I+J+K=170
A>B>C>D>E>F>G>H>I>J>K
A〜Kは全て自然数とする

こういうのとかな

160 名前:デフォルトの名無しさん mailto:sage [2017/03/25(土) 07:43:46.30 ID:LJUF46o1.net]
>>150
ideone.com/ZXck7T
C++。ちょっと自信ないけど、一応できた。
頑張って最適化した。



161 名前:デフォルトの名無しさん mailto:sage [2017/03/25(土) 07:59:35.07 ID:LJUF46o1.net]
あれ?条件おかしいな。俺ってせっかちさん!

162 名前:デフォルトの名無しさん mailto:sage [2017/03/25(土) 08:00:35.83 ID:LJUF46o1.net]
と思ったら専ブラの安価化けてた。

163 名前:デフォルトの名無しさん [2017/03/25(土) 13:31:35.87 ID:wrPCcs4m.net]
https://www.hackerrank.com/sinapusu2002-1
ハッカーランクという競技プログラミングサイトで出題中の問題。
オリジナル問題6問。
ハッカーランクに登録して解いてくれ。
スレ違いだろうか?
2つの三角形の共有面積はかなりマゾいのでお勧め。
一応競技プログラミング界の重鎮で東大で数学してる人にも解いてもらったりはしたけど。
挑戦者数が増えないのが悩みの種。
ただいま次回コンテストに向けて3/6問作成済み、3問作成予定。

164 名前:デフォルトの名無しさん mailto:sage [2017/03/25(土) 13:58:45.28 ID:LJUF46o1.net]
レジストするのめんどいのと頭悪いので無理〜〜。

165 名前:デフォルトの名無しさん mailto:sage [2017/03/25(土) 14:01:32.89 ID:P+Eymz64.net]
挑戦者数が増えないのは問題が悪いからだろ。
良問をだしてれば自然と挑戦者は増えるはず。
宣伝してズルした時点でお前の人間性の低さがわかるんだよ

166 名前:デフォルトの名無しさん mailto:sage [2017/03/25(土) 14:02:58.32 ID:LJUF46o1.net]
んんん?どうした?

167 名前:デフォルトの名無しさん mailto:sage [2017/03/25(土) 14:13:46.85 ID:LJUF46o1.net]
頭悪いって俺のこと行ってるんだが。すまんな!

168 名前:デフォルトの名無しさん mailto:sage [2017/03/25(土) 15:30:57.12 ID:P+Eymz64.net]
>>160
東大生に解いてもらっても屑な問題はクズだ。
そんなもので東大のブランド志向に思ってる奴を釣ろうとしている
お前も同じ穴の貉だよ。
俺はそいういうやつは軽蔑するな。

169 名前:デフォルトの名無しさん mailto:sage [2017/03/25(土) 18:47:23.24 ID:OqJqFalA.net]
まあ完全にスレチだから無視すれば?

170 名前:デフォルトの名無しさん mailto:sage [2017/03/28(火) 09:57:58.96 ID:084k/T9f.net]
お題:格子点を1個だけ含む面積4の凸多角形を求める



171 名前:デフォルトの名無しさん mailto:sage [2017/03/28(火) 13:00:05.06 ID:qGSQyMpt.net]
>>167
斜めってる正方形とか、無限にできるんでないの?

172 名前:デフォルトの名無しさん mailto:sage [2017/03/29(水) 00:52:34.65 ID:IYsCUDjz.net]
>>167
xが0.9未満なら
(0,0)(x,0)(0.1,4/x)(0.1+x,4/x)
の平行四辺形でいいよね

173 名前:デフォルトの名無しさん mailto:sage [2017/04/01(土) 19:39:48.39 ID:bpxrLk3k.net]
>>167
(0,0)-(0.8,0)-(9.8,10)

174 名前: ◆QZaw55cn4c mailto:sage [2017/04/08(土) 18:54:06.32 ID:O01wSTFq.net]
[1] 授業単元:線形代数

[2] 問題文
与えられたn字正方行列の逆行列を求めよ。
求めた行列は、与えられた行列を掛けて n 次単位行列となることを確認せよ。
以下のCプログラムを元に実装されていない部分を補完せよ。C 以外の言語で記述する場合は、この C プラグラムの対応する部分も記述すること。
https://ideone.com/k996I1
逆行列が存在しない場合は適切に処理してよい。

[3] 環境
 [3.1] OS: 問わない
 [3.2] コンパイラ名とバージョン: 問わない
 [3.3] 言語: C または任意の言語

[4] 期限: ([2017年4月15日23:59まで]
[5] その他の制限:お題です。

175 名前:デフォルトの名無しさん mailto:sage [2017/04/08(土) 21:30:20.69 ID:n0eUgEex.net]
QZのひとか。ここは宿題スレじゃないよ。

176 名前:デフォルトの名無しさん mailto:sage [2017/04/08(土) 21:43:02.82 ID:gcfXcmks.net]
お題ですぅ‥

177 名前:デフォルトの名無しさん mailto:sage [2017/04/09(日) 20:50:45.75 ID:uOnZBcD2.net]
お題:
辺の長さが100より小さい既約のピタゴラス三角形をすべて求めう。
出力の順序は問わない。

178 名前:デフォルトの名無しさん mailto:sage [2017/04/09(日) 23:51:51.14 ID:eG+aks/D.net]
>>171
これ、宿題の解答にならないようなプログラムにするのは結構難問かも。

179 名前:デフォルトの名無しさん mailto:sage [2017/04/10(月) 23:26:39.47 ID:9Aj0xnIY.net]
>>174 Java
https://ideone.com/g3K6Z8

180 名前:デフォルトの名無しさん mailto:sage [2017/04/11(火) 01:24:52.99 ID:gtlUVgn4.net]
>>174
Ruby
N=100
(1..N).step(2){|a|(a+2..N/a).step(2){|b|c=b*b-a*a>>1;a.gcd(b)<2&&c<N&&p([a*b,c,c+a*a])}}



181 名前:デフォルトの名無しさん mailto:sage [2017/04/11(火) 21:44:43.48 ID:MO2JwS29.net]
お題:フランス語で1から100まで数える

182 名前:デフォルトの名無しさん mailto:sage [2017/04/11(火) 21:50:23.26 ID:LjaFq8Gx.net]
1(フランス語 ・・・ 100(フランス語

183 名前:デフォルトの名無しさん mailto:sage [2017/04/11(火) 22:35:16.36 ID:gMY8o6LW.net]
お題:
トランプの札のリストが文字列で与えられるので
同じマークor同じ数字のペアが最大何組できるか求めよ

D:ダイヤ、H:ハート、S:スペード、C:クラブ、
A:エース、2〜9:数字の2〜9、T:10、J:ジャック、Q:クイーン、K:キング

例:
"DAD2HAH3" -> 2
"DAD3D8D9DJH5H8HKSASKCAC5C8CK" -> 7
"SAS2S3S4S5S6S7S8S9C2C3C4C5C6C7C8C9CT" -> 9

184 名前:デフォルトの名無しさん mailto:sage [2017/04/13(木) 22:19:39.85 ID:S/dW7TnL.net]
>>180
知らんけどNP完全とかそういうやつ?
違ったらスマソ

185 名前:デフォルトの名無しさん mailto:sage [2017/04/14(金) 01:20:45.82 ID:xslPbFLu.net]
>>180
ideone.com/UgHgtz
C++。多分間違ってる。数字も合わないしな。
i7-6700でリリースビルドで40秒くらいかかる。

見てる感じ塩基配列だよなこれ。

186 名前:デフォルトの名無しさん mailto:sage [2017/04/14(金) 02:38:04.01 ID:/pg6QsRy.net]
>>180
c++ ideone.com/WK9LQi

問題文には明記なかったが、ユニークな52枚(4*13)1セットだけだとして解いた。

計算量は 1問 14^4*6 くらいになるのだろう。
(最初は14^5*6でやったが、ひとつ計算量落とした。
この数値じゃ、意味なかったけど)

187 名前:デフォルトの名無しさん mailto:sage [2017/04/14(金) 06:35:41.46 ID:qDe/EUun.net]
動的計画法はよくわからん。
書けもしない。Orz

188 名前: ◆QZaw55cn4c mailto:sage [2017/04/14(金) 18:11:30.73 ID:UkhykSdt.net]
>>171 人気がないね…ループの知識だけあればOKでループの構成を考える腕力が多少あればそれなりに楽しめるお題と思ったんだけれども
新規性がないのが弱点なのかな?
次のお題を考えることにしようか

189 名前:デフォルトの名無しさん mailto:sage [2017/04/14(金) 22:18:00.95 ID:qDe/EUun.net]
ideone.com/Et54St
意味ないけど最適化したら現実的な時間で終わるようになった。
今暇なので、いい暇つぶしになったなぁ。意味ないけど。

190 名前:デフォルトの名無しさん [2017/04/15(土) 10:54:03.85 ID:tThpfxds.net]
>>186
>DAD2HAH3:4,2
>DAD3D8D9DJH5H8HKSASKCAC5C8CK:394,38
>SAS2S3S4S5S6S7S8S9C2C3C4C5C6C7C8C9CT:1972800,16

どういうこと???
組み合わせの数がカードの枚数すら超えてるの???



191 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 11:05:02.69 ID:eiwfOO/l.net]
そいつのコード見てないから分からんが多分、最初の例なら
1)DAHA
2)DAD2
3)HAH3
4)DAD2,HAH3
みたいにカウントされちゃってるんじゃないか?

192 名前:デフォルトの名無しさん [2017/04/15(土) 17:04:06.01 ID:gqnlgfq4.net]
>>180
最後のは9じゃなくて8組だろ

同じマーク S:4組、C:4組、合計8組
同じ数字 2,3,4,5,6,7,8,9の各ペアで合計8組
最大組数は8組

193 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 17:17:26.54 ID:gqnlgfq4.net]
>>180 C
ideone.com/vD1JHy

194 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 17:40:29.91 ID:gqnlgfq4.net]
俺も間違ってたので修正した
ideone.com/vD1JHy

答えは2組,6組,8組じゃないの?

195 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 19:29:06.55 ID:BbAH7YT3.net]
>>189
反例

数字で(S2=C2)で1ペア、
残り8枚ずつで同スートのペアを8つくる
合計 9ペア

数字で(S2=C2, S3=C3, S4=C4) 3ペア
残りは6枚ずつになるので、6ペアできる
合計9ペア

その他 数字のペアを奇数個つくれれば、9を作れる

196 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 20:24:00.89 ID:gqnlgfq4.net]
>>192
意味がわかった

197 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 21:12:03.91 ID:v99qvGb2.net]
8bitの整数を一つ引数として与え、
上位4bitと下位4bit を符号なし整数として掛け算した結果の8bitを返す関数を
論理演算子のみで実装したもののうち、
もっとも実行時間が短いものを挙げよ。
論理演算は全て1命令1サイクルとする。

198 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 21:23:09.15 ID:v99qvGb2.net]
表引きで1クロックとかは無しね。

199 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 22:10:36.10 ID:fG6QrlNX.net]
最も実行時間が短いかどうかの判定ってNP完全っぽそう

200 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 23:11:44.46 ID:v99qvGb2.net]
8bitなら力技で解けないかな?



201 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 03:52:44.93 ID:T2fHNlZE.net]
ideone.com/QNbwWa
C++。えーん終わらないよ〜。
デバッグ覗いたら早い段階で答え出てるんだけど打ち切り方がわからない。

>>186などは題意を把握してなかった。

202 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 05:47:25.03 ID:T2fHNlZE.net]
ふえぇーん。1時間半回してもおわらないよー。
動的計画法すごい。

203 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 08:35:26.85 ID:0couv4LD.net]
>>180 Java
ideone.com/ABj7QB

204 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 14:11:29.20 ID:oOWZ5kyJ.net]
お題
これ
www.mext.go.jp/programin/
に相当するアプリケーションを
非Web環境でも使えるような仕様で
単一の言語でコーディングしろ

205 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 14:13:03.29 ID:aobdGNjh.net]
>>180 C
ideone.com/CH5bY4

206 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 16:14:29.58 ID:z1TgtbB7.net]
>>201 Squeak Smalltalk で
https://scratch.mit.edu/scratch_1.4/

207 名前:デフォルトの名無しさん mailto:sage [2017/04/20(木) 11:21:43.08 ID:QJAwY2Mb.net]
>>201 Pharo Smalltalk のもあった
www.phratch.com/

208 名前:デフォルトの名無しさん mailto:sage [2017/04/22(土) 15:45:58.46 ID:Btp73K0S.net]
こういうのに瞬時に回答できるようになるまでどのくらいの時間がかかるものなの?

209 名前:デフォルトの名無しさん mailto:sage [2017/04/22(土) 21:31:15.12 ID:DL7Mzdas.net]
お題: くまモンをかく

210 名前:デフォルトの名無しさん mailto:sage [2017/04/23(日) 10:45:10.81 ID:33igmMUW.net]
くまモン



211 名前:デフォルトの名無しさん mailto:sage [2017/04/23(日) 20:01:13.92 ID:fsvPYIZO.net]
>>205
一瞬

212 名前:デフォルトの名無しさん mailto:sage [2017/04/23(日) 20:24:02.53 ID:nc0/ghBL.net]
とんちかよw

213 名前:デフォルトの名無しさん mailto:sage [2017/04/23(日) 20:37:32.86 ID:7bZTt8wr.net]
ああ、やっと意味が分かったw

214 名前:デフォルトの名無しさん mailto:sage [2017/04/24(月) 05:27:50.71 ID:+7Sa1g5s.net]
>>206
light.dotup.org/uploda/light.dotup.org437888.png
ideone.com/eJ2xul
C++。あー大変だった。
以前ラウム螺旋作った時の流用したけど、タートルグラフィックはGUI無いとキツイなぁ。
似てないとか苦情は受け付けません。あしからず。

215 名前:sage [2017/04/24(月) 05:36:47.92 ID:4BlFLqQl.net]
>>206 glsl
glslsandbox.com/e#40107.0

似てないなぁ……

>>211 GJ! 先越されたー

216 名前:デフォルトの名無しさん mailto:sage [2017/04/24(月) 05:43:14.19 ID:+7Sa1g5s.net]
>>212
時代は3Dか・・・。
ロートルにはできん芸当だ。GJ。

217 名前:デフォルトの名無しさん mailto:sage [2017/04/24(月) 11:57:42.03 ID:SbFm/aQk.net]
>>212
へーこんなところあるんだ知らんかった

218 名前:デフォルトの名無しさん [2017/04/24(月) 21:55:43.67 ID:WHcUZH3G.net]
すみません。何言ってるかわからないだろうけど、
12桁の数字が並ぶ羅列は何を表しているのでしょうか???
/021/000/000/000
とか

219 名前:デフォルトの名無しさん mailto:sage [2017/04/24(月) 22:16:03.57 ID:9NN+cmWY.net]
最初の3つが市外局番 次が区番号 残りが個人識別子だよ

220 名前:デフォルトの名無しさん mailto:sage [2017/04/25(火) 05:30:26.30 ID:8YHxJHtd.net]
12桁くらいの数字を使う規格ってそれなりにありそうだけどな。



221 名前:デフォルトの名無しさん mailto:sage [2017/04/25(火) 23:23:31.83 ID:bgy6YsrD.net]
お題:自然数nのヤング図形をもとめる

222 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 07:01:54.95 ID:ezAhxtxU.net]
>>218
ギブアップ。うぃきぺ見ても意味わかんない。頭爆発しそう。

223 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 07:24:25.57 ID:5DpYjYxD.net]
数字の入ったヤング盤じゃなくて、図形だけでいいの?
nのヤング図形を全部求めるってこと?

224 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 12:59:54.54 ID:BGeLfl3x.net]
>>218 Nim
https://wandbox.org/permlink/cNfdZ0908tcbQhod

225 名前:221 mailto:sage [2017/04/26(水) 16:03:33.34 ID:BGeLfl3x.net]
>>221は1行目が「× Yaund」「○ Young」という恥ずかしい間違いから始まり
N <= 0の時のチェック漏れやら
長方形のパターン(N=10の時の[5,5]や[2,2,2,2,2])が抜けてるなど
ミスしまくってました orz てことで、修正します

>>218 Nim
https://wandbox.org/permlink/RUf5B0SVg0MozD25

226 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 16:07:13.33 ID:ezAhxtxU.net]
なーんだそれでいいのか。
それならなんとか組めるかも。

227 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 19:19:14.42 ID:ezAhxtxU.net]
>>218
ideone.com/6PRt5z
C++。こういうこと?やっぱりよくわからん。

228 名前:デフォルトの名無しさん mailto:sage [2017/04/27(木) 10:01:02.40 ID:LnKeLTZP.net]
問題の想定解と合ってるのかな?
出題者のコメントが欲しいところ

229 名前:デフォルトの名無しさん mailto:sage [2017/05/05(金) 08:45:57.67 ID:f8yfM1E5.net]
素人の言語処理100本ノック:まとめ
qiita.com/segavvy/items/fb50ba8097d59475f760

230 名前:デフォルトの名無しさん [2017/05/24(水) 21:48:00.75 ID:7oyfe1wq.net]
お題:以下を出力
857142
714285
571428
428571
285714
142857



231 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 22:07:09.20 ID:L9mU+g8W.net]
>>227
とりあえずPythonでやってみた
https://ideone.com/UCpMVm

232 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 22:19:15.30 ID:lEJcnLZT.net]
>>227
法則性がわからん
文字列じゃなくあくまで数値で?

233 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 23:21:53.31 ID:FC0+qCJl.net]
>>229
一番下の数字に1∼6を掛ければ

234 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 23:33:01.85 ID:0ssPtL9D.net]
>>227
C
ideone.com/eRLqLi

235 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 23:48:35.88 ID:99+UTRWu.net]
各々n/7の循環部だね

236 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 23:51:10.59 ID:99+UTRWu.net]
>>227
Ruby
6.downto(1){|i|p i*1000000/7}

237 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 01:00:30.19 ID:vvyNjvHe.net]
>>227 Perl

use 5.016;
use integer;
say 857142 / $_ for 1..6;

238 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 01:16:57.10 ID:vvyNjvHe.net]
>>234 間違えてたスマソ
Perl

use 5.016;
say 142857 * (7 - $_) for 1..6;

$ perl 9_227.pl
857142
714285
571428
428571
285714
142857

239 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 13:01:14.56 ID:+8TeyhTL.net]
>>227 Squeak/Pharo Smalltalk

(142857 * (6 to: 1 by: -1)) asStringWithCr

=> '857142
714285
571428
428571
285714
142857'

240 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 13:21:29.71 ID:+8TeyhTL.net]
>>227 GNU Smalltalk

6 to: 1 by: -1 do: [:i | (142857 * i) displayNl]

ideone.com/yNgDeB



241 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 18:49:32.83 ID:F0MQej0l.net]
>>227 common lisp
(do ((i 6 (- i 1))) ((equal i 0)) (print (floor (/ (* 1000000 i) 7))))

242 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 19:28:46.12 ID:MmhezNib.net]
お題が情報不足過ぎて何を使っていいのか悪いのかがわかんない

243 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 21:35:24.87 ID:Z+pf95Ly.net]
>>227
@Mathematica

In[1]:=142857//
  IntegerDigits//
  NestList[RotateLeft,#,Length[#]-1]&//
  Map[FromDigits,#]&//
  Sort//
  Reverse//
  Map[{#}&,#]&//
  Grid

Out[1] = 857142
     714285
     571428
     428571
     285714
     142857

244 名前:デフォルトの名無しさん [2017/05/25(木) 21:56:10.72 ID:ShXkIc2G.net]
>>227 Io
a := 999999 / 7
for(i, 6 * a, a, -a, i println)

245 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 22:10:21.35 ID:73MQsPzv.net]
>>227 Nim
for i in countdown(6,1): stdout.writeline i*142857

246 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 23:50:37.58 ID:SwCyV6dp.net]
>>227 ruby
puts (1..6).map {|i| i * 142857}.reverse

>>227 rust
fn main() {
//println!("{}", (1..7).rev().map(|i| (142857 * i).to_string()).collect::<Vec<_>>().join("\n"));
for i in (1..7).rev() {println!("{}", 142857 * i)}
}

247 名前:デフォルトの名無しさん [2017/05/27(土) 20:11:30.48 ID:x9+XjHY5.net]
227 R
write((6:1)*999999/7.",1)

248 名前:デフォルトの名無しさん mailto:sage [2017/05/28(日) 14:54:52.19 ID:/dM5Kslk.net]
>>227 SWI-Prolog
main(N, X) :- X1 is X * N, write(X1), nl, N > 1, N1 is N - 1, main(N1, X).
:- main(6, 142857).

249 名前:プログラミングのお題 [2017/06/01(木) 12:06:57.65 ID:o30QeXgp.net]
トランプ氏の謎の単語

covfefe

の謎を解明する。

250 名前:デフォルトの名無しさん [2017/06/01(木) 13:12:24.25 ID:/fo1vNun.net]

c,o,v,f,e,f,eの7文字をランダムに出力し続け、covfefeが完成するまでの文字数をカウント



251 名前:デフォルトの名無しさん mailto:sage [2017/06/01(木) 13:47:08.78 ID:sszEh+oH.net]
>>247 Squeak/Pharo Smalltalk

| count covfefe buffer |
count := 0.
covfefe := 'covfefe' asOrderedCollection.
buffer := covfefe copy atAllPut: $*.
[ count := count + 1.
 Transcript nextPut: (buffer removeFirst; add: covfefe atRandom).
 (count isDivisibleBy: 1000) ifTrue: [Transcript endEntry].
 buffer = covfefe
] whileFalse.
Transcript endEntry.
^count "= 3430

252 名前:1 " []
[ここ壊れてます]

253 名前:デフォルトの名無しさん mailto:sage [2017/06/01(木) 23:30:50.24 ID:MQJNOblg.net]
>>247 効率悪いけれど…
Perl

$w='covfefe';
@l=split '',$w;
do {
$_ .= $l[int(rand(7))];
} while (!/$w/);
print index $_, $w . "\n";

254 名前:デフォルトの名無しさん mailto:sage [2017/06/01(木) 23:44:01.17 ID:MQJNOblg.net]
>>249
ゴメン、これだと最初に見つかったときに0になっちゃうんで
「完成するまでの文字数」を出すためには
× print index $_, $w . "\n";

○ print index($_, $w) + 7 . "\n";
に修正させてください。

255 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 02:47:24.66 ID:znhUDH9D.net]
>>247 Nim

import random
const word = "covfefe"
var count, match = 0
randomize()
while match != word.len():
    let ch = word[random word.len()]
    stdout.write ch
    match = if ch == word[match]: match + 1 else: 0
    inc count
echo "\n", count

256 名前:デフォルトの名無しさん [2017/06/02(金) 07:41:45.64 ID:r1TSATN8.net]
それだとccovfefeのときとか抜け落ちるんじゃね?

257 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 14:13:15.27 ID:znhUDH9D.net]
>>252
その通りですね
お題のcovfefeなら安直な修正でいいかな

-    match = if ch == word[match]: match + 1 else: 0
+    match = if ch == word[match]: match + 1 elif ch == word[0]: 1 else: 0

258 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 20:36:39.00 ID:GZbUsfWf.net]
>>247 ruby
covf, buff = 'covfefe', ''
buff += covf.chars.sample until buff.end_with? covf
p buff.size

259 名前:片山博文MZ mailto:sage [2017/06/02(金) 21:34:10.62 ID:ECCI41T/.net]
お題: 2つの別々の牧場ウィンドウがあり、その中に複数の牛がうごめいている。複数の牛を選択して、別の牧場ウィンドウにドラッグ&ドロップできるようにしなさい。

260 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 21:43:02.00 ID:ZGhpg2JU.net]
GUIの課題ってコードも長くなりがちたから答えにくくない?



261 名前:片山博文MZ mailto:sage [2017/06/02(金) 21:46:38.91 ID:ECCI41T/.net]
賞金は早い者勝ちで三千円。スクリプト野郎どもにはできないだろう。へっ。

262 名前:片山博文MZ mailto:sage [2017/06/02(金) 22:03:27.70 ID:ECCI41T/.net]
>>256
githubがあるじゃないか。

263 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 22:03:48.67 ID:doJoDkLD.net]
賞金とか誰かと思ったら片山博文MZか。

264 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 23:44:04.74 ID:cFhdiKGB.net]
三千円じゃ安い

265 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 01:24:32.19 ID:4TZnG99D.net]
>>255
動的言語のscriptでもQt,Wxwidget,Tkinterなど色々のGUI fwが使えるから書けるよ。
でも、エッセンスがなく、会コードが無駄に長くなるお題は、作成に時間がかかるし獣よな技術はないし
趣旨を考えで出題しろよ。
すくなくとも自分で作る気になれる題を出せ

266 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 01:26:10.05 ID:4TZnG99D.net]
>>261
会コードが無駄に長くなるお題は、作成に時間がかかるし獣よな技術はないし

解コードが無駄に長くなるお題は、作成に時間がかかるし技術はないし

267 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 01:50:43.99 ID:4TZnG99D.net]
でも、まぁ地獄の沙汰も金次第というじゃありませんか。
お見積もり30万円以上でしたらpython+tkinterで書いてお納めすtることも
検討させていただきますよ。ハイ
更にハイグレードに300万円だったらPerl+Ptkもお付けいたいます。
いかがですか?だんな
もみ手

268 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 19:38:09.78 ID:bt+/AaG5.net]
【問題】
アルバートとバーナードは、シェリルと友達になったばかりです。
シェリルの誕生日を2人は聞きましたが、彼女は10個の日にちを候補としてあげました。

・5月15日、5月16日、5月19日
・6月17日、6月18日
・7月14日、7月16日
・8月14日、8月15日、8月17日

それからシェリルは、アルバートに「月」だけを、バーナードに「日付」だけをそれぞれ教えました。
アルバート「僕はシェリルの誕生日を知らないけど、バーナードも知らないよ」
バーナード「僕はシェリルの誕生日を知らなかったけど、今は知ってるよ」
アルバート「それなら僕もいつだか知っているよ」
シェリルの誕生日はいつでしょうか?

プログラムを書いてプログラムに解かせること。

269 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 20:24:51.42 ID:LavjhbKR.net]
Console.WriteLine("知らんがな");

270 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 20:43:26.68 ID:GyX0IIiI.net]
(begin (display "知らんがな")(newline))



271 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 21:39:03.81 ID:3br47TQ3.net]
print("知らんがな")

272 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 21:39:54.96 ID:+ZiDT+Cr.net]
世界で初めて原爆実験が行われた日を
わざわざ答えに選んだのは何か意図があってのこと?

273 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 02:59:00.78 ID:vYNPJugT.net]
2年前のログ見てみたけどそのときはここに持ちこむ奴いなかったんだな
Prologおじさんとかが嬉々としてやりそうだけど

274 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 03:31:57.97 ID:JSJPiIxT.net]
7月16日

275 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 11:23:47.25 ID:ICo3ogub.net]
>>264 f#
ideone.com/cBGHxs

276 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 12:17:11.76 ID:/fL6DBjJ.net]
>>264 Perl

@md = ([5, 15], [5, 16], [5, 19],
[6, 17], [6, 18],
[7, 14], [7, 16],
[8, 14], [8, 15], [8, 17]);
push @{$c{$$_[1]}}, $$_[0] for @md;
push @{$d{$$_[0]}}, $$_[1] for grep{1 < @{$c{$$_[1]}}} @md;
while (($m, $v) = each %d) {
print "$m/$$v[0]\n" if 1== @$v;
}

実行結果

$ perl 9_264.pl
6/17

277 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 12:22:24.53 ID:/fL6DBjJ.net]
>>272
7月16日が正解なら 解き方間を違えているのかも知れん

278 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 14:27:12.46 ID:ArM8onCc.net]
アルバート「僕はシェリルの誕生日を知らないけど、バーナードも知らないよ」
5,6月を排除

バーナード「僕はシェリルの誕生日を知らなかったけど、今は知ってるよ」
14日を排除

アルバート「それなら僕もいつだか知っているよ」
残り候補が一つの月 -> 7月16日

279 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 15:02:32.31 ID:/fL6DBjJ.net]
>>272 の解き方で考えたこと

アルバート「僕は(「月」だけしか教えてもらっていないので)シェリルの誕生日を知らないけど、
      (「日付」だけを教えてもらった)バーナードも知らないよ」
⇒「日付」だけ聞けば誕生日だと判明する、即ち日の登場回数が一回だけの月日、
 具体的には5月19日、6月18日は対象外とみなし除去

バーナード「僕は「日付」だけを教えてもらっても)シェリルの誕生日を知らなかったけど、
アルバートが「僕はシェリルの誕生日を知らないけど、バーナードも知らないよ」と言うのを聞いて
今は知ってるよ」
⇒日の登場回数が一回だけの19日、6月18日を除去したあと、
 登場回数が一回だけの日が バーナードの聞いた「日付」に当たり、
 誕生日だと考えられる。

⇒6/17

この考え方が違ったんだろうな…

280 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 15:42:35.42 ID:ArM8onCc.net]
>>275
アルバートは月を知ってるが、バーナードも知らない事を確信できるのは、
18,19日を含まない7,8月のどちらかという事になる -> 5,6月は全削除

それを聞いてバーナードは誕生日がわかるので、7,8月両方に含まれる14日ではなく、
15,16,17日のどれかになる

それを聞いてアルバートがわかるので、候補が一つしか残ってない7月16日という事になる



281 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:11:15.57 ID:Thsr1gL6.net]
6/17の方ぽいね

282 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:23:55.65 ID:8topuOK/.net]
5,6月は全排除でしょ

283 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:27:46.47 ID:/fL6DBjJ.net]
>>278
そこがオレにはよく理解できていなくてさ。
まぁ言葉にあいまいな面があるかもしれんから解釈に差が出たのかな

284 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:46:10.26 ID:3NGxsH/O.net]
>>279
解釈の差だけが問題じゃないだろ

> ⇒日の登場回数が一回だけの19日、6月18日を除去したあと、
>  登場回数が一回だけの日が バーナードの聞いた「日付」に当たり、
>  誕生日だと考えられる。

18日、19日は日の登場回数が一回だけであるということは
他の日は複数回登場するということだからその論理は破綻してる

285 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:54:14.37 ID:/fL6DBjJ.net]
>>280
それは誤解というか解読不足。
5月19日、6月18日が除去されることによって、
元々複数回登場していた他の日のうち6月17日が単一の日となり
17日という日付さえ知らされれば、誕生日は6月17日と判明できる。

286 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 17:03:26.79 ID:ArM8onCc.net]
>>281
客観的に見て、アルバートがバーナードも知らない事を確信できる為には、
アルバート自身が知っている月には18,19日が含まれていない必要がある
従って、アルバートが知っている月は5,6月ではないという事

287 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 17:07:47.61 ID:/fL6DBjJ.net]
>>282
なるほど考え方は理解できた。
でも5月6月には他の日もあるからバーナードが聞かされた日がそれらで無いとはっきりしていないうちに
月ごと排除して大丈夫?

288 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 17:11:33.29 ID:/fL6DBjJ.net]
>>281
17日は8月17日もあるから、
6月が17日だけになったからといって、
6月17日が誕生日だとするのは
アルバート、バーナードの台詞を根拠に基づく論理に
無理がないか検証不十分だという気が自分でもしてきた

289 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 17:12:55.48 ID:ArM8onCc.net]
>>283
逆に最初の時点でアルバートはバーナードが知らないとは確信できない
例えばアルバートは6月と聞かされた場合、6月18日の可能性もあるので、
それだとバーナードは18日と聞かされているから知ってるかもしれない

290 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 17:26:33.24 ID:/fL6DBjJ.net]
>>285
大体分かった。ありがとう
単一な日をまったく含まない月を教えられたからこそ、
アルバートは最初の台詞
「僕はシェリルの誕生日を知らないけど、バーナードも知らないよ」
になったという考え方だね。



291 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 17:30:30.29 ID:ArM8onCc.net]
>>286
イエスイエス

292 名前:デフォルトの名無しさん [2017/06/04(日) 22:32:17.70 ID:BGwDpUyE.net]
ディスコプログラミングコンテスト 2017 7/8
https://www.disco.co.jp/procon/
の練習問題
https://www.disco.co.jp/procon/#example

解答バレにならないように1語だけ書くけど
1問目の

TOUSHITSUWOTOTTE

だけが、わけわからん

293 名前:デフォルトの名無しさん mailto:sage [2017/06/05(月) 00:31:08.14 ID:cnQQABDP.net]
>>288
Q1といてみたけど
「糖質を摂って」じゃない?

294 名前:デフォルトの名無しさん [2017/06/05(月) 08:51:14.13 ID:h9zULQkR.net]
糖質を摂って
だよねぇ。

謎のメッセージだな。

295 名前:デフォルトの名無しさん mailto:sage [2017/06/05(月) 09:47:23.18 ID:Na336mAM.net]
>>290
いやそう謎でもない。
解の文を全部通しで読むと
この前に食べものの話がある。

296 名前:デフォルトの名無しさん mailto:sage [2017/06/05(月) 10:35:52.00 ID:S7KIxJHR.net]
糖質が頭の働きを良くするという通説と逆に頭を鈍らせるという説があるけど
この会社が前者を支持することを明言する意味がある

297 名前:デフォルトの名無しさん mailto:sage [2017/06/05(月) 13:18:37.12 ID:nmQdV7hA.net]
例題に挑戦して下さりありがとうございます!全問正解した参加者にはディスコ限定どら焼きをプレゼント!
大会当日に受付でお渡ししします。糖質を摂って優勝目指して頑張って下さい!

298 名前:デフォルトの名無しさん mailto:sage [2017/06/05(月) 13:45:37.09 ID:hFu+7Z6c.net]
誰が統失だって?

299 名前:デフォルトの名無しさん mailto:sage [2017/06/05(月) 17:48:32.89 ID:2PleAf1D.net]
ダメじゃん。全解答を書いちゃって。

でも簡単すぎる問題だしどうでもいいか。

300 名前:デフォルトの名無しさん [2017/06/26(月) 21:09:32.46 ID:92/cX5j1.net]
前にあったやつ。



回転寿司にやってきた私は、コンベア上の寿司をすべて食べて帰ることにしている。
コンベアは毎秒1皿分の速度で流れ、目の前の皿を取るか取らないかを選ぶことができる。
皿取ると同時に食べ始め、食べている間は次の皿を取ることができない。
私が取る以外、皿は追加されたり無くなったりしない。
コンベアの状態が次のような文字列で与えられる。 
"31_2"
数字はその皿を食べ終えるのにかかる秒数を表し、_は皿がないことを表す。1文字目が目の前にあり毎秒、左へ回転する。
例えば、"31_2"で最初の皿を食べたとき食べ終わった時の状態は、"2_1_"となる。

すべての寿司を食べ終えるまで最短何秒かかるか求めよ。
"12_3" > 6秒
"313__" > 8秒
"4_35_1264_23_434" > 60秒
"123456789123456789" > 98秒
"88967472612377988186" > 149秒
"19898693316679441672" > 170秒
"93769682716711132249893" > ?



301 名前:デフォルトの名無しさん mailto:sage [2017/06/26(月) 22:59:10.29 ID:GM19K0OY.net]
計算オーダーの条件は?
無いなら二進木で

302 名前:デフォルトの名無しさん mailto:sage [2017/06/26(月) 23:01:34.06 ID:GM19K0OY.net]
皿がもうちょっと多いと難しくなるけど、>>296なら力業でも

303 名前:デフォルトの名無しさん mailto:sage [2017/06/26(月) 23:40:33.73 ID:JhsaOf6q.net]
>>296 Perl
ttp://ideone.com/iUAYUy

実行結果は

$ perl 9_296.pl
12_3: 6
313__: 10 (合わない…orz)
4_35_1264_23_434: 62 (合わない…orz)
123456789123456789: 98
88967472612377988186: 151 (合わない…orz)
19898693316679441672: 170
93769682716711132249893: 176

となり、半分が合わない。
そのうち 313__ を手で研鑽すると 10 になるのだが、
313__ は本当に8になるの?

304 名前:デフォルトの名無しさん mailto:sage [2017/06/26(月) 23:41:06.22 ID:JhsaOf6q.net]
>>299
研鑽じゃねぇや手で起算な。

305 名前:デフォルトの名無しさん mailto:sage [2017/06/26(月) 23:45:40.94 ID:JhsaOf6q.net]
>>300
起算でもねえ、手で計算な…orz

306 名前:デフォルトの名無しさん [2017/06/26(月) 23:58:59.38 ID:92/cX5j1.net]
313__ はこれでは?

まず一皿ながして
1を食う、2秒時点の状態  3__3_
3を食う、5秒時点の状態  3____
3を食う、8秒で食べ終わり

307 名前:デフォルトの名無しさん mailto:sage [2017/06/27(火) 00:02:53.75 ID:5fkiI7k4.net]
>>302
そっか、最初の3を食べちゃったら最短時間にならないな
>>299は最初の皿からダボハゼみたいに食いつくので必ずしも最短にはならないな
きっと腹が減りすぎていたんだろう…orz

308 名前:デフォルトの名無しさん [2017/06/27(火) 00:12:08.45 ID:PK1LDhK1.net]
>>296 は、
目の前にあるやつを食べ続けるだけで最短になっちゃうのもあるってことか。

309 名前:デフォルトの名無しさん mailto:sage [2017/06/27(火) 00:46:54.34 ID:v9AhJc3r.net]
>>296
ideone.com/PGKCb4

計算量は2^n*n (n:コンベアの長さ) n=24はほぼ限界
n!をbitDPで計算量落とす。

(空皿処理で昔より手を抜いている)

310 名前:デフォルトの名無しさん mailto:sage [2017/06/27(火) 08:18:25.38 ID:bJ//gE7J.net]
考えてみたけと計算オーダーを減らすのはむずかしいね
枝刈りは色々と出来るけど



311 名前:デフォルトの名無しさん mailto:sage [2017/06/28(水) 00:38:04.57 ID:SkQPDtDj.net]
>>218 Perl
ttp://ideone.com/ylFIEa

ソースコード4行目の
my $n = 8; # 分割する自然数を設定
の8を書き換えると他の整数についてもヤング図形を出力できます。

312 名前:デフォルトの名無しさん mailto:sage [2017/06/28(水) 10:38:30.75 ID:+O8L6XqQ.net]
366 :nobodyさん 2017/05/29(月) 16:07:39.16 ID:6v4UcGhE
今回の民法改正、ソフトウェア受託開発の場合、(検収後ではなく)バグ発見後1年瑕疵担保責任があるということで、地獄かよ、と思ったが、
元々問題が起きがちな受託案件がビジネス的に成立しなくなることで強制的に業界再編につながるなら良いことかもと思うようになった。
一部で地獄を見ても。
https://twitter.com/yukihiro_matz/status/869061879389343744

367 :nobodyさん 2017/05/29(月) 16:28:06.55 ID:6v4UcGhE
ニュース - 改正民法が成立、「瑕疵担保責任」などシステム開発契約に影響大:ITpro
b.hatena.ne.jp/entry/itpro.nikkeibp.co.jp/atcl/news/17/052601508/

372 :nobodyさん2017/05/29(月) 19:10:37.12 ID:???
Railsでシステム作って納品する

Railsはマイナー、メジャーのアップデートが半年以内に必ずある

客がアップデートする。アップデートによるエラーやバグ、動作の不具合に気づく

気づいてから1年以内に通知すれば、5年間無料保証ゲット

つまりRailsがアップデートするたびに、無償の修正作業を発生するということかな

376 :nobodyさん2017/05/30(火) 09:20:20.09 ID:L5po86sS
>>378>>379>>375
客が瑕疵担保責任法の法改正を知ってくると思うから、今後5年無償保証をお願いされるだろう
営業がそれでも仕事を取ってこれるか?たぶん無理だろう。無限の直していたら赤字になる。
こういう保守に弱い言語、ころころ仕様が変わる言語は仕事として発生しなくなってくる。
これは変わり目だ。お前らも早く逃げたほうがいいぞ。RubyやPHPなど動的言語は確実に廃れる。
保守に強い言語のみ生き残れる。

313 名前:デフォルトの名無しさん mailto:sage [2017/06/28(水) 10:38:43.66 ID:+O8L6XqQ.net]
瑕疵担保責任(かしたんぽせきにん)

瑕疵担保責任のポイント

民法改正で事実上期限が「無制限」になった
バグや設計のミスなどは、瑕疵担保責任
納品物に不具合があれば損害賠償を請求される可能性もある
不具合を指摘されたらすぐに行動をとるべし
軽微なミスでも先延ばししない

www.atmarkit.co.jp/ait/articles/1706/26/news014.html
itpro.nikkeibp.co.jp/atcl/news/17/052601508/?rt=nocnt

改正法では欠陥に気付いてから1年以内にITベンダーに通知すれば、
通知後5年以内は修正や報酬の減額などを求められるとしている

全ベンダーが泣いた民法改正案を解説しよう その1
www.atmarkit.co.jp/ait/articles/1609/14/news009.html
www.atmarkit.co.jp/ait/articles/1609/14/news009_2.html
www.atmarkit.co.jp/ait/articles/1609/14/news009_3.html

ポイント1:修補や損害賠償、契約解除の期限がなくなる

従来あった「瑕疵担保期間は引き渡しから1年」という考えはなくなる。
条文にある通り、注文者は成果物が契約の目的に適合しないことを発見したら、
その「発見したときから1年以内」ならさまざまな請求ができる。発見が10年後なら、
11年後まで請求可能なのだ。

もっとも、現実のユーザーとベンダーの関係でも、たとえ契約書に「瑕疵担保責任期間は納品から1年と」明記されていても、
「2年目以降は不具合の修正に対応しない」と主張するベンダーはまれだ。多くの場合は、納品から何年たっても、
バグが見つかればユーザーのところに飛んで行き、無償で改修するだろう。

314 名前:デフォルトの名無しさん mailto:sage [2017/06/28(水) 10:56:55.66 ID:fzKvr8sM.net]


315 名前:コピペマン参上!!まで読んだ []
[ここ壊れてます]

316 名前:デフォルトの名無しさん mailto:sage [2017/06/28(水) 22:13:35.80 ID:CE32dHls.net]
>>305
修正 ideone.com/PGKCb4

経路情報復元(ベストは複数あるかもしれない中から一つ選んで)。
ついでにその経路での途中経過を表示してみた。
インデックス、待機秒数、開始時間、食事秒数、終了時間、

317 名前:デフォルトの名無しさん mailto:sage [2017/06/28(水) 23:25:36.64 ID:KJ5QOfYg.net]
>>218 >>307 Perl
ideone.com/GC2JTj

再帰を使わず、リスト処理とloopで書き直したら
もう少しコンパクトですっきりしたものになりました…

318 名前:デフォルトの名無しさん mailto:sage [2017/07/01(土) 18:47:40.02 ID:tnFwdv+3.net]
前に書いたけどコード紛失した。

319 名前:デフォルトの名無しさん [2017/07/01(土) 21:49:46.76 ID:WoDBh/Wa.net]
お題: パスカルの三角形

320 名前:デフォルトの名無しさん mailto:sage [2017/07/01(土) 22:05:06.08 ID:1Cx1myAa.net]
>>314
良いお題だね



321 名前:デフォルトの名無しさん mailto:sage [2017/07/02(日) 13:43:30.38 ID:bHJ33QxN.net]
>>314 Perl5
ideone.com/YCw1OC

桁の多い数値の幅を反映して数値間の空白の数を決めれば
数値の位置がもう少し見やすくなるとおも…

322 名前:デフォルトの名無しさん mailto:sage [2017/07/03(月) 08:12:51.85 ID:EltE6GHS.net]
お題:完全なヤング図ソルバー。
ideone.com/hkUkFM
書いてみたけど、不完全なのがやっとだった。
あってるかもわからん。

図の効率がいいほど評価が上がります。

323 名前:デフォルトの名無しさん mailto:sage [2017/07/04(火) 21:28:12.76 ID:QK6Kginy.net]
>>296 >>299 Perl5
ideone.com/0yJ5U9

リスト処理ではなく、先ずは正規表現と文字列処理を使って書いてみた。

31…の3のように、食べているうちに後続の数値皿が通り過ぎてしまうような、
取りこぼしを起こし得る皿では、その数値を食べるか、あるいはスルーするか、
再帰的に両方に分岐し、木構造で計算しているが、
逆に食べている間に飛び越しを起こさないところでは、分岐が不要なので
来た順に直ちに食べることによって、枝分かれの過剰な細分化を抑制した。

それでも全探査すると、サンプルデータの三つ目まではすぐ解けるが、
四つめ以降は時間がかかりいつ終わるか分からない。

そこで、検索された食事秒数の最小値の更新状況を記録し、
同じ最小値が一定回数以上連続して繰り返し検出されるようになったら
最短値に収束したと見なし、探索を打ち切ることによって短時間で
解を出力できるようにした。打ち切り上限は10をハードコードしてあるが
今回のサンプルデータについては4か5で十分そうだ。

なお、23_ のような、2を食べることによって飛び越しを起こすポイントの
一番最後のものは,食べずにスルーして先に2を食べた方が、
次の周で早く食べ終わることは明らかだ。
これを演繹的に繰り返して、遡ってゆけば、上記のように木構造に
わたって動的に計算して探索しなくても、静的に求解できそうな気がしたが
難しそうなので、見送った。

324 名前:デフォルトの名無しさん mailto:sage [2017/07/04(火) 21:31:48.78 ID:QK6Kginy.net]
>>318
書き忘れたけど、食事秒数を探索中に、それまでに見つかっている最小病数を超えたら
打ち切るという、簡単な枝刈りを取り入れてあります。

連投スマソ

325 名前:デフォルトの名無しさん mailto:sage [2017/07/04(火) 23:51:29.56 ID:sQGcZTdy.net]
>>318
枝刈りで最短を刈り取ってしまったら駄目じゃないか
例えば "3324" -> 15秒 にならないな

326 名前:318 mailto:sage [2017/07/06(木) 00:31:45.46 ID:iCfNzc8Y.net]
>>320
誤解

327 名前:ナす。
枝刈りは、ある探索中の枝において始点から既に経過した秒数が
それまでの別の枝における探索で最後まで食べた最小秒数を超過したら、
現在の枝の探索はもうこれ以上進んでも秒数が増える一方なので打ち切って
別の枝の探索に移るというものなので大丈夫です。
"3324" の最短秒数を探索すると 15秒になります。
[]
[ここ壊れてます]

328 名前:デフォルトの名無しさん mailto:sage [2017/07/06(木) 00:52:46.56 ID:ywrsmrRJ.net]
>>321
あれ、変だな
>>318のリンク先のコードで"3324"を計算すると 16 になるんだけどこっちの環境が変なのかな?
同様に"3328"、"3364"は最短19秒だけど>>318だと20になった

329 名前:318 mailto:sage [2017/07/06(木) 01:20:52.00 ID:iCfNzc8Y.net]
>>322
同じコードをideoneに張りなおして3324を入力して実行してみました。
ideone.com/vXrTp8

ソースを一箇所編集しています。

31 die if $hit >= 20; # 一定以上同じ最小値が繰り返し計算されたら収束と判定し脱出

の繰り返し回数上限判定地を10から20に増やしています。

3324は15になりますが、15が登場するのは11回目以降でそれまで16が出続けます。
3364も20が10回繰り返した後19が出て続きます。

お手数おかけしますが
一定以上同じ最小値が繰り返し計算されたかの判定値を10より多くして
評価してください。

330 名前:318 mailto:sage [2017/07/06(木) 01:35:51.32 ID:iCfNzc8Y.net]
>>323
3324と3364の解を見ていて気が付いた点があります。

一定以上同じ最小値が繰り返し計算されたかの判定値を20にしていますが、
3324の15や3364の19は20ではなくて13回しか現れず、これが最小値のため
解として表示されています。
これは、3324の15や3364が4桁しかないので、
最小値が20回現れる前に全探査が完了し、その中で見つかった最小値を
解として表示していることによります。

>>318の一定回数繰り返したら収束とみなすという判定方法は、
ニュートン法のような数値計算では有効ですが、
>>296の問題の解の判定方法としては適切とは言えないかもしれませんね…orz



331 名前:デフォルトの名無しさん mailto:sage [2017/07/06(木) 01:53:08.89 ID:bBo7q2K6.net]
3324を拡張した887654329は閾値どれくらい増やせば対応できるんですかね

332 名前:318 mailto:sage [2017/07/06(木) 02:06:40.59 ID:iCfNzc8Y.net]
>>325
延々探索を続けないと解に至らないかもしれない入力については
定数で打ち切りを決めるこの解法じゃ解に至りにくいかもしれない。
887654329がそういったカテゴリーに属する入力かというと
チョット分からない。
なので適切な閾値はこれだと断言しにくいです。
さーせん

333 名前:デフォルトの名無しさん mailto:sage [2017/07/06(木) 21:08:21.84 ID:ywrsmrRJ.net]
>>326
結局>>321は大嘘だったし、閾値20の>>323にしたところで
例えば"14432"は最短にならないし
閾値が決められないならその解法はやはり駄目だな

334 名前:318 mailto:sage [2017/07/06(木) 22:03:39.91 ID:0agEc1HZ.net]
>>327
閾値20で打ち切ると最小に至らない入力もあるのはそうだけど、
計算しても最小を更新しない枝に降りずに切り上げてくる>>321は嘘ではないよ。

335 名前:318 mailto:sage [2017/07/06(木) 22:08:34.07 ID:0agEc1HZ.net]
見込みの無い枝をもっと早めに切り上げらる方法がありそうだと気が付いた。
それによって20で打ち切るようなやり方を改善できればいいんだけれども…
それでも計算量が増えていくと、真の解に至るまでにかかる時間が増大して
とけなくなる

336 名前:デフォルトの名無しさん [2017/07/06(木) 23:01:53.78 ID:ywrsmrRJ.net]
>>328
閾値20で打ち切るのは枝切りじゃないという主張のようだけど
打ち切るという動作は枝切り以外の何物でもない

>>318は”3324”の最短に到達しないから>>321
> "3324" の最短秒数を探索すると 15秒になります。
というのも嘘

337 名前:318 mailto:sage [2017/07/06(木) 23:19:13.87 ID:0agEc1HZ.net]
>>330
絡むね。そんな暇あったらコードでも書けばいいのにw

閾値20でその入力については解の探査を

338 名前:~めて
別の枝に移らず次の入力データに移るのはどちらかといえば中断で、
枝かりではないでしょ。

>319
> >>318
> 書き忘れたけど、食事秒数を探索中に、それまでに見つかっている最小病数を超えたら
> 打ち切るという、簡単な枝刈りを取り入れてあります。
にかいてあるでしょうに。


>>318は”3324”の最短に到達しないから>>321
> "3324" の最短秒数を探索すると 15秒になります。
>というのも嘘

これは10回の打ち切りの緩和を書きもらしたんだよ。

何が狙いで、こだわって絡んでくるやらねぇ。
[]
[ここ壊れてます]

339 名前:318 mailto:sage [2017/07/06(木) 23:37:37.26 ID:0agEc1HZ.net]
「打ち切る」という言葉を

>318
>…
>同じ最小値が一定回数以上連続して繰り返し検出されるようになったら
>最短値に収束したと見なし、探索を打ち切ることによって短時間で
>解を出力できるようにした。打ち切り上限は10をハードコードしてあるが

では「その入力に対する求解を中断する」ところで使い、

>319
> >>318
> 書き忘れたけど、食事秒数を探索中に、それまでに見つかっている最小病数を超えたら
> 打ち切るという、簡単な枝刈りを取り入れてあります。

では「その枝の下の方への探索をせず、別の枝の探索に移る」枝刈りの
ところで使ったのが誤解を招いてしまったのかな…

340 名前:デフォルトの名無しさん mailto:sage [2017/07/07(金) 04:22:27.25 ID:pbX9YCbr.net]
3次の動的計画法ってどんだけメモリ食うんや?



341 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 03:20:24.48 ID:hDxZO8qP.net]
お題: 自然数Nの平方根を整数部含めて(1000*N)桁求めたとき、出現する0の個数を数える
たとえば、N = 4の時ルート4を4000桁(整数部1桁+小数部3999桁)求めたとき、出現する0の個数は3999個

N = 3 => ?
N = 5 => ?
N = 7 => ?

342 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 03:22:50.68 ID:5gcIwgbE.net]
ブロックチェインの新手のコイン発掘か?

343 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 03:59:02.35 ID:kzKE4jeR.net]
>>334 Ruby
require 'bigdecimal'
[3, 4, 5, 7].each{|i|
n = 1000*i - 1
puts "N = %i => %i"%[i, ("%.#{n}f"%BigDecimal(i).sqrt(n)).count(?0)]
}


N = 3 => 2956
N = 4 => 3999
N = 5 => 4956
N = 7 => 6954

344 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 04:25:25.94 ID:kzKE4jeR.net]
>>336はミス。0がこんなに多いわけがない

require 'bigdecimal'
[3, 5, 7].each{|i|
n = 1000*i - 1
puts "N = %i => %i"%[i, BigDecimal(i).sqrt(n).floor(n).to_s(?F).count(?0)]
}

N = 3 => 309
N = 5 => 492
N = 7 => 738

345 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 07:13:48.73 ID:hDxZO8qP.net]
>>337
N = 5の場合が間違ってると思う
多分、丸めモードの関係か、精度が足りてないと思われる

346 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 09:51:11.17 ID:3gkxwDpM.net]
>>334 C++

#include <iostream>
#include <string>
#include "gmpxx.h"
int main () {
  int sq_me;
  while( std::cin >> sq_me ){
    int prec = 1000*sq_me, cnt = 0;
    mpf_class sq_out = sqrt( mpf_class(sq_me, prec*4) );
    mp_exp_t exp;
    auto str = sq_out.get_str( exp,10,prec );
    for( auto it=str.begin(); it!=str.end(); it++ ) if( *it=='0' ) ++cnt;
    std::cout << "N = " << sq_me << " => " << cnt+prec-str.length() << '\n';
  }
}

N = 3 => 309
N = 5 => 493
N = 7 => 738
N = 11 => 1079
N = 13 => 1305
N = 17 => 1664
N = 19 => 1875
N = 23 => 2265
N = 29 => 2911
N = 31 => 3113
N = 37 => 3795
N = 41 => 4095
N = 43 => 4312
N = 47 => 4798
N = 53 => 5340

347 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 11:54:07.74 ID:H5pSyGdF.net]
>>334 Squeak/Pharo Smalltalk

| sqrt |
sqrt := [:n :m |
 "ref. https://xar.sh/post/67066374255/ "
 | a b |
 a := 5 * n. b := 5.
 [:exit | [
  a >= b ifTrue: [a := a - b. b := b + 10] ifFalse: [
   b log > m ifTrue: [exit v

348 名前:alue] ifFalse: [
    a := a * 100. b := b // 10 * 100 + (b \\ 10)
   ]
  ]
 ] repeat] valueWithExit.
 b
].

#(3 5 7) collect: [:i | i -> (((sqrt value: i value: i*1000) asString first: i*1000) occurrencesOf: $0)]

"=> {3->309 . 5->493 . 7->738}"
[]
[ここ壊れてます]

349 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 12:18:57.24 ID:hDxZO8qP.net]
>>339
N = 29とN=41の場合が間違ってる可能性? それ以外は正しい模様
N = 29 => 2912、N = 41 => 4094 じゃなかろうか

>>340
合ってる

350 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 12:48:13.59 ID:1hnJaOYb.net]
>>334 Perl5
ideone.com/fAyh2l



351 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 13:10:39.20 ID:1hnJaOYb.net]
>>334 Perl5
ideone.com/cMBD8o

>>342 をもう少しすっきり書けたので差し替え。

352 名前:デフォルトの名無しさん mailto:sage [2017/07/08(土) 13:31:31.09 ID:3gkxwDpM.net]
>>341
> N = 29 => 2912、N = 41 => 4094 じゃなかろうか

それが正しいようです
GNU MPだとどうしても最後の桁は四捨五入?されるようで
任意のNに対して正確な答えを出すのは面倒なので修正は断念

353 名前:デフォルトの名無しさん mailto:sage [2017/07/09(日) 10:26:36.71 ID:aJSGzdPS.net]
結局バイナリーツリーになっちゃったなぁ。むずかし。

354 名前:デフォルトの名無しさん mailto:sage [2017/07/09(日) 10:55:01.51 ID:xLkjNLhf.net]
>>344
考え直したら面倒じゃなかった

>>334 C++
codepad.org/k0Sq8Fqo


N=10000くらいまでなら現実的な時間で計算出来そうだ

355 名前:デフォルトの名無しさん mailto:sage [2017/07/09(日) 11:25:12.20 ID:nhQrw0mT.net]
N=100000, 1億桁のくらいなら現実的な時間で出来る

丸めは切り捨て?四捨五入?

356 名前:デフォルトの名無しさん mailto:sage [2017/07/09(日) 11:33:40.13 ID:nhQrw0mT.net]
ルートの計算は速い
整数のルートは特に速い

357 名前:346 mailto:sage [2017/07/09(日) 12:21:20.78 ID:4Kodr3MO.net]
>>347
GNU MPだとget_str() とか gmp_sprintf() では四捨五入されるようなので
floor() であらかじめ切り捨ててから get_str() した

358 名前:デフォルトの名無しさん [2017/07/09(日) 12:57:37.64 ID:DBjzEn12.net]
ルートの問題で初めてきたが、これってゼロの個数に上限があるのか? 簡単に求まるのか?
連続するゼロの個数の最大だろ?
無理数は規則なく無限に続くから、ゼロの個数ももし1000個連続が見つかれば、1001個もいつかでるとおもうんだが。

359 名前:デフォルトの名無しさん mailto:sage [2017/07/09(日) 13:14:46.15 ID:df6kAKcY.net]
最大って何の話しとるんや

360 名前:デフォルトの名無しさん [2017/07/09(日) 13:28:51.97 ID:DBjzEn12.net]
もとめる桁数のほうに上限があったのか、それを見逃してた。



361 名前:デフォルトの名無しさん mailto:sage [2017/07/09(日) 13:45:03.68 ID:NvRZfELm.net]
連続する個数でもないぞw

362 名前:デフォルトの名無しさん [2017/07/09(日) 13:51:59.10 ID:DBjzEn12.net]
どっちも間違えたな、ゼロの総数だったか。

363 名前:デフォルトの名無しさん mailto:sage [2017/07/09(日) 19:14:37.92 ID:6MYOcrZ9.net]
>>349
floorを行った後の結果に誤差は無い
という検証は出来てるの?
何もしてないなら、それはたまたま偶然当たったっていうだけだぞ

ていうか、君には聞いてない
出題者の意図を聞いてる

364 名前:デフォルトの名無しさん [2017/07/11(火) 15:16:56.21 ID:1hL73PK3.net]
√2でなるべく長い0の連続をみつけるは?

365 名前:デフォルトの名無しさん [2017/07/11(火) 15:49:47.43 ID:QxseLuPf.net]
>>355
君には向いて無いよ

366 名前: ◆QZaw55cn4c mailto:sage [2017/07/11(火) 16:29:49.99 ID:ZfeFayuI.net]
>>355
>floorを行った後の結果に誤差は無い
>という検証は出来てるの?

ぱっとみ当然だと思うんだが

>>356
何桁求めるか指定しないと意味がないのでは?

367 名前: ◆QZaw55cn4c mailto:sage [2017/07/11(火) 16:35:18.57 ID:ZfeFayuI.net]
>>358
ん、考え直した
10進に変換した結果にて 99999 とかが末尾にあるようでは、余分の計算はしないと

368 名前:いけないね []
[ここ壊れてます]

369 名前:デフォルトの名無しさん mailto:sage [2017/07/11(火) 18:55:08.87 ID:dSS1j36W.net]
[][Tebla][]

}

000-"Yob*RtStrike"[%Kil\]MO,fla>%$9999VLTS

001-GYORLith"0\R"/"ESUBA"%$%

HADO-"EM","L","O","NU"###END

370 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 06:57:35.22 ID:PYQ8V1MO.net]
>>296
ideone.com/VzYVY9
C++。解けた気がする。
状態をメモ化してみた。
何で動いてるのか自分でもよくわからない。
暇だったので解いてみた。



371 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 07:42:51.88 ID:PYQ8V1MO.net]
あー多倍長精度演算ほしー。もちろん標準で。

372 名前: ◆QZaw55cn4c mailto:sage [2017/07/14(金) 07:55:58.80 ID:TDGI45F0.net]
>>362
私も欲しかったので作ってしまった、今 >>334 を奮闘中

373 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 07:56:52.78 ID:PYQ8V1MO.net]
>>363
それはすごいな。
後々破棄するようなものを作るモチベーションが出てこないよ。

374 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 07:57:44.37 ID:TDGI45F0.net]
>>364
書き捨てに慣れてしまったんだ‥

375 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 07:59:21.83 ID:PYQ8V1MO.net]
>>365
あはは・・・。
コード書き捨てるのは良いけど、道具書き捨てるのは俺には向いてないわ。
なので、標準待ち。

376 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 09:33:33.04 ID:gEZu1299.net]
boostという任意倍長の計算Libraryがあります。
C++では使えるそうです。

377 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 09:38:45.73 ID:PYQ8V1MO.net]
>>367
Boostも良いんだけどね。残念なことにあれは実験環境で準標準って扱いなんだよなぁ。
あれから取り入れられるライブラリも多いんだけど、標準じゃないからね。
残念なことに。

378 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 12:49:16.12 ID:gnKUWanp.net]
まあ標準ライブラリしか使わない縛りをしたければ好きにすればいいんじゃない?

379 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 14:27:07.19 ID:JyiCltLg.net]
車輪の再発明

380 名前:デフォルトの名無しさん mailto:sage [2017/07/14(金) 14:31:43.15 ID:DwybRUfK.net]
競プロみたいな相手方の環境使う物だと標準と準標準の差はでかい
自分の環境なら導入すればいいだけだが



381 名前: ◆QZaw55cn4c mailto:sage [2017/07/14(金) 18:52:31.62 ID:TDGI45F0.net]
>>370
個体発生は系統発生を繰り返す

382 名前:デフォルトの名無しさん mailto:sage [2017/07/15(土) 12:42:06.98 ID:odVkuNfb.net]
>>361
厳密解を出しているのなら、チャレンジ
(わかって近似値解狙いなら気にしないで)

"14432" と "887654329"

両方とも既出の"貪欲つぶし"(?)数列

"14432"は 20秒 (ゼロインデック順で02341)
"887654329"は 80秒(同123456708)でいける。

383 名前:デフォルトの名無しさん mailto:sage [2017/07/15(土) 14:59:21.20 ID:OEoVgGO0.net]
>>373
ideone.com/cBzPSj
C++。それ解くとほかの問題が解けなくなる。
厳密解のつもりだったが、ちょっと自分の領分超えてるなぁ。
うまくいかないものだ。
真実が奥の方にあると貪欲法は弱いな。Orz

384 名前:デフォルトの名無しさん [2017/07/16(日) 16:33:07.01 ID:8ZBD9z9c.net]
お題:
自分用多倍長整数演算関数

…って思ったけど、処理系の標準ではないとか、仕事でGNU MP使っては駄目とかの
制約で、簡易的なもの(乗算くらいまでとか)を書いた事ある人は少なくないと見た。

385 名前:デフォルトの名無しさん mailto:sage [2017/07/16(日) 18:30:49.57 ID:8+Akms5T.net]
多倍長整数演算がサポートされている言語を使う

終わり

386 名前: ◆QZaw55cn4c mailto:sage [2017/07/16(日) 18:54:09.85 ID:eA1jggM5.net]
>>375
C++98 codepad.org/hUObVCsR
オートボクシング等はなく便利にはできていない.

387 名前:デフォルトの名無しさん [2017/07/16(日) 2 ]
[ここ壊れてます]

388 名前:0:34:05.63 ID:yctBkD01.net mailto: 掛け算の実装がキモだろう。
ここがボトルネックになるはず。
ここができると円周率とか、ルート計算も高速化できるはず。
[]
[ここ壊れてます]

389 名前: ◆QZaw55cn4c mailto:sage [2017/07/16(日) 20:36:24.09 ID:eA1jggM5.net]
>>378
うん,FFTを使うそうだが‥いまいちよくわからない

390 名前:375 mailto:sage [2017/07/16(日) 20:41:46.81 ID:8ZBD9z9c.net]
>>376
仕事で言語を選べる立場になってみたいものだわ。
この言語でやってってののは多々あるけど…orz

>>377
Karatsuba-Ofman法を目指してごーごー



391 名前:デフォルトの名無しさん mailto:sage [2017/07/17(月) 22:48:25.95 ID:5edeqhg+.net]
>>296
手計算で計算出来るレベルにまで計算量を減らせた
もちろん数学的な裏付け付きで
ある条件を見たせば一瞬で求まる

"123456789123456789" > 98秒
残念ながら、これだけはその条件を満たしてない

392 名前:デフォルトの名無しさん mailto:sage [2017/07/18(火) 06:37:17.84 ID:nFCFlf58.net]
>>381
22とか2323もその条件を満たしてない感じ?

393 名前:デフォルトの名無しさん mailto:sage [2017/07/18(火) 07:37:05.09 ID:Ew0RSScO.net]
22 は微妙
2323 は大丈夫

394 名前:デフォルトの名無しさん mailto:sage [2017/07/18(火) 07:41:44.22 ID:Ew0RSScO.net]
まだコードになってないんで、
コードになったらアップします

寿司を食べる時間 < レーンの回転周期
という前提をつけちゃおうと思ったけど、
つけない方が良さそうですね

寿司を食べる時間がレーンの回転周期の整数倍の寿司は
ちょっと特別な処理が必要

395 名前:デフォルトの名無しさん mailto:sage [2017/07/18(火) 08:01:32.43 ID:Ew0RSScO.net]
整数倍の寿司が無いもので
条件に当てはまらない最小は
2222
かな

396 名前:デフォルトの名無しさん mailto:sage [2017/07/18(火) 08:49:51.93 ID:YLlwVFMJ.net]
>>334 SageMath
ttps://sagecell.sagemath.org/?q=brdclf

普通に(?)多桁のisqrt()なので何の捻りも無し。

397 名前:386 mailto:sage [2017/07/18(火) 09:39:56.20 ID:YLlwVFMJ.net]
>>339
つ mpz_sqrt()

398 名前:デフォルトの名無しさん mailto:sage [2017/07/19(水) 18:12:29.37 ID:Np9hKHT2.net]
>>296
>>373
ideone.com/B9vl8l
C++。結局、i7-6700のmem2G使って7分で解けた。
どうしようもない位遅いな。
でも一応題意には添えたと思う。
もう見たくない・・・。Orz

高速化するにはインラインアセンブリ使うか、スレッド分割できるようなアルゴリズムかんがえるか。
よくわからんけど、数学で頑張ってる人に期待だ。

399 名前:386 mailto:sage [2017/07/20(木) 01:57:16.81 ID:Q7XnESC/.net]
100のべき乗に変更
ttp://sagecell.sagemath.org/?q=mciykc

400 名前:デフォルトの名無しさん mailto:sage [2017/07/21(金) 15:21:18.13.net]
>>296
ideone.com/mXPglY
C++。試しに再起化してみたら処理速度倍になった。
自分の環境では3分ちょいで解ける。
相変わらずメモリ馬鹿食いするけど。
もう俺には無理。

俺の中では終了でーす。Orz



401 名前:デフォルトの名無しさん mailto:sage [2017/07/22(土) 08:54:36.28 ID:OQXA8cUK.net]
>>388
数学で頑張ってる人だけど、
もうちょっとまって

>>296の問題だけなら簡単だけど、
まだ全体を解明できてない

というか、忙しくて>>381から進んでない

402 名前:デフォルトの名無しさん mailto:sage [2017/07/22(土) 08:55:28.19 ID:OQXA8cUK.net]
このスレが無くならないうちに解明します

403 名前:デフォルトの名無しさん mailto:sage [2017/07/22(土) 10:43:30.03 ID:apsnR2Z0.net]
>>391
wktkデス!
コード見るのが好きなのでぜひ完走していただけたらと思います。

404 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 11:26:56.94 ID:ipiEUPYV.net]
>>375
のほかの実装はでてこないねぇ‥

405 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 12:53:55.68 ID:7fREas1L.net]
>>394
使えるコードにするためには、規模がでかくなりすぎるから

406 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 14:15:20.13 ID:ipiEUPYV.net]
C/C++ で最長1000行ぐらいとみて、2日ぐらいあれば、とりあ

407 名前:ヲず動く
土日で仕上がってくるんじゃないかと期待してたんだが
[]
[ここ壊れてます]

408 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 14:18:11.58 ID:7fREas1L.net]
速度が考えられてないコードなんて実用にはならないよ

409 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 14:21:31.79 ID:7fREas1L.net]
ていうか、
コードに対する条件とか
サポートする機能とか
条件が無さすぎる

410 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 14:24:57.75 ID:ipiEUPYV.net]
速度‥か‥

どうしてもローテートとかキャリーフラグとかを使いたいから、これはアセンブラの領域になるね
よくみかけるアセンブラ中毒者が今頃爪を研いでいるのだろうか?



411 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 14:25:42.29 ID:ipiEUPYV.net]
>>398
そこは「自分用」だから自由に決めていいんでないかい?

412 名前:デフォルトの名無しさん [2017/07/23(日) 14:49:34.77 ID:TcY6qE9r.net]
>>394

当日に >>305>>390 より10倍以上早いのがでているだろう。
しかも 計算量まで書いてある

413 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 14:53:19.94 ID:ipiEUPYV.net]
>>401
お題が違うのでは?

414 名前:デフォルトの名無しさん [2017/07/23(日) 15:05:28.62 ID:TcY6qE9r.net]
>>402 >>394
確かに違った、すいません。

c++多倍長なら、karatsubaにも対応して300行くらいの以下をパクって使うのも一案

sites.google.com/site/indy256/algo_cpp/bigint

415 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 15:09:21.91 ID:ipiEUPYV.net]
>>403
base 10進ならば、表示(operator<<) が楽でいいね、なるほど、それは思いつかなかった

416 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 16:51:44.88 ID:7fREas1L.net]
>>399
通常、
処理時間のほとんどが乗算
乗算のほとんどがFFT
アセンブラの出番は当分先

417 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 16:52:43.21 ID:7fREas1L.net]
FFTのライブラリをどこからか持ってくるのでもいいけど、
それなら素直に多倍長ライブラリを持ってくれば
ってことになる

418 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 16:54:07.19 ID:7fREas1L.net]
今は浮動小数点演算が速いので、
カラツバの出番はあまりない

419 名前:デフォルトの名無しさん mailto:sage [2017/07/23(日) 18:50:17.74 ID:5CSy1R8t.net]
基数を10のべき乗にするとか(printf()的なものが簡単だから)、乗算はunsigned shortやintとの
乗算に限るとか、除算無しとかいうのは…

プログラムの本体に組み込まれてしまって、再利用可能なライブラリの形で括りだされてる事の
方が少ないかw

420 名前:デフォルトの名無しさん mailto:sage [2017/07/24(月) 00:48:44.80 ID:XgJeE+LA.net]
>>6-285 SageMath
ttp://sagecell.sagemath.org/?q=veftjc



421 名前:デフォルトの名無しさん mailto:sage [2017/07/24(月) 18:24:00.06 ID:UuUAOyUA.net]
>>408
裁定ラインとしては、乗算は Bigint×Bigint、および除算の実装ですかね、でも足し算の回数での乗算や引き算の回数での除算は嫌ですね

422 名前:デフォルトの名無しさん [2017/07/24(月) 18:58:12.05 ID:5ve8i6tz.net]
お題:お題スレ3の>>170をファレイ数列を使って解く。
peace.2ch.net/test/read.cgi/tech/1390525149/170

423 名前:デフォルトの名無しさん mailto:sage [2017/07/24(月) 19:10:35.21 ID:nJVItCRy.net]
>>411 Ruby
def farey_sequence(n)
(1..n-1).map{|i| 1r*i/n}
end

def ans_411(m)
(2..m).map{|i| farey_sequence(i)}.flatten.uniq.sort
end

ans_411 3 #=> [(1/3), (1/2), (2/3)]
ans_411 5 #=> [(1/5), (1/4), (1/3), (2/5), (1/2), (3/5), (2/3), (3/4), (4/5)]

424 名前:デフォルトの名無しさん mailto:sage [2017/07/24(月) 19:11:05.16 ID:7nQ6Z7f9.net]
>>296
超高速版が出来ました!
ideone.com/FrRkof

一皿9秒が上限であれば、計算オーダーはn
関数自体は何秒でも大丈夫です

コードだけじゃ意味がわからないでしょうけど、とりあえずコードだけ
あまりテストしてないので、バグって

425 名前:スらごめんなさい []
[ここ壊れてます]

426 名前:デフォルトの名無しさん [2017/07/24(月) 23:00:47.69 ID:fjGi9Yh0.net]
オーダーnは凄いな

427 名前:デフォルトの名無しさん mailto:sage [2017/07/25(火) 05:40:32.49 ID:ubbfnjuS.net]
>>413
うーんわからん。
俺の思考とは別系統かな。
ホントに0秒で解けてるし、素晴らしい。
素直に賞賛。

428 名前:デフォルトの名無しさん mailto:sage [2017/07/25(火) 11:52:16.57 ID:bLUUDw7G.net]
回転寿しの問題は、部分的な最短経路が全体の最短経路にならないんだよな
だが最短時間はレーン長の2倍程度の再帰回数で出る
そのあと数十億回再帰して総当たりしてもそれより短くならない
最後の皿から逆方向に探索してもおそらく同じ状況

429 名前:デフォルトの名無しさん mailto:sage [2017/07/25(火) 11:56:47.84 ID:bLUUDw7G.net]
例えば、”122” は最短時間6だが、1周目で2番目の要素”2”をパスしないとそうならない

430 名前:411 mailto:sage [2017/07/26(水) 19:54:35.63 ID:6H34MdHA.net]
>>412
ファレイ数列の中間数(mediant)を再帰的に生成すると、uniqもsortも要らないのだけど、
mが3や5だと大差無いかw



431 名前:デフォルトの名無しさん mailto:sage [2017/07/26(水) 20:50:49.45 ID:s8dUUqTb.net]
>>411
リンク先が見えません
問題文をもう一回書いてください

432 名前:デフォルトの名無しさん mailto:sage [2017/07/26(水) 20:52:34.29 ID:s8dUUqTb.net]
と思ったら見れました

ファレイ数列を使って何かを解くわけじゃなくて、
ファレイ数列を求める問題?

433 名前:411 mailto:sage [2017/07/26(水) 23:20:07.89 ID:6H34MdHA.net]
>>420
元の問題はそういうもの(=ファレイ数列の両端(0/1と1/1)無し版を求める問題)と
解釈してますです。

434 名前:デフォルトの名無しさん mailto:sage [2017/07/26(水) 23:26:01.52 ID:lPM9zwS7.net]
#include <list>
#include <iostream>
const int N_MAX = 10;
struct RATIONAL {
int num;
int den;
};
int main() {
std::list < RATIONAL > farey;
RATIONAL zero = {0, 1};
RATIONAL one = {1, 1};
farey.push_back(zero);
farey.push_back(one);
for (int n = 1; n <= N_MAX; n++){
for (std::list < RATIONAL > ::iterator i1 = farey.begin(), i0 = i1++; i1 != farey.end(); i0 = i1, i1++) {
if (i0->den + i1->den <= n) {
RATIONAL m = {i0->num + i1->num, i0->den + i1->den};
farey.insert(i1, m);
}
}
std::cout << n << " : ";
for (std::list < RATIONAL > ::iterator i = farey.begin(); i != farey.end(); i++) {
std::cout << i->num << "/" << i->den << " ";
}
std::cout << "\n";
}
return 0;
}

435 名前:デフォルトの名無しさん mailto:sage [2017/07/26(水) 23:29:22.49 ID:lPM9zwS7.net]
これから0と1を除けば良いって問題であれば、
表示のループに以下を加えれば
if (i->den != 1)

436 名前:デフォルトの名無しさん mailto:sage [2017/07/26(水) 23:31:57.11 ID:lPM9zwS7.net]
問題の意味も意図も良くわからん

出題者が「そういうものと解釈しています」とか
出題者が >>418 みたいな回答をバカにする発言とか

なんか非常に感じが悪い

437 名前:412 mailto:sage [2017/07/27(木) 00:12:38.86 ID:qteH6K3e.net]
そもそも>>412のfarey_sequenceは定義が間違ってたわ
んでもって再帰にすると>>412より遅くなるという
Ruby

class Farey
def self.[](m)
if m == 1
[0r, 1r]
else
succ(m - 1)
end
end

def self.succ(m)
self[m].each_cons(2).inject([0r]){|s, (a, b)|
x = a.denominator + b.denominator
s << 1r*(a.numerator + b.numerator)/x if x == m + 1
s << b
}
end
end

Farey[3] # => [(0/1), (1/3), (1/2), (2/3), (1/1)]
Farey[5] # => [(0/1), (1/5), (1/4), (1/3), (2/5), (1/2), (3/5), (2/3), (3/4), (4/5), (1/1)]

438 名前:デフォルトの名無しさん mailto:sage [2017/07/27(木) 01:59:46.61 ID:GuEy9AL1.net]
>>411 Java
https://ideone.com/w0q7cN

439 名前:デフォルトの名無しさん mailto:sage [2017/07/28(金) 18:51:16.80 ID:XBSdfIgC.net]
>>375
のほかの実装はでてこないねぇ‥

440 名前:デフォルトの名無しさん mailto:sage [2017/07/28(金) 19:19:26.77 ID:mqZJq6H+.net]
昔brainf**kで実装したのあるけどちょっとなぁ



441 名前:デフォルトの名無しさん mailto:sage [2017/07/28(金) 19:24:55.65 ID:WViVOgsq.net]
また懐かしい言語を

442 名前:デフォルトの名無しさん mailto:sage [2017/07/28(金) 19:26:36.86 ID:WViVOgsq.net]
どうせならチューリングマシンで作ってよ

443 名前:デフォルトの名無しさん [2017/07/30(日) 10:59:37.37 ID:A7gIx2b1.net]
お題:MathematicaのFareySequence[n,k](引数2つ)に相当するものの実装
ttp://reference.wolfram.com/language/ref/FareySequence.html

444 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 11:53:03.31 ID:EQKnHSgY.net]
>>431
ideone.com/m7BnJN
C++。一瞬計算が合わなくてビビったけど、空目だった。
インデックス概念がベーシックなんだな。

445 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:00:36.94 ID:EQKnHSgY.net]
っていうか、この関数インデックスに0与えたら何が出力されるんだろう・・・。
早速バグってる気がする。

446 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:15:40.85 ID:EQKnHSgY.net]
>>432
バグってた。のでエディトしてFIXした。
所持する数の概念勘違いしてた。

447 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:25:59.30 ID:B3p9Yl5S.net]
>>422の微妙な変更でいいよね

448 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:26:41.34 ID:B3p9Yl5S.net]
1個だけ求めるなら、もっといい方法がある?

449 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:27:22.69 ID:B3p9Yl5S.net]
ていうか、いい加減Fareyはもういいでしょ
他の課題の方が

450 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:30:15.15 ID:EQKnHSgY.net]
フィボナッチって素数何だっけ?



451 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:44:33.08 ID:B3p9Yl5S.net]
1, 1, 2, 3, 5, 8, ...
違うよね

452 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:47:15.18 ID:EQKnHSgY.net]
だよねー。>>422ってフィボナッチ使ってない?
あんまり深く考えてないだけど。Orz

453 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:47:30.85 ID:B3p9Yl5S.net]
じゃあ、任意の二個の数からはじまるフィボナッチ数列で、はじめから連続する素数の数が多い物を探す
って課題で

454 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:48:36.68 ID:B3p9Yl5S.net]
>>440
フィボナッチではない
wikipediaにのってるレベルの知識で作った

455 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:49:05.29 ID:EQKnHSgY.net]
あれ?俺とんちんかんなこと言ってるか?
>>422が数列としてあってるのかよくわからない。Orz
どう考えればいいんだろう。

456 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:53:04.00 ID:EQKnHSgY.net]
まぁ、俺のもあってるかどうかはしらんけど。><;

457 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 12:56:43.60 ID:EQKnHSgY.net]
頭悪くてゴメン。爆発しそう。。。

458 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 13:01:05.96 ID:EQKnHSgY.net]
引っ込む。すまんかった。

459 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 14:17:22.65 ID:t+CfDp82.net]
>>431 Java
ideone.com/9AXdRV

460 名前:デフォルトの名無しさん mailto:sage [2017/07/30(日) 19:16:10.29 ID:LizATlBz.net]
>>431 Ruby

def farey(n, k)
return [0r, 1r][k] if n == 1
farey(n - 1, 0..-1).each_cons(2).inject([0r]){|s, (a, b)|
x = a.denominator + b.denominator
s << 1r*(a.numerator + b.numerator)/x if x == n
s << b
}[k]
end



461 名前:デフォルトの名無しさん mailto:sage [2017/08/03(木) 07:36:01.80 ID:cLWzUq7C.net]
お題:ミンコフスキーの疑問符関数の実装
ttps://en.wikipedia.org/wiki/Minkowski%27s_question_mark_function
ttp://reference.wolfram.com/language/ref/MinkowskiQuestionMark.html

462 名前:デフォルトの名無しさん mailto:sage [2017/08/03(木) 10:39:36.15 ID:ONmyLPuf.net]
WIKIぺにコード乗ってますが。

463 名前:デフォルトの名無しさん mailto:sage [2017/08/03(木) 10:48:34.50 ID:ONmyLPuf.net]
>>449のWIKIより。
/* Minkowski's question mark function */
double minkowski(double x) {
long p=x; if ((double)p>x) --p; /* p=floor(x) */
long q=1, r=p+1, s=1, m, n;
double d=1, y=p;
if (x<(double)p||(p<0)^(r<=0)) return x; /* out of range ?(x) =~ x */
for (;;) /* invariants: q*r-p*s==1 && (double)p/q <= x && x < (double)r/s */
{
d/=2; if (y+d==y) b

464 名前:reak; /* reached max possible precision */
m=p+r; if ((m<0)^(p<0)) break; /* sum overflowed */
n=q+s; if (n<0) break; /* sum overflowed */

if (x<(double)m/n) r=m, s=n;
else y+=d, p=m, q=n;
}
return y+d; /* final round-off */
}
[]
[ここ壊れてます]

465 名前:デフォルトの名無しさん mailto:sage [2017/08/05(土) 17:44:11.83 ID:40G0sflG.net]
>>375
のほかの実装はでてこないねぇ‥

466 名前:デフォルトの名無しさん [2017/08/12(土) 18:46:00.57 ID:953va2dM.net]
寿司のオーダーNのやつを理解しようとしたけどまだやってない。
その仕組みと、ほんとに正解してるのかとか。いたら誰が解説して。

467 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:04:22.18 ID:Bi4KH0eW.net]
>>413です

もちろん合っているつもりのコードです
作者が言っても何の説得力もありませんが

468 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:07:04.34 ID:4r/z/Qd5.net]
会社に帰ってこない巡回セールスマンだよね
寿司の乗った皿がノード、計算量はO(n!)

469 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:10:18.10 ID:Bi4KH0eW.net]
それぞれの寿司を食べている期間をレーン上の線分で表します

この線の重なり具合をpileで表しました

効率良く食べられた場合はレーンがpile_max周するまでの間に食べきることが出来ます

170行目の判定がそれで、trueの場合は効率良く食べられない場合です

470 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:12:06.32 ID:4r/z/Qd5.net]
>>456
もしそれで最適解が得られるなら巡回セールスマンも可能じゃないかな?



471 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:17:11.73 ID:6XNTCj+p.net]
巡回セールスマン問題とけたら色々応用範囲アルヨ。
マジでどっかに売り込んでもいいくらい。
天才か。

472 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:18:34.85 ID:6XNTCj+p.net]
社会的に言うと交通統制とかもそれじゃないかな?
信号の待ち時間問題。よくしらんけど。

473 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:19:17.76 ID:Bi4KH0eW.net]
効率良く食べられない方が簡単なのでその場合から

お寿司を以下のグループに分けます
----
各グループのお寿司は、レーンの特定の位置から食べ始めた場合、pile[グループ]周以内で食べ終わることが出来る
このとき、pile_max = Σ pile[グループ]
となる
---
このようなグループの分け方の最小の物が存在します

474 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:22:56.16 ID:Bi4KH0eW.net]
同じグループのお寿司は連続して食べます
開始時と、各グループのお寿司を食べ終わった後、最初に来るお寿司から食べはじめ、pile[グループ]以内で食べられる食べ方でそのグループを食べ終える
ということを繰り返せば最小の時間で食べ終えることが出来ます

475 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:26:29.79 ID:Bi4KH0eW.net]
グループ分けした時に1個のグループになった場合は、
効率良く食べられることになります
つまり、pile_max周以下で食べ終えることが出来ます

この時は、コード上にあるダミーのお寿司を追加してから最小時間を求め、ダミーのお寿司を食べてる時間を引けば求められます

476 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:28:18.79 ID:4r/z/Qd5.net]
うーん、よくわからん
セールスマンの巡回先を一次元にマッピングできれば同じことできそうな
無理か

477 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:30:27.01 ID:Bi4KH0eW.net]
グループの分け方は少し難しいです

レーンの各整数位置に対して、
お寿司の線の両端にあたる点同士
線の重なりがpile_max未満である区間の点(両端を含む)
を同じグループの点とし、
これらを続けることで最小のグループ分けが出来ます
線の両端の点のグループが、そのお寿司のグループになります

478 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:31:42.19 ID:Bi4KH0eW.net]
それぞれ、証明は出来ているつもりです

479 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:32:49.51 ID:Bi4KH0eW.net]
もちろん、一般の巡回問題はこの方法では無理です

480 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:37:29.23 ID:4r/z/Qd5.net]
全ノードを巡回する最短時間の問題だから、できそうな気がするけどね



481 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:39:44.61 ID:2Yw2XYfL.net]
372仕様書無しさん2017/08/11(金) 10:31:43.41
フリーランスで検索すると引っかかる零細ITがやっている

482 名前:フリーランスのサイトはだめだ。
高額に見せているけど実際は50万前後
JIET加入した方がいいよ。案件は毎日千件以上末端価格は60万円 平凡な稼働時間の80万円の案件もある。
ユー子も求人をだしてる。名刺も渡せる。ユー子に名刺が渡せるんだぞ。夢のようだ

それらの案件まさぐってHPで転売していたのが零細ITがやるフリーランスサイト

473非決定性名無しさん2017/08/03(木) 15:21:30.71

JIETに加入すれば誰でも3次60万からスタートだ。フリーランスのサイトをやってる
自称エージェントもそこから案件情報を取得しきてる。サイトで60万で釣って40万から55万の
間でやらしている。

446非決定性名無しさん2017/08/02(水) 22:12:48.95

JIETに毎月5千円払えば3次から入場できるだろ?
高額をうたうフリーランスのサイトはだいたい5次から45万円
JIETで閲覧応募できる末端価格からさらに搾取するのが高額をみせつけるフリーランスサイトでした
高額案件をみせつけるフリーランスサイトも案件の取得はJIETでした

自称エージェントはJIETから流れてくる案件を転売してるだけだった。
JIETに加入すれば誰でも案件に応募することができた。収入が40万50万台にならなくて済む
[]
[ここ壊れてます]

483 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:40:20.63 ID:Bi4KH0eW.net]
pile_maxとその位置から下限が得られますが、
>>296 の例では98秒の物以外はすべてその下限になっています
一個その下限になるような例を見つければ答えがわかるのですが、
自力で検索してみればわかると思いますがそのような例はあっさり見つかります

98秒の例は効率良く食べられない場合になります

効率良く食べられる側のなかでも、pileから得られる下限値より大きくなる場合もあります

484 名前:デフォルトの名無しさん mailto:sage [2017/08/12(土) 19:43:06.99 ID:Bi4KH0eW.net]
いずれの場合も、PCを使わなくても手計算で十分可能です

485 名前:デフォルトの名無しさん mailto:sage [2017/09/15(金) 10:14:33.05 ID:lRMsxOf0.net]
お題:
N次元で1辺のマス目がM個の魔法陣を作る
N>3(任意)、M>=3(任意)の超立方体

486 名前:デフォルトの名無しさん mailto:sage [2017/09/15(金) 10:20:33.77 ID:lRMsxOf0.net]
参考
magcube.la.coocan.jp/magcube/jp/
nadamath2012.web.fc2.com/bushi/2004_mas2.pdf

487 名前:デフォルトの名無しさん mailto:sage [2017/09/17(日) 16:38:38.03 ID:DSKC3zx4.net]
魔方陣は1個作ればいいの?

Mが奇数か4の倍数は簡単
4で割って2余るのは検索するしかないのかな?

488 名前:デフォルトの名無しさん mailto:sage [2017/09/17(日) 16:55:04.37 ID:fthJj6jv.net]
バックトラックで組もうかと思ったけど、重そうだったからやめた。
数独より重そう。
それに一列合計をどの数字にするのかちょっとわからなかった。

489 名前:デフォルトの名無しさん mailto:sage [2017/09/17(日) 23:20:36.13 ID:DSKC3zx4.net]
一列合計は、M*[数字の平均]
になる

つまり
M*(M^N+1)/2

490 名前:片山博文MZ mailto:sage [2017/09/18(月) 21:53:54.06 ID:iMidYxoH.net]
お題: URLから適当なサムネイルを生成するWebプログラム。



491 名前:デフォルトの名無しさん [2017/09/18(月) 23:06:01.10 ID:FC5+Wne9.net]
お題
0以上90未満の整数nを入力として
タンジェントn°の値が有理数ならば真
そうでなければ偽を返す

492 名前:デフォルトの名無しさん mailto:sage [2017/09/18(月) 23:29:46.49 ID:45aelXxs.net]
bool f(int n){return n==0 || n == 45;}

493 名前:デフォルトの名無しさん mailto:sage [2017/09/18(月) 23:33:52.62 ID:ILsR+BHw.net]
sed -r -e "s/^(0|45)\$/True/" -e "s/[1-8][0-9]*/False/"

494 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 01:13:30.78 ID:zMNLdsjY.net]
tanの計算しないのはどうかと

495 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 01:57:23.24 ID:Ten4kOds.net]
計算で有理数かどうか確

496 名前:F?
それは非常に難しいな

by 東大数学科卒
[]
[ここ壊れてます]

497 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 02:28:36.10 ID:SyuGyzWY.net]
>>480
そう思うなら他者を批判するより行動で示せばいいと思うよ

498 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 03:58:59.82 ID:KVkpgN/c.net]
tan1°が無理数であることの証明すら面倒くせえのに一体どんな回答を求めているんだ

499 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 06:37:25.45 ID:Ten4kOds.net]
>>483
面倒くさい?
てことは出来るの?
やってみて

500 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 07:41:26.64 ID:KVkpgN/c.net]
>>484
確か京大の過去問にあったでしょう
説明めんどいからは解法は自分で調べて



501 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 08:13:59.26 ID:Ten4kOds.net]
いや、おれは出来るよ

>>483の実力で出来るのか?と疑問に思っただけ
実力じゃなくてカンニングね

502 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 08:21:42.19 ID:KVkpgN/c.net]
何言ってんだこいつ

503 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 08:49:35.38 ID:q1kL6yRz.net]
問題が悪いな

与えられた有理数rに対し、
tan(πr)が有理数かどうか判別するプログラムを書け

ならテーブルは使えない

504 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 09:06:24.19 ID:emxMAzY1.net]
また、多倍長精度演算のないC++にはきつい問題を・・・。

505 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 11:09:01.37 ID:q1kL6yRz.net]
>>488
すいません
結果を知っていたらこれでも簡単でした

506 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 11:10:19.22 ID:q1kL6yRz.net]
>>489
多倍長を使っても解決しないでしょ

507 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 12:53:02.28 ID:RSOddfRB.net]
そもそも出題者はどういう回答を期待してるんだ?
数学の知識無しでは作れないし、数学の知識を使えば>>478になる

508 名前:デフォルトの名無しさん [2017/09/19(火) 14:38:36.12 ID:LvSRuVZD.net]
tan()の加法定理
 tan(α+β)=(tanα+tanβ)/(1-tanαtanβ)
により

もしtan(α)が有理数なら
tan(nα) (n = 1,2,3,4・・・)
も全て有理数

このため
整数nにより
tan(n)が無理数なら
nの約数全てによるtan()が無理数

ここで
tan(60)=√3
が無理数なのは簡単に証明されるため、
tan(1)
も無理数

証明終わり

509 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 14:54:56.80 ID:RSOddfRB.net]
>>476を解くにはあとtan(18度)が無理数であることを証明しないと

510 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 14:55:28.25 ID:RSOddfRB.net]
>>476じゃなくて>>477



511 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 16:11:41.85 ID:HSXd4/vW.net]
>>493
なるほど面白いねw

512 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 19:41:00.46 ID:Ten4kOds.net]
>>493
tan(π/4)は有理数だけど
tan(π/2)は有理数じゃない

513 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 20:13:34.35 ID:KVkpgN/c.net]
tan1(rad)が超越数であることを証明せよ

514 名前:デフォルトの名無しさん [2017/09/19(火) 22:25:08.25 ID:FbLYus+p.net]
>>492
WolframAlphaが
is tan(pi * 1 / 180) a rational number?
→ not a rational number
と返す仕組みを知りたかった

515 名前:デフォルトの名無しさん mailto:sage [2017/09/19(火) 22:57:34.84 ID:Ten4kOds.net]
xが有理数、tan(πx)が有理数 ====> xは1/4の倍数

って覚えてるだけかと

516 名前:デフォルトの名無しさん [2017/09/20(水) 14:48:00.57 ID:jgmli1ek.net]
>>493
は加法定理で(1-tanαtanβ)が0になってはまずいので
0度以上90未満の範囲内に限定しないといけないな。


tan()の加法定理
 tan(α+β)=(tanα+tanβ)/(1-tanαtanβ)
により

もしtan(α)が有理数で、かつ 0 <= nα < 90なら
tan(nα) (n = 1,2,3,4・・・)
も全て有理数

このため
整数 n ( 0 <= n < 90 ) により
tan(n)が無理数なら
nの約数全てによるtan()が無理数

ここで
tan(60)=√3
が無理数なのは簡単に証明されるため、
tan(1)
も無理数

517 名前:デフォルトの名無しさん [2017/09/20(水) 14:51:06.46 ID:jgmli1ek.net]
tan(1)だけじゃなくて
>>477 >>478 も証明できるかな???

つまり整数 n ( 0 <= n < 90 ) において
tan(n)が有理数になるのはn=0,45に限ることの証明

tan(90-n) = 1/tan(n) なので
n ( 0 <= n < 45 ) の範囲で証明されればOK

またtan(45)が有理数で加法定理で減算し
 tan(45-n):有理数 ⇔ tan(n):有理数 ( 0 <= n < 45 )
も成立

518 名前:デフォルトの名無しさん [2017/09/20(水) 14:51:42.84 ID:jgmli1ek.net]
60の約数 はtan(n)無理数
1,2,3,4,5,6,10,12,15,20,30

519 名前:

これの45-n もtan(n)無理数
44,43,42,41,40,39,35,33,25,15

この約数で、まだ含まれていないもの
11,22,21,8,13,7

45-nにより
34,23,24,37,32,38

この約数で、まだ含まれていないもの
17,16,19

45-nにより
28,29,26

この約数で、まだ含まれていないもの
14

45-nにより
31

ここまでの数を並べると
01,02,03,04,05,06,07,08,**,10,
11,12,13,14,15,16,17,**,19,20,
21,22,23,24,25,26,**,28,29,30,
31,32,33,34,35,**,37,38,39,40,
41,42,43,44

9度の倍数の証明のみが残された
[]
[ここ壊れてます]

520 名前:デフォルトの名無しさん mailto:sage [2017/09/20(水) 16:48:28.32 ID:UU/UGcdT.net]
だから>>494と書いたんだけど



521 名前:デフォルトの名無しさん mailto:sage [2017/09/20(水) 21:20:48.49 ID:8kWE0pQL.net]
tan(1 rad)が超越数であることは誰も証明できないの

522 名前:デフォルトの名無しさん mailto:sage [2017/09/20(水) 21:27:13.08 ID:UU/UGcdT.net]
プログラムに証明させる問題?

523 名前:デフォルトの名無しさん mailto:sage [2017/09/20(水) 22:23:37.78 ID:vEoThqNS.net]
なぜラジアン?
話の流れ的にはtan(1度)だろ

524 名前:デフォルトの名無しさん mailto:sage [2017/09/20(水) 22:25:37.42 ID:vEoThqNS.net]
と思ったけど、簡単すぎた

525 名前:デフォルトの名無しさん mailto:sage [2017/09/21(木) 16:21:06.33 ID:na02B6ss.net]
[1] 授業単元名:FizzBuzzクイズ
[2] 問題文(含コード&リンク):
[3] 環境
 [3.1] OS: (Windows/Linux/等々)特に問わない
 [3.2] コンパイラ名とバージョン: (gcc 3.4 VC 6.0等)特に問わない
 [3.3] 言語: (C/C++/どちらでも可 のいずれか)特に問わない

kohada.2ch.net/test/read.cgi/prog/1209467166/401
FizzBuzzクイズ

1.fizz.buzz #=> 1
3.fizz.buzz #=> "Fizz"
5.fizz.buzz #=> "Buzz"
15.fizz.buzz #=> "FizzBuzz"
999.fizz.buzz #=> 999

となるようなメソッドfizz、buzzは定義可能か?
可能である場合、同様にgizzを追加定義し、
7.fizz.buzz.gizz #=> "Gizz"
21.fizz.buzz.gizz #=> "FizzGizz"
35.fizz.buzz.gizz #=> "BuzzGizz"
105.fizz.buzz.gizz #=> "FizzBuzzGizz"
105.fizz.gizz.buzz #=> "FizzGizzBuzz" と拡張・応用ができるか?

メソッドのコールに()が必須の言語では 3.fizz().buzz() 形式でも構わない。
オープンクラス機構やメソッドのない言語では関数(buzz(fizz(3)) #=> "Fizz" など)で。

526 名前:デフォルトの名無しさん mailto:sage [2017/09/21(木) 19:58:51.31 ID:+ykHPOb/.net]
まともに仕様を書けない出題者

527 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 07:02:49.79 ID:aD9oWCn2.net]
これ普通の発想では無理

528 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 07:14:29.33 ID:eEMHecr4.net]
>>509
修正
×999.fizz.buzz #=> 999
○997.fizz.buzz #=> 997

529 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 07:55:33.84 ID:FtjqsiSd.net]
>>509
C++版
https://ideone.com/JdTeeD

530 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 08:00:39.43 ID:pX6TouLp.net]
仕様が謎



531 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 08:13:32.67 ID:FtjqsiSd.net]
>>509
C言語
https://ideone.com/eWR8Pl

532 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 09:43:07.90 ID:eeRMTLx0.net]
外部出力を伴う関数(あるいはメソッド)なら簡単
たぶん関数(あるいはメソッド)の返値がそうなるようにって意味かと
(じゃないと普通に書けてクイズにならない)
たしか数理学的にはこういう関数は書けないことになっていたはず

533 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 12:43:18.77 ID:qmG6L9xB.net]
>>509>>516 みたいなのとは絶対に一緒に仕事をしたくない

534 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 12:43:56.86 ID:qmG6L9xB.net]
別に戻り値にしても大して変わらんけど

535 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 12:51:02.25 ID:qmG6L9xB.net]
C言語だとトリッキーな技を使わないと出来ない
同じ関数名で複数関数を作れないから
2段や3段重ねて、intを受けて文字列を返すのは普通には無理

C++だと簡単
大きく分けて2つの方法がある

C++でも数値によって戻り値の型を変えるのは無理
数値がconstexprで

536 名前:良いなら出来るだろうけど []
[ここ壊れてます]

537 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 14:57:30.68 ID:eEMHecr4.net]
>>513
>int l_ = 3
これ、なんとかならないか?

538 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 16:30:21.56 ID:W1Y66+yK.net]
>>520
関数インターフェース的にはその値を与えることが出来ない

別の関数か何かで変えるかインターフェースを変えるしか

539 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 16:41:43.04 ID:W1Y66+yK.net]
>>516
戻り値を文字列にする方法

方法1
段階によって引数と戻り値の型を変える
S1 fizz(int n);
S2 fizz(S1 s);
std::string fizz(S2 s);
※テンプレートを使うと楽

方法2
戻り値をstd::string固定にしてなんとかする

方法2-1
戻り値は常に結果の文字列にし、パラメーター以外で情報を渡す
方法2-2
文字列に情報をエンコードして入れる
最終型段だけ結果を返すようにする

方法3
戻り値を結果文字列そのままではなく、文字列情報を含む情報とする
(これは反則かな?)

540 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 16:44:03.80 ID:W1Y66+yK.net]
方法2-1であれば >>520の問題は解決する
ただし、そのままだとスレッドセーフじゃなくて気持ち悪い



541 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 16:48:22.63 ID:eEMHecr4.net]
>>509
#=>
これって ruby の記法だったかな?評価値を変えたいようだ

542 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 18:17:47.82 ID:eeRMTLx0.net]
例えばRubyだと文字列を含め組み込み型にインスタンス変数を仕込めるので
たぶんそれで次のメソッドに情報を渡せる

543 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:04:29.86 ID:FtjqsiSd.net]
>>522 の方法2-1
C++版
https://ideone.com/ZavKGg

外部情報は「n」のみ
複数スレッドや割り込みハンドラからコールする時はこのnが問題になるんで
なんとかしてstd::stringに埋め込めれば良いんだけど

>>525
問題を変えちゃダメだよね
> [3.3] 言語: (C/C++/どちらでも可 のいずれか)特に問わない

544 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:08:43.22 ID:FtjqsiSd.net]
8行目、なんとなく文字列から判別してみたけど、
素直にnと同じように外部にフラグを持てば条件が減る
(文字列の最後が数字にならないとか文字コードが連続してるとか)

545 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:09:11.03 ID:pX6TouLp.net]
「(C/C++/どちらでも可 のいずれか)特に問わない」って日本語がまず謎
有限個の具体例しか与えられていないので仕様も謎

546 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:26:24.34 ID:FtjqsiSd.net]
出題者の選択枝が [C/C++/どちらでも可] の3個あって、出題者がその「いずれか」を選ぶ
というフォーマットを使った出題
出題者は回答者に対し『その3個のどれでも良いよ』という意味で「特に問わない」と

と私は解釈した
つまり、回答者の選択枝はCかC++のどちらかだと

出力する文字列のルールはリンク先を見れば大体わかる
gizzが7の倍数かどうかは実際には不明で、実は14で割ると7余る数かもしれないが...

リンク先に「プリントする」とあるので
printfなどで標準出力に出せば良いのかと思ったが、
>>516の解釈は違うらしい

数値の場合だけ""でくくってないので、
文字列の場合は""をくっつける必要があるのか、
型を変えろと言っているのかはよくわからん
いずれにしろ、CやC++では値によって戻り値の型を変えるのは不可能

547 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:32:11.08 ID:FtjqsiSd.net]
いずれにしろ、
>>510 >>514 >>517

548 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:33:47.07 ID:eEMHecr4.net]
>>529
>回答者の選択枝はCかC++のどちらかだと
いや、そうじゃなくて、本当に「特に問わない」、どういったらいいかな、このテンプレはC宿題スレのものを、そのまま頂戴しただけじゃない?

549 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:36:43.23 ID:FtjqsiSd.net]
>>531
君は出題者なのか?違うのか?
立場をはっきりと

550 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:39:18.64 ID:FtjqsiSd.net]
出題者なら0点



551 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:43:00.43 ID:pX6TouLp.net]
>>529
なるほど
.gizzは、与えられた数字に対してfizzbuzzが数字になるなら"Gizz"、
それ以外の場合は所定の位置(説明省くけど)に"Gizz"を挿入するものなのかと思ってたわ

552 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:51:22.72 ID:FtjqsiSd.net]
確かに
7の倍数じゃなくて1の倍数でも良いよな
たまたま >>509 の例がすべて7の倍数になってただけで

この場合、上にあげた3個のコードいずれも
7 を 1 に変えてくださいな

553 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 19:54:43.95 ID:FtjqsiSd.net]
そろそろ
出題者の模範解答
よろしくね

554 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 20:00:08.36 ID:eEMHecr4.net]
え゛
0点の出題だしー模範解答の質も推して知るべし、なんじゃないでしょうか……:−)

555 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 20:35:12.69 ID:aD9oWCn2.net]
>>526
↓この但し書きがあるってことは、問題作成者(≠出題者)としてはC/C++限定とは考えてはいないだろう

> メソッドのコールに()が必須の言語では 3.fizz().buzz() 形式でも構わない。
> オープンクラス機構やメソッドのない言語では関数(buzz(fizz(3)) #=> "Fizz" など)で。

そもそもここで出題する時点で [3] の縛りは意味をなさないよ

556 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 20:43:54.80 ID:W1Y66+yK.net]
>>509に書いてある以上は、それに従うのが基本

557 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 20:47:11.96 ID:W1Y66+yK.net]
と思って私は回答しましたが、
他の人が他の解釈で回答することまで否定はしません

558 名前:デフォルトの名無しさん mailto:sage [2017/09/22(金) 20:47:48.19 ID:W1Y66+yK.net]
ということで、
>>538 よろしく!

559 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 03:26:09.79 ID:nBwtcNcI.net]
>>509 Ruby >>525の方針で
https://ideone.com/B6E8ig

560 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 05:00:15.00 ID:FxaWa0db.net]
>>509 F#
https://ideone.com/svYTTM



561 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 09:40:19.02 ID:9eQI4Qct.net]
>>509
@Mathematica

https://ideone.com/oC0nu7

入力値(n)をリストにして次の関数に渡さないとダメポ

562 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 11:10:41.17 ID:koNmB6po.net]
PerlやPythonは?

563 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 11:25:56.13 ID:7PRDVMsP.net]
ネタバレになるけど
このクイズはグローバル変数を使えばそれで済んでしまうシンプルな話なんだけど、それをあえて
- 各言語の機能を熟知・駆使して、面白くしたりひと工夫したりする(たとえばスレッドセーフとか)
- 前者のしくみと、7の倍数のgizzの拡張に必要な追加を最小限にすることを両立させる
というポイントが楽しみどころなんじゃないかな

564 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 11:29:36.36 ID:w6RxEhSu.net]
>>509
https://ideone.com/4p67HE
C++。題意は満たしてないけど、自分が書くとこんな感じだな。
末尾判定難しい。

565 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 17:45:33.07 ID:tyQvRaHd.net]
>>509
>>536

>>524>>547 の方法を想定
Java: https://ideone.com/i8wMea

566 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 17:47:47.85 ID:tyQvRaHd.net]
× >>524 >>547
>>524 >>542

567 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 18:26:18.44 ID:80k6Tqnu.net]
関数の入出力の型が同一である必要がある
Cならintをchar*と解釈するわけにいかないから構造体だろう

568 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 22:30:47.29 ID:PEiEI8OX.net]
スレッドローカル変数で
書いてみている

569 名前:デフォルトの名無しさん mailto:sage [2017/09/23(土) 22:51:39.70 ID:PEiEI8OX.net]
>>509 Squeak Smalltalk だけどなんとか >>547 っぽい方法で

| FizzBuzzQuiz |
FizzBuzzQuiz := Trait named: #FizzBuzzQuiz uses: #() category: 'FizzBuzz-Quiz'.
FizzBuzzQuiz compile: 'isDivisibleBy: m
  ^(Processor activeProcess environmentAt: #

570 名前:fbValue) isDivisibleBy: m'.
FizzBuzzQuiz compile: ', str Processor activeProcess environmentAt: #fbValue put: self. ^str'.

FizzBuzzQuiz compile: 'fizz ^(self isDivisibleBy: 3) ifTrue: [self, ''Fizz''] ifFalse: [self]'.
FizzBuzzQuiz compile: 'buzz ^(self isDivisibleBy: 5) ifTrue: [self, ''Buzz''] ifFalse: [self]'.

{Number. String} do: [:each | each uses: FizzBuzzQuiz].

1 fizz buzz. "=> 1 "
3 fizz buzz. "=> 'Fizz' "
5 fizz buzz. "=> 'Buzz' "
15 fizz buzz. "=> 'FizzBuzz' "
14 fizz buzz. "=> 14 "

FizzBuzzQuiz compile: 'gizz ^(self isDivisibleBy: 7) ifTrue: [self, ''Gizz''] ifFalse: [self]'.

7 fizz buzz gizz. "=> 'Gizz' "
21 fizz buzz gizz. "=> 'FizzGizz' "
35 fizz buzz gizz. "=> 'BuzzGizz' "
105 fizz buzz gizz. "=> 'FizzBuzzGizz' "
105 fizz gizz buzz. "=> 'FizzGizzBuzz' "
[]
[ここ壊れてます]



571 名前:デフォルトの名無しさん mailto:sage [2017/09/24(日) 08:25:43.37 ID:wOaJDXIV.net]
>>552
×>>547 っぽい方法で → ○>>542 っぽい方法で

572 名前:デフォルトの名無しさん mailto:sage [2017/09/24(日) 08:49:01.13 ID:wOaJDXIV.net]
>>509 Ruby >>542>>552 と同様の手法でリファイン
https://ideone.com/2EsoeT

573 名前:デフォルトの名無しさん mailto:sage [2017/09/25(月) 19:17:51.82 ID:WU5gUeBt.net]
>>509 c
https://ideone.com/oAsiG2
・構造体つこうた
・gizzの「追加定義」については簡易解釈

574 名前:デフォルトの名無しさん mailto:sage [2017/10/15(日) 20:26:14.16 ID:12RNBD+4.net]
過去問を眺めていたが、もっとお気楽な問題が多かったようですね
肩慣らし問題を一つ

問題
循環小数を有理数に直せ。
循環節は括弧をつかって表現する。


0.[555] = 5/9
0.3[33] = 1/3
12.[345] = 4111/333
1.2[34] = 611/495

575 名前:デフォルトの名無しさん mailto:sage [2017/10/15(日) 21:45:12.25 ID:IPnwHMWa.net]
連分数を使うのかね

576 名前:デフォルトの名無しさん mailto:sage [2017/10/15(日) 23:12:59.97 ID:Y75uJW9z.net]
>>556 Java
https://ideone.com/QkUwMu

577 名前:デフォルトの名無しさん mailto:sage [2017/10/17(火) 15:01:04.33 ID:qd6dTZ1I.net]
循環小数は有理数な訳だが

578 名前:デフォルトの名無しさん mailto:sage [2017/10/17(火) 16:22:17.58 ID:kN20YVKE.net]
0.[555] = 0.[5] = 5/9
0.3[33] = 0.[3] = 3/9
12.[345] = 12+345/999
1.2[34] = 1.2+34/990

579 名前:デフォルトの名無しさん mailto:sage [2017/10/17(火) 18:47:49.98 ID:ELG/Hivs.net]
てすと

580 名前:デフォルトの名無しさん [2017/10/18(水) 11:15:59.21 ID:xwRaz5Kx.net]
>>560
おお。そういう法則で行けるのか。
きっと数学では大昔に証明されてるんだろうけど知らなかった。(または忘れたのかなあ?)



581 名前:デフォルトの名無しさん [2017/10/18(水) 11:35:57.38 ID:bG8m3FQp.net]
ああ。なんとなくわかった。10の桁数乗の値で割るとそっくりそのまま小数点以下になるが
1足りないから循環するのか。ああ、しかし、数学的にどう表現したらいいかわからない。w

582 名前:デフォルトの名無しさん mailto:sage [2017/10/18(水) 15:51:59.37 ID:+Osy4cjh.net]
お題:顔文字(^o^)があります。この(^o^)を左右に動かしながら出力します。(^o^)は左から右へ一文字ずつ動き、端に到達した瞬間だけ(^o^)から(>_<)に変化し、また(^o^)に戻って左端へ行き、同じように繰り返します。
端から端までは最初80文字分の幅がありますが、(^o^)が端に達した回数だけ1文字ずつ狭くなっていき、最終的に(^o^)の端まで狭くなり、(^o^)が動けなくなります。(^o^)が動けなくなったらプログラムを終了してください。

583 名前:デフォルトの名無しさん [2017/10/18(水) 17:36:32.86 ID:jSYDae9q.net]
>>564 Bash (builtins)
https://ideone.com/KFko4s

幅80文字だと出力が長くなりすぎて途中で切られるので50文字にしました。

584 名前:デフォルトの名無しさん mailto:sage [2017/10/18(水) 19:53:42.77 ID:4F2aMcKp.net]
ウインドウズでエスケープシーケンス扱うのにおまじないいるからメンドクセー。

585 名前:デフォルトの名無しさん [2017/10/18(水) 21:05:28.73 ID:xwRaz5Kx.net]
>>564
改行せずにカーソルを先頭に戻すのは CR (13) の出力で良いのか?
それとも curses ライブラリを使うべき

586 名前:ゥ? []
[ここ壊れてます]

587 名前:デフォルトの名無しさん mailto:sage [2017/10/19(木) 01:56:08.11 ID:Lj1i7npR.net]
>>567
好きな方をどうぞ
curses使うのはいいですね
こちらからは見れませんが

588 名前:デフォルトの名無しさん [2017/10/19(木) 03:35:28.31 ID:CNJYIyj0.net]
じゃ、とりあえず CR 出力版。Perl プログラム。
但し、待ち時間入れないと速すぎて見えないので適当に usleep を入れた。
テストした環境は Linux で端末は Windows の TeraTerm。
TERM=xterm の状態。

但し、プログラムを貼り付けたサイト(paiza.io)での出力はおかしくなる。
何故なら端末として動いてないから。
試したい場合はプログラムをコピーして自分の環境のエディタ等にペーストして保存後に実行して。

https://paiza.io/projects/rQDCQizcsrydlcrkxylR1w

589 名前:デフォルトの名無しさん mailto:sage [2017/10/19(木) 05:11:39.88 ID:sgSfn4oM.net]
>>564
https://ideone.com/dakfBb
C++。改行でやってみた。ちょっと汚い。

590 名前:名無しさん@そうだ選挙に行こう! Go to vote! mailto:sage [2017/10/22(日) 11:49:54.00 ID:/Umsqxkx.net]
お題:A〜Z、1〜9で出来たランダムな文字列がある(文字列はプログラム開始時に自動的に決めてよい)
キーを2つ決めて(←→キーが自然かも)例えば→キーを押すと、文字列のうち2〜9があるか
どうかを調べ、あればそのうち一つをランダムに選び、数字を一つ減らし(9なら8へ)、左右ランダムに
1を置く
つまり2以上の数字文字があればそこがゴムのような役目をして文字列が伸びる
全部の数字文字が1になったら何もしない

逆に例えば←キーを押すと、文字列のうち1〜8があるかどうかを調べ、そのうちランダムに一つを
選び、その左右どちらかに数字文字がないかを調べ、足した合計が9を超えないようなら足し合わせて
数字文字をその合計値にし、文字列を1つ縮める
足し合わせた合計が9を超えるようなら他の数字文字もランダムに同様に一つ選び、足し合わせて
9を超えない数字文字の部分が見つかったらそれを一つだけ足し合わせて縮める

全部の数字文字が9になるか、9に満たないが足し合わせると9を超えるようになったら何もしない



591 名前:デフォルトの名無しさん mailto:sage [2017/10/23(月) 04:21:48.29 ID:sHZ1Pe4U.net]
>>571
https://ideone.com/pjZbOc
C++。デバッグ難しくてやる気がしないのでバグってるかも。
カーソルキー取るの面倒だからASキーにしておいた。
こんな感じでいいのか?

何のシミュレータかしらんけどめんどくせーな。

592 名前:デフォルトの名無しさん mailto:sage [2017/10/23(月) 04:35:24.25 ID:sHZ1Pe4U.net]
あ、それと、文字列で計算するのめんどくさかったから、数字でやった。
そっち事情なんか知ったこっちゃない。

593 名前:デフォルトの名無しさん [2017/10/23(月) 05:46:30.69 ID:iFI38Dlw.net]
%%%%1000%%%%

000-[HUM%58*73.1\%]/2I/3NM/61.3SNMK%?%3%51.22222222222221%
001-[[[%6/4$17.6135412α3]]]]+DOM+SIL+7%
002-UML7%[61.2[31.5[!%32∂LM17.36%!16.3!%<<<%!HSTOL7%!Q!S!=3m=<2TOL<3Q9A<2.1GHz%,DOK,HAOARA,
003-[[[HEMLOT47[<\41.2%Q,===>[MLS<DPNO<\2.3>#ESOLA!5%!3MLA!>LTOSA>7TONSA>%>%end

594 名前:デフォルトの名無しさん mailto:sage [2017/10/23(月) 17:28:50.67 ID:f/2PkHQ/.net]
>>574
全く読めねぇw

595 名前:デフォルトの名無しさん mailto:sage [2017/10/23(月) 20:53:32.54 ID:burVCZw1.net]
ランダムの分布は指定なし?

596 名前:デフォルトの名無しさん mailto:sage [2017/10/23(月) 23:01:59.68 ID:sHZ1Pe4U.net]
いろ

597 名前:んなところでたまに見かけるけど、>>547 ってPGなの? []
[ここ壊れてます]

598 名前:デフォルトの名無しさん mailto:sage [2017/10/24(火) 06:49:36.20 ID:kt50Dt6N.net]
PGとは?

599 名前:デフォルトの名無しさん mailto:sage [2017/10/24(火) 07:14:59.91 ID:Ohc+APnW.net]
プロパンガス

600 名前:デフォルトの名無しさん mailto:sage [2017/10/24(火) 08:55:25.49 ID:TzjXrYm3.net]
パーフェクトグレイド



601 名前:デフォルトの名無しさん mailto:sage [2017/10/24(火) 11:04:02.33 ID:2qWQgTrR.net]
>>575>>577
>>574はvbsウィルスの一部だよ
つまりワクチンソフトに引っかかるとこのログが検疫されるので注意

602 名前:デフォルトの名無しさん mailto:sage [2017/10/24(火) 21:14:43.61 ID:6ceRFBNE.net]
>>581
さんくす。

603 名前:デフォルトの名無しさん [2017/10/25(水) 20:13:14.36 ID:gieh1Z5o.net]
お題
())())のように括弧のみからなる文字列が与えられるので
すべての括弧が正しく対応付けされるためには
最低で何箇所の括弧を逆向きに変更すればよいか求めよ
例えば上の例では2文字目か3文字目を変更すればよいので1を出力せよ
何文字変更しても正しく対応付けできない場合は-1を出力せよ

) -> -1
())()) -> 1
)()()( -> 2
)))((( -> 4
(())())((())(()( -> 3
())((())()))()(((()))()((((((((()()(())) -> ?

604 名前:デフォルトの名無しさん mailto:sage [2017/10/25(水) 21:21:26.00 ID:/TQ9iqwZ.net]
>>583 Java
https://ideone.com/Oca2HR

605 名前:デフォルトの名無しさん [2017/10/26(木) 00:42:38.67 ID:0Gn/TXrF.net]
>>583
Ruby
https://ideone.com/wQA5TN

606 名前:デフォルトの名無しさん mailto:sage [2017/10/26(木) 07:09:40.17 ID:vEkFybta.net]
>>583
https://ideone.com/OkCwgQ
C++。効率とかショートコーディングとかそういうものをかなぐり捨ててべた書き。
あってるかな?

607 名前:デフォルトの名無しさん mailto:sage [2017/10/26(木) 08:33:36.44 ID:8oLfrbud.net]
おむ

608 名前:デフォルトの名無しさん mailto:sage [2017/10/26(木) 08:35:57.56 ID:8oLfrbud.net]
誤爆
>>583 Ruby

def calc str
return -1 if str.size.odd?
ary = optimise str.scan(/(?=.)(\(*)(\)*)/).map{|a, b| a.size - b.size}
(-ary[0] + ary[1].to_i).abs/2 + ary[0]%2
end

def optimise ary
a = ary.reject(&:zero?).chunk(&:positive?).to_a.transpose[1].map(&:sum)
return a if a.size < 3
a.unshift(0) if a[0] < 0
optimise a.each_slice(2).map(&:sum)
end

STR = %w{
)
())())
)()()(
)))(((
(())())((())(()(
())((())()))()(((()))()((((((((()()(()))
}

STR.each{|s| puts "%s -> %d"%[s, calc(s)]} #=>
) -> -1
())()) -> 1
)()()( -> 2
)))((( -> 4
(())())((())(()( -> 3
())((())()))()(((()))()((((((((()()(())) -> 5

609 名前:デフォルトの名無しさん mailto:sage [2017/10/26(木) 19:12:02.71 ID:MqWL4ZqL.net]
>>583 ruby
https://ideone.com/jGTfL3

610 名前:デフォルトの名無しさん mailto:sage [2017/10/27(金) 22:31:59.57 ID:sfTuRN3o.net]
>>583
@Mathematica

https://ideone.com/19n4r2



611 名前:デフォルトの名無しさん mailto:sage [2017/11/04(土) 00:05:20.36 ID:4+O3ouw4.net]
Quineの派生ということで、コードそれ自身を反転させたものを出力せよ
反転とは文字列"abc\ndef"を"fed\ncba"にすること

612 名前:デフォルトの名無しさん mailto:sage [2017/11/04(土) 01:52:41.37 ID:P09Vk2Mx.net]
数列 6,66,666,6666,66666.....
これをダミアン数列と呼ぶことにしましょう

nを自然数としたときn^n(^はべき乗)の桁数(10進数で)が
ダミアン数列のどれかになることはあるか?
初歩的な計算で7^7=823543が6桁になることがわかります

問 このような不吉な数は
    7のみである
    有限個存在する
    無限に存在する

ここまで書いてみたけどこの問題だとプログラミングのお題じゃないね
数論で解けるのかなあ?

改めてお題
ダミアン数列の最初の10項につながる不吉な自然数はあるか、あるとすれば
その数はいくつ

613 名前:

力技では時間が掛かりすぎると思うので工夫してみてください
[]
[ここ壊れてます]

614 名前:デフォルトの名無しさん [2017/11/04(土) 03:18:31.96 ID:RXqoYVvx.net]
意味不明

615 名前:デフォルトの名無しさん mailto:sage [2017/11/04(土) 03:39:51.41 ID:pxF/c+yt.net]
>>591
https://ideone.com/1bQnxO
C++。VCオンリー。
ウニコード対応しようと思って色々やってたけど、なんかうまくいかねー。
一応VCではうまくいってるっぽいけど、GCCと共通のコードはまだ規格的にきつそうだ。
うへー。大変だったわ。やっぱ、文字列は鬼門。

616 名前:デフォルトの名無しさん mailto:sage [2017/11/04(土) 04:34:35.38 ID:tUO6oLmA.net]
>>592 Java
https://ideone.com/furdsD

617 名前:デフォルトの名無しさん mailto:sage [2017/11/04(土) 08:04:59.76 ID:bqd73Ayh.net]
>>591 Squeak/Pharo Smalltalk

thisContext method getSource reversed allButLast: 8

"=> '8 :tsaLtuBlla desrever ecruoSteg dohtem txetnoCsiht' "

618 名前:デフォルトの名無しさん mailto:sage [2017/11/04(土) 10:09:48.41 ID:VZ1zDZPp.net]
>>591 ruby
https://ideone.com/k9nGSp

619 名前:デフォルトの名無しさん mailto:sage [2017/11/05(日) 14:54:08.02 ID:rWIlHQ+T.net]
>>597 ruby
d="]esrever.d,d[%'d=p%;s%' stup";puts '%s;%p=d'%[d,d.reverse]
#=> ]esrever.d,d[%'d=p%;s%' stup;"puts '%s;%p=d'%[d,d.reverse]"=d

620 名前:デフォルトの名無しさん mailto:sage [2017/11/05(日) 14:54:35.06 ID:rWIlHQ+T.net]
安価ミスったorz



621 名前:デフォルトの名無しさん mailto:sage [2017/11/05(日) 22:47:04.05 ID:Pt23fyK7.net]
>>595
2で割らずにシフトしてたり芸が細かいですな

622 名前:片山博文MZ mailto:sage [2017/11/07(火) 23:38:24.35 ID:BS6pey7a.net]
お題。ツイッターのフォロワーを使ってお金を稼ぐ具体的な方法を思い付く限り列挙せよ。

623 名前:デフォルトの名無しさん mailto:sage [2017/11/07(火) 23:48:06.18 ID:aP9yM4om.net]
やだ。

624 名前:デフォルトの名無しさん mailto:sage [2017/11/08(水) 00:39:27.61 ID:z/y1zyUv.net]
プログラミングに関係ないお題は却下

625 名前:デフォルトの名無しさん [2017/11/08(水) 20:48:53.00 ID:XbOytUUT.net]
片山博文MZってコジキなのか?

626 名前:デフォルトの名無しさん mailto:sage [2017/11/13(月) 00:48:07.30 ID:PHmyYrtX.net]
コジキっていうか、頭の弱い子

627 名前:デフォルトの名無しさん mailto:sage [2017/11/14(火) 21:49:31.73 ID:yEmE0LhS.net]
コード中でa-zA-Z0-9の文字を一切使わずに
Hello World!!
と出力せよ。
"!"の後ろの改行の有無は問わない。

628 名前:デフォルトの名無しさん mailto:sage [2017/11/14(火) 22:13:39.71 ID:1d5ZohBo.net]
>>606 whitespace

629 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 00:12:32.03 ID:ckRbh5hb.net]
前にも見たなぁ。

630 名前:デフォルトの名無しさん [2017/11/15(水) 00:21:09.60 ID:edbITJRa.net]
>>606
それじゃプログラム組めないと思うんだが、記号だけの言語みたいなの使えってこと?



631 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 00:30:14.08 ID:au/IFdC5.net]
>>606 bhnjdsbkjdsb
_

632 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 00:31:44.60 ID:ckRbh5hb.net]
iostreamがすでにアウト。

633 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 01:21:11.75 ID:f03ykBDy.net]
>>606

634 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 01:21:50.26 ID:f03ykBDy.net]
>>606 Ruby
https://ideone.com/z4vm4F
perlとjavascriptでも殆ど同じことができる

635 名前:デフォルトの名無しさん [2017/11/15(水) 01:23:33.97 ID:0AqsUHvD.net]
今日は七五三ということで
7,5,3,+,-,×,÷,(),^2を使った式(ただし7,5,3は一個しか使えない)で1から連続でいくつまで数を作れるか

1=3+5-7
2=5-3
3=3
4=(5-3)^2
5=5
6=(7-5)×3


636 名前:デフォルトの名無しさん [2017/11/15(水) 06:25:11.32 ID:21MTGrxx.net]
^2 もありですか

637 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 11:19:06.80 ID:+wQkBp8E.net]
>>613
回答見てもわからない
どういうこと?

638 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 11:36:08.43 ID:cnBo ]
[ここ壊れてます]

639 名前:JhFE.net mailto: >>606
Ruby で、

unpacked = "Hello World!!".unpack("c*")
p unpacked
#=> [72, 101, 108, 108, 111, 32, 87, 111, 114, 108, 100, 33, 33]

packed = unpacked.pack('c*')
puts packed
#=> Hello World!!
[]
[ここ壊れてます]

640 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 11:46:46.76 ID:f03ykBDy.net]
>>616
特殊変数$$から1を作ってそれをもとに2, 4, 8, 16などを作る
"%c"を繰り返したものをあらかじめ作っておき
そこに上記の数字で作った"Hello World!!"の文字コードをsprintフォーマットする
標準出力を表す特殊変数$>に<<メソッドでできた文字列を出力する

あとは 「"" << 文字コード」で「文字コード.chr」と同様の結果が得られるので適宜利用すると便利



641 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 12:14:35.50 ID:GYwcr8MQ.net]
>>617の間抜けさ加減に草

642 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 13:25:57.72 ID:YypYHZ3m.net]
>>614
^2 は
int sqr(int n){return n*n;}
みたいな関数が使えるって意味だよね

つまり、
x^2^2 とかは (x^2)^2 の意味で使うなら可能ってことだよね

643 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 13:32:50.33 ID:+wQkBp8E.net]
>>618
記号で1を作って、数値、文字コード、文字列としてくのか
いろんな省略記法も知らないとできないな
解説ありがとう

644 名前:デフォルトの名無しさん mailto:sage [2017/11/15(水) 19:03:12.96 ID:vzgZy9E8.net]
>>614
5と3を繋げて53にするようなこともしていいの?

645 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 00:18:43.09 ID:/xRbPsNU.net]
計算部は書いたけど、元の表記で何算してるか表記するのが面倒だ。
あと、遅い・・・。

646 名前:デフォルトの名無しさん [2017/11/16(木) 00:24:47.24 ID:IIofg8Am.net]
73/5=14とかは駄目だよね?

647 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 01:59:04.45 ID:/xRbPsNU.net]
>>614
https://ideone.com/k7hAtB
C++。
それとなく書いてみたけど、誤差でまくり。割り算鬼門すぎる。
多分バグってる。あと、題意理解してない可能性が微レ存。

648 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 02:00:39.12 ID:/xRbPsNU.net]
あ、そうだ。
カッコの処理がバグバグだったからカッコ使わなかった。

649 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 02:11:42.94 ID:/xRbPsNU.net]
うーむ・・・。なんていうか。。。
ギブアップだ。Orz

650 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 11:38:12.54 ID:clS3oGAP.net]
>>625
「題意理解してない可能性が微レ存」どころじゃねえだろこれww



651 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 14:11:34.74 ID:9+S8V57k.net]
整数の範囲でも有理数の範囲でも答えが変わらないからつまらん

一旦非整数を経由しないと作れないのがないとやっぱり...

652 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 15:03:27.99 ID:/xRbPsNU.net]
>>628
可笑しいところ教えて!

653 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 15:46:11.61 ID:9+S8V57k.net]
(3^2)^2 = 3^4
((3^2)^2)^2 = 3^8
だから、3^(2*3) とかやっちゃダメだろ

あと、
3×5÷7 = 15÷7 ≠ 2

654 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 15:59:11.96 ID:/xRbPsNU.net]
>>631
あー、俺がタコでした。
まぁ、前段は表示系の問題だと思うお。
後者は割り算が全部悪い。
浮動小数で比較したくないんだよなぁ。悩ましい。

655 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 16:39:35.92 ID:9+S8V57k.net]
有理数クラスを作るのだ

656 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 17:43:36.30 ID:/xRbPsNU.net]
有理数の法則がよくわかってないし、デカイ。
ままならんなー。

657 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 18:03:35.37 ID:9+S8V57k.net]
(a/b) + (c/d) = (ad + bc) / bd
(a/b) - (c/d) = (ad - bc) / bd
(a/b) * (c/d) = ac / bd
(a/b) / (c/d) = ad / bc
(a/b) = (c/d) <===> ad = bc

分子 : 整数
分母 : 0以外の整数

658 名前:デフォルトの名無しさん mailto:sage [2017/11/16(木) 21:25:39.77 ID:/xRbPsNU.net]
数学ムズイ。。。
PGも算数で解いてるからな。

659 名前:デフォルトの名無しさん mailto:sage [2017/11/17(金) 00:16:40.63 ID:5DUWZGJy.net]
紙とペ

660 名前:ンで考えてみたところ
0以外の任意の整数なら3,5,7で表わせるから問題として不適なのでは?
[]
[ここ壊れてます]



661 名前:デフォルトの名無しさん mailto:sage [2017/11/17(金) 00:20:03.76 ID:M2EFWWXH.net]
17

662 名前:デフォルトの名無しさん [2017/11/17(金) 10:03:52.61 ID:oe8UBfUe.net]
>>637
3,5,7は1回までって回数制限があるから
表せる数は限られるよ。

663 名前:デフォルトの名無しさん mailto:sage [2017/11/17(金) 10:44:12.02 ID:a6b9gyRQ.net]
17が出来ない

664 名前:デフォルトの名無しさん mailto:sage [2017/11/17(金) 19:35:00.15 ID:5DUWZGJy.net]
ああ、本当だ。17はどうやっても作れないね
しかしこれをどうやってコードで計算すんだろう
^2があるから全探査はできないし
自分は「+または-」をいくつ使うかで場合分けして一個一個可能性を消していったんだけれども

665 名前:デフォルトの名無しさん mailto:sage [2017/11/17(金) 20:04:40.56 ID:M2EFWWXH.net]
コードはアップしないけど出来たよ

666 名前:デフォルトの名無しさん mailto:sage [2017/11/17(金) 20:07:16.14 ID:M2EFWWXH.net]
独自有理数クラス

演算回数を1回ずつ増やしていって、
出来た値に対応するフラグをセット

667 名前:デフォルトの名無しさん mailto:sage [2017/11/17(金) 20:09:06.68 ID:M2EFWWXH.net]
数値をstd::multisetで保持
演算n回目のmultisetをstd::setで保持

668 名前:デフォルトの名無しさん [2017/11/18(土) 17:51:34.79 ID:6foiYhRZ.net]
ABC4D
-E3FG
-----
77777

A〜G は、1〜9 の異なる数字。
ただし、3, 4 ではない

669 名前:デフォルトの名無しさん mailto:sage [2017/11/18(土) 17:56:36.72 ID:R4dFDjUs.net]
はい、そうですか。

670 名前:デフォルトの名無しさん mailto:sage [2017/11/18(土) 19:08:28.21 ID:8fhXEikQ.net]
>>645 Java
2年前の問題と俺の回答
peace.2ch.net/test/read.cgi/tech/1429195275/451

を改造したもの (50-54行目と標準入力)
https://ideone.com/2chU62



671 名前:デフォルトの名無しさん mailto:sage [2017/11/18(土) 19:44:36.57 ID:oFg54zrO.net]
>>645 Ruby
f = ->a, b, c, d, e, f, g{10000*a + 1000*b + 100*c + d - (1000*e + 10*f + g) == 78037}
[1, 2, 5, 6, 7, 8, 9].permutation{|a| puts "%d%d%d4%d - %d3%d%d == 77777" % a if f[*a]}
#=>87142 - 9365 == 77777

672 名前:デフォルトの名無しさん mailto:sage [2017/11/18(土) 20:40:01.77 ID:6foiYhRZ.net]
>>647
何も、そこまで作り込まなくても良いだろw

色々な覆面算に対応するため、汎用的に書いたのか

673 名前:デフォルトの名無しさん [2017/11/19(日) 22:39:02.74 ID:oda4btU4.net]
500, 100, 50, 10, 5, 1円のすべての種類の硬貨を、1枚以上使って、
合計15枚で750円にする時、10円硬貨は何枚になるか?


A〜E の5人のランナーが走った結果、
完走したのは、1着とべべの2人で、残りの3人は、途中で棄権した

ここで、完走した2人は、必ず真実を言い、
棄権した3人は、必ず嘘をつくものとする
(つまり、事実に対して、真偽値を取る)

A: D は棄権した
B: A は、べべだった
C: E は棄権した
D: C は、べべだった
E: B は完走した

A〜Eがこのように答えた時、1着は誰か?

674 名前:デフォルトの名無しさん mailto:sage [2017/11/20(月) 01:25:03.39 ID:Z32/GYkn.net]
先に答えやそれに至る式がわかっててコードに書き直すだけになっちゃうから
数学的に道筋立てて答えが出せるものはあんまりおもしろくないんだよな

675 名前:デフォルトの名無しさん mailto:sage [2017/11/20(月) 03:34:46.27 ID:GkhyFhEh.net]
アルゴリズムとは、数式の完全コピー

最初に、数式を考えて、その数式が間違っていれば、
撃墜モードでは、そこを突かれて撃墜される

結局、数式の証明が大事。
証明に、勘違いが無いかどうか

676 名前:デフォルトの名無しさん mailto:sage [2017/11/20(月) 11:24:27.08 ID:7i/OQPcC.net]
べべってなんぞ?

677 名前:デフォルトの名無しさん mailto:sage [2017/11/20(月) 11:38:36.82 ID:OJcNabXy.net]
>>653
たぶんこの場合は大阪の方言

678 名前:デフォルトの名無しさん mailto:sage [2017/11/20(月) 11:45:30.45 ID:7i/OQPcC.net]
俺地方の人間だからわかんない。

679 名前:デフォルトの名無しさん mailto:sage [2017/11/20(月) 18:24:16.80 ID:Slkhafwt.net]
べべって最下位のことじゃないか
どべ

680 名前:デフォルトの名無しさん [2017/11/21(火) 23:50:05.58 ID:zUV8sDjk.net]
>>645
こんなのどうかな。Kotlin で作った。
https://paiza.io/projects/ObrsYN_Z7G44yy-pOlZh_Q



681 名前:デフォルトの名無しさん [2017/11/23(木) 10:05:44.85 ID:zWeuVerg.net]
お題
1から99を表示する
お題:1から999を出力する

ただし0を含む数は除く

682 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 10:11:40.40 ID:TrZHjzbP.net]
>>658
1000.times{|i|p i unless i.to_s[?0]}

683 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 12:15:31.91 ID:6AL/1aep.net]
>>658 GNU Smalltalk

1 to: 999 do: [:n | (n asString includes: $0) ifFalse: [n displayNl]]

684 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 12:38:42.26 ID:KUvGqrz8.net]
>>658 F#

let () = seq { 1..999 } |> Seq.iter (printfn "%d")

685 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 12:40:24.86 ID:KUvGqrz8.net]
>>661
すまん、問題よく読んでなかった・・・

686 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 13:30:23.43 ID:jBvfUrCY.net]
>>658
https://ideone.com/unKY2z
C++。ほかの言語だと一行で書けるんだけどなぁ。
まぁ過去に比べれば大分短くなったけど。

687 名前:デフォルトの名無しさん [2017/11/23(木) 15:45:02.09 ID:ys+VuKpG.net]
>>658
文字も数もその場に合わせて適当に解釈してくれる言語だと楽だね。
perl だとこれでできる。

for(1..999){print"$_\n"unless(/0/)}

688 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 16:16:10.88 ID:JcpJJmmU.net]
>>658
@Mathematica

nListWithoutZero[n_]:=n//
 Range[1,#]&//
 Map[ToString,#]&//
 StringCases[#,RegularExpression["^(?!.*0).*$"]]&//
 Flatten;

In[1] := nListWithoutZero[999]
Out[1] = (略)

689 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 16:34:54.15 ID:2sNCCDGP.net]
>>658
ダメだお題の意味がわからん
降参

690 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 16:42:00.54 ID:QTAUjuBR.net]
>>658 rust
https://ideone.com/NFrvi7
fn main() {
println!("{:?}", (1..1000).filter(|i| !i.to_string().contains("0")).collect::<Vec<_>>())
}



691 名前:デフォルトの名無しさん [2017/11/23(木) 16:46:25.38 ID:ys+VuKpG.net]
>>658
Kotlin で文字列変換してやる場合

fun main(args: Array<String>) {
 for (i in 1..999)
  if (! i.toString().contains('0', false))
   println(i)
}

数値のままやる場合

fun main(args: Array<String>) {
 for (i in 1..999)
  if (i % 10 != 0
     && (i < 10 || i / 10 % 10 != 0)
     && (i < 100 || i / 100 % 10 != 0))
    println(i)
}

692 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 17:05:13.53 ID:fGVRHt7J.net]
>>658
>>668 同じく数値のままやる場合
https://ideone.com/xySZgM

693 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 17:08:37.18 ID:fGVRHt7J.net]
rio2016.2ch.net/test/read.cgi/math/1510671832/722
お題:
n^2-1 = m^5
を満たす自然数 n, m は存在するか?

存在するという人と存在しないという人の両方が存在します

694 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 17:18:38.32 ID:TrZHjzbP.net]
>>670
(n, m) = (1, 0)
揚げ足取りはおいておいて、プログラミングで説く問題じゃないよね

695 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 18:35:09.23 ID:zveldNvP.net]
>>658
python

今回は必要ないかもだけど桁数増えた場合を考え再帰で
https://ideone.com/WC8Ksm

696 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 19:09:48.15 ID:fGVRHt7J.net]
>>671
まあ自明な解はさておき、その他は見つからないのが不思議です

697 名前: []
[ここ壊れてます]

698 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 20:21:54.46 ID:/mQ4CZGQ.net]
>>673
カタラン予想ですでに存在しないことが証明されているのに何が不思議なのかね

699 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 20:24:10.50 ID:hjkeK8jf.net]
>>673
その問題は数学的に解くものではないかな?
まあ、コンピュータなら力業でかなりの値を n, m に入れて計算して確認できるけどさ。

700 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 20:56:22.87 ID:fGVRHt7J.net]
>>674
カタラン予想というのがあるんですね、ありがとうございます!
https://en.wikipedia.org/wiki/Catalan%27s_conjecture



701 名前:デフォルトの名無しさん mailto:sage [2017/11/23(木) 21:05:28.66 ID:uF7hi9HH.net]
>>658
#!/bin/sh
seq 999|grep -v 0

702 名前:668 [2017/11/24(金) 06:21:36.98 ID:8wyGH9pr.net]
>>658
Kotlin数値判定版。こんな風にも書けるなと後で気づいた。

fun f(n: Int): Boolean {
 var m = n;
 while (m != 0) {
  if (m % 10 == 0)
   return false
  m = m / 10
 }
 return true
}

fun main(args: Array<String>) {
 (1..999).filter(::f).forEach(::println)
}

703 名前:デフォルトの名無しさん mailto:sage [2017/11/24(金) 07:42:25.55 ID:MEHEP0+e.net]
存在するしないをプログラミングで証明するのはお題として良くない

704 名前:デフォルトの名無しさん mailto:sage [2017/11/24(金) 20:42:02.54 ID:G34PGfZh.net]
log 2 を2進数表記した時の小数点第 n 位から n + 9 位までを求めよ. (1 ≦ n ≦ 10^10)
cf. log 2 = 0.10110001...

*Sample input*
1
11
10000
31415926
314159265

*Sample output*
1011000101
1100100001
0010110110
1001010110
0111101001

705 名前:デフォルトの名無しさん mailto:sage [2017/11/24(金) 23:31:00.22 ID:r53+zpq0.net]
>>680
c++で書いたけど小数第100億位を計算するのに5時間くらいかかりそうorz

706 名前: mailto:sage [2017/11/25(土) 00:04:03.20 ID:ROI3Hzdd.net]
>>681
もう初手に届くとは劇速ですね

707 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 06:53:37.62 ID:Uo3oYb2P.net]
無条件でlogって書いたら普通自然対数だろ

708 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 07:01:13.88 ID:Uo3oYb2P.net]
ライブラリを使えばほとんど何も書かなくて良いけど
どこから書くことを求められてるの?

709 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 07:03:54.53 ID:Uo3oYb2P.net]
>>679
「良くない」じゃなくて「出来ない」でしょ

710 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 07:16:55.64 ID:Uo3oYb2P.net]
>>684
と思ったけど、普通に全桁計算したら終わらないな



711 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 07:34:12.57 ID:Uo3oYb2P.net]
Σ { 1 / (2^i × i) }
を使って10^10項位までを42bitくらいだけ計算すれば出来るかな?
1/nの周期性を考えないと計算量的に無理?
10^10が微妙に32bitを越えてるのがイヤだねえ

712 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 08:21:38.07 ID:Uo3oYb2P.net]
>>687
ダメだ
ざっと計算量を見積もったらとても5時間じゃ終わらない

713 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 13:10:34.24 ID:l6j6CjYT.net]
>>375
xxx@xxx-VirtualBox:~/casl$ casl -s -e -i stdlib.casl -i bigint.casl fact.casl
1
1
2
6
24
120
720
5040
40320
362880
          途 中 省 略
1405006117752879898543142606244511569936384000000000
60415263063373835637355132068513997507264512000000000
2658271574788448768043625811014615890319638528000000000
119622220865480194561963161495657715064383733760000000000
5502622159812088949850305428800254892961651752960000000000


714 名前:258623241511168180642964355153611979969197632389120000000000
12413915592536072670862289047373375038521486354677760000000000
608281864034267560872252163321295376887552831379210240000000000
30414093201713378043612608166064768844377641568960512000000000000

暇つぶしに書いてみたけど足算掛算割算しかできない
引算は難しすぎるんで諦めた
[]
[ここ壊れてます]

715 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 16:35:37.76 ID:J1zvm3XW.net]
バイナリ法で最適化した結果なんとか1時間あれば10^10位は計算できるようになったがまだ縮められるかな

716 名前: mailto:sage [2017/11/25(土) 16:41:37.19 ID:ROI3Hzdd.net]
備忘メモ
rio2016.2ch.net/test/read.cgi/math/1510671832/890
ちゃんとお題にして出題しなおします

717 名前: mailto:sage [2017/11/25(土) 21:49:51.82 ID:ROI3Hzdd.net]
>>680
指数関数のマクローリン展開で試してみたのですが、これは収束が遅すぎますね、それに収束半径を超えてるし…
なにか収束の早いよい方法はないものか…

718 名前: mailto:sage [2017/11/25(土) 21:54:37.24 ID:ROI3Hzdd.net]
>>692
×指数関数
○対数関数

719 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 22:58:19.91 ID:yyAYDlfh.net]
対数関数のマクローリン展開?
そりゃ無理だ
log 0 が定義されてない

720 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 23:12:41.85 ID:FRsJtlII.net]
>>689
CASLで書いたの?
ソースコードは?



721 名前:デフォルトの名無しさん mailto:sage [2017/11/25(土) 23:38:41.06 ID:yyAYDlfh.net]
>>680
log 2 = Σ_[i=1, 2, ...] { 1 / (2^i × i) }
冪剰余

でいける気がしてきた

しばらく暇がない
時間が空いたら
アセンブラ & C++ & OpenMP
でやってみる

722 名前:デフォルトの名無しさん [2017/11/26(日) 02:33:02.82 ID:T275kIwU.net]
>>650
(setq aaa '(1 5 10 50 100 500))
(setq ddd 750)
(setq jjj 15)

(defun bbb (ccc iii)
(if (= iii 0)
ccc
(let (eee)
(dolist (fff ccc)
(dolist (ggg aaa)
(when (<= (+ (apply #'+ fff) ggg) ddd)
(push (cons ggg fff) eee))))
(bbb (remove-duplicates (mapcar (lambda (x) (sort (copy-seq x) #'<)) eee) :test 'equal) (1- iii)))))

(let* ((kkk (bbb '((0)) jjj))
(lll (mapcar (lambda (x) (remove 0 x)) kkk)))
(remove-if-not (lambda (x) (and
(= (apply #'+ x) ddd)
(= (length x) jjj)
(= (length (remove-duplicates x)) (length aaa))
)) lll))
((1 1 1 1 1 5 5 5 10 10 10 50 50 100 500))

723 名前:デフォルトの名無しさん [2017/11/26(日) 02:34:12.86 ID:T275kIwU.net]
>>650
(setq aaa '(A B C D E))

(defun fff (ddd)
(if (null (cdar ddd))
ddd
(let (eee)
(dolist (jjj ddd)
(let ((bbb (car jjj))
(ccc (cdr jjj)))
(setq eee (append (mapcar (lambda (x) (cons (cons x bbb) (remove x ccc))) ccc) eee))))
(fff eee))))

(defun iii (kkk)
(if (< kkk 2) #'identity #'not))

(let* ((ggg (fff (list (cons nil aaa))))
(hhh (mapcar (lambda (x) (car x)) ggg)))
(remove-if-not (lambda (x) (and (funcall (iii (position 'A x)) (> (position 'D x) 1))
(funcall (iii (position 'B x)) (= (position 'A x) 1))
(funcall (iii (position 'C x)) (> (position 'E x) 1))
(funcall (iii (position 'D x)) (= (position 'C x) 1))
(funcall (iii (position 'E x)) (< (position 'B x) 2)))) hhh))
((D C B E A) (D C E B A) (D C A E B) (D C E A B) (D C A B E) (D C B A E))

724 名前: mailto:sage [2017/11/26(日) 11:18:11.00 ID:rNgJnhxq.net]
>>694
いやいや
https://ja.wikipedia.org/wiki/%E5%AF%BE%E6%95%B0
log(1-x) = - Σ((1/n)x^n) に x = -1 を機械的に代入しました、収束半径外ですが、この値は正しいらしい。

725 名前:デフォルトの名無しさん [2017/11/26(日) 12:12:20.72 ID:ffy1o2uq.net]
お題
ASCIIコード表が載っている

726 名前:{をあげよ []
[ここ壊れてます]

727 名前:デフォルトの名無しさん mailto:sage [2017/11/26(日) 12:35:31.87 ID:tJzac9f2.net]
>>695
うんCASL
全部で1200行かあ
xxx@xxx-VirtualBox:~/casl$ wc -l stdlib.casl bigint.casl fact.casl
274 stdlib.casl
851 bigint.casl
76 fact.casl
1201 合計

ソースはこういうのが延々続いててずっと眺めてるとゲシュタルト崩壊起こして
何が何だか分からなくなるよ
ld gr5,0,gr1
ld gr6,1,gr1
lad gr4,4,gr1
addl gr4,gr0
st gr4,0,gr1
st gr6,1,gr1
ld gr4,=1
st gr4,2,gr1
st gr0,3,gr1
ld gr6,gr1
ld gr1,0,gr1
st gr5,0,gr1
st gr6,1,gr1
xor gr4,gr4
st gr4,2,gr1
lad gr2,-4,gr2
subl gr2,gr0
st gr2,3,gr1
ld gr0,gr3

728 名前:デフォルトの名無しさん mailto:sage [2017/11/26(日) 12:35:43.37 ID:WgExDItE.net]
>>699
他だ単に対数って言えば
log x のこと
これをマクローリン展開は無理

log (1-x) のマクローリン展開ならそう書かないと通じない
収束半径の外じゃなくて、収束半径丁度でしょ

729 名前:デフォルトの名無しさん mailto:sage [2017/11/26(日) 12:49:31.90 ID:WgExDItE.net]
-log (1-x) のマクローリン展開に、
x = 1/2 を入れると
>>696 になる

730 名前:デフォルトの名無しさん [2017/11/26(日) 13:21:30.43 ID:jiBTwXK4.net]
理解はしてないが、出てきたので貼っとく。



指数対数関数等の超越関数の多倍精度計算

本論文では、 指数対数関数の高精度計算として Taylor 展開に BSA 法を使って高速化する方法提案する。
約 1000 桁以下の精度の計算では、 Taylor 展開を使った計算が Sasaki and Kanada[5] によって、様々な計算
法を比較して最も高速であることが示されているので、 計算時間が問題となるのは、 1000 桁以上の精度の
計算である。 ここで提案した Taylor 展開に BSA 法を適用して高速化した方法と Sasaki and Kanda によっ
て提案された方法を 1000 桁を超えた精度で比較し、 その高速性を示した。

211 階乗計算例
10000! の計算を行う。 この計算では、 BSA 法を使うだけでなく、 1600 桁以上の数値に対しては FFT を利用して乗算を行っている。
計算方法 計算時間(msec)
BSA 47
従来の方法 3578

このほか、 三角関数、逆三角関数、双曲線関数など簡単な規則で各項の係数が表現でき、 多くの関数がこの
行列の乗算形式に変形できます。Taylor 展開の係数が簡単な規則で表現できない $\tan x$ が例外的に表現できないだけである。

3 まとめ
指数関数や対数関数の Taylor 展開に BSA 法を適用することによって、 BSA を使わない従来の方法に比べ40 %程度の高速化ができた。
対数関数に対しては、 5000 桁程度の精度で最も高速な計算方法として知られた Sasaki and Kanada の方法を超えることを示した。

www.kurims.kyoto-u.ac.jp/~kyodo/kokyuroku/contents/pdf/1456-24.pdf



731 名前: mailto:sage [2017/11/26(日) 13:37:36.96 ID:rNgJnhxq.net]
>>702
たしかに

収束半径は |x < 1| なのでは?

732 名前:デフォルトの名無しさん [2017/11/26(日) 13:44:48.59 ID:jiBTwXK4.net]
とりあえず理解はできた計算方法として、logxの近似値などをaとおいたとき、
logx = a + log(x/e^a)という変形を用いる方法だ。
aが近似値だと、x≒e^aなので良いらしい。

733 名前:デフォルトの名無しさん mailto:sage [2017/11/26(日) 13:58:53.69 ID:WgExDItE.net]
>>705
収束半径は1
収束半径は、収束するエリアと収束しないエリアの境目となる円の半径
収束半径丁度の時は収束する場合もあるししない場合もある

734 名前:デフォルトの名無しさん mailto:sage [2017/11/26(日) 14:20:52.91 ID:WgExDItE.net]
>>706
計算する項が少なければ良いわけではなく、
各項の計算時間も重要

735 名前:デフォルトの名無しさん [2017/11/26(日) 15:04:05.33 ID:jiBTwXK4.net]
exp(x)は、(exp(x/k))^k (kは2ベキ)、とするといいらしい。
k=2なら、括弧内を計算したやつ同士

736 名前:の掛け算。 []
[ここ壊れてます]

737 名前:695 mailto:sage [2017/11/26(日) 18:33:11.28 ID:XHzckn9a.net]
>>701
なるほどありがとう
怖いもの見たさがあった

738 名前: mailto:sage [2017/11/26(日) 20:54:13.61 ID:rNgJnhxq.net]
>>689
えへへ、調べさせてもらったよw
後半は 42! から 50! までの値だね
この範囲なら、多数桁×ワンレジスタの計算で済みますね

多数桁×多数桁を実装すれば思いっきり褒めてあげるよ、えへへ:−)

739 名前:デフォルトの名無しさん mailto:sage [2017/11/26(日) 21:11:54.45 ID:tJzac9f2.net]
>>711
ほい
xxx@xxx-VirtualBox:~/casl$ casl -s -e -i stdlib.casl -i bigint.casl bimul.casl
350306543997676425792
153864088327713953064
53899597027434699691252340823058767026688

740 名前: mailto:sage [2017/11/26(日) 21:47:36.23 ID:rNgJnhxq.net]
>>712
おお、すごい、gmp で確認したがあってるぞ
私はまだ 10進文字列から多数桁型への変換は実装できていない、また仕事ができてしまったなあ



741 名前:デフォルトの名無しさん mailto:sage [2017/11/26(日) 23:01:31.48 ID:tJzac9f2.net]
>>713
gmpで確かめてるのかあ
俺は確認はclispかrubyでやってるよ
10進文字列からの変換は10倍しながら足しこんでいくだけだから
そんなに難しくないでしょ
掛算なしでも(n<<3)+(n<<1)でできるし
逆の10進文字列への変換は割算が必要だから実装するの大変だったなあ
これができあがるまではメモリを16進ダンプして計算が合ってるか確かめてた

742 名前:デフォルトの名無しさん [2017/11/27(月) 06:49:43.60 ID:qqP20rnw.net]
>>696がよさげだな
こういうことだろ?

Σ(1/n) >> n
小数にもシフトを適用するとして。

和の誤差がかわかれば、どこまで計算したらいいかわかるがどうやるんだ?

743 名前:デフォルトの名無しさん [2017/11/27(月) 07:17:24.36 ID:qqP20rnw.net]
誤差しらべたら、テイラー展開は平均値の定理一般化だったか


数値計算とテイラー展開
ある区間において,関数 f(x)がn 回微分可能であるとし,定数aはこの区間に含まれるものとする.x もこの区間内に含まれるとき,
math-lab.main.jp/taylor07a.jpg
をみたすa とx の間の実数c (a <c <x または x <c <a)が存在する
math-lab.main.jp/taylor7.html

744 名前:デフォルトの名無しさん [2017/11/27(月) 07:40:30.25 ID:qqP20rnw.net]
log(1+x)の誤差項、剰余項は、(-1)^(n-1)/n * (x/(1+c))^n らしいので、
-log(1-x)では、1/n * (x/(1+c))^n か。
x=1/2で考えると、この項をなるべく大きくするならc=0で、誤差は(1/n) >> n以下か。ふたたびシフト使用。

745 名前:デフォルトの名無しさん [2017/11/27(月) 07:44:14.48 ID:qqP20rnw.net]
まとめると、
log2 - (Σ(1/k) >> k) < (1/n) >> n  (級数はn-1までの和)

746 名前:デフォルトの名無しさん [2017/11/27(月) 08:54:49.81 ID:qqP20rnw.net]
どこか間違えてる 次数か?

747 名前:デフォルトの名無しさん [2017/11/27(月) 08:59:59.63 ID:qqP20rnw.net]
いやあってるか。
A(k) = (1/k)>>kと置くと、
log2 - ΣA(k) < A(n) (級数はn-1までの和) で
ΣA(k) (n+1以上の和) < A(n) が成立するのか。

748 名前:デフォルトの名無しさん [2017/11/27(月) 10:11:23.24 ID:qqP20rnw.net]
やはり、どこか間違ってるな。
上のとおりだと、log2 - ΣA(k) (級数はn-1までの和)は、
A(n) を含むので、A(n)より小さいはずがない。

749 名前: mailto:sage [2017/11/27(月) 23:07:50.22 ID:b0u4s5jJ.net]
>>701
>ソースはこういうのが延々続いててずっと眺めてるとゲシュタルト崩壊起こして何が何だか分からなくなるよ
対象のコード書いてるときの「感覚」をハードディスクかどこかに貯めておいて、
必要に応じてまた脳みそに搭載できるようにならないものか…

そのマシン語の一行一行にも、もともとはなんらかの意味的構造があったのに、それが消えてしまうなんて損失以外のなにものでもないよね

750 名前:デフォルトの名無しさん mailto:sage [2017/11/27(月) 23:36:53.65 ID:bwTh4Bk9.net]
>>680

>>696の方法で作ってみました
n=10^10の時に48.3秒くらいです



751 名前:デフォルトの名無しさん mailto:sage [2017/11/28(火) 13:09:45.40 ID:IU/PYwM1.net]
>>723 はHaswell (4770) 3.4GHz固定での結果で
Skylake (6700K) 定格だと38.4秒でした

ちゃんとCPUも進化してるんですね

752 名前:デフォルトの名無しさん mailto:sage [2017/11/28(火) 13:17:18.48 ID:IU/PYwM1.net]
>>681
>>690
C++だとどうやって計算してるかが非常に気になります
32bitを越える値同士の乗算(結果が64bitを越える)部分

アセンブラだと
64bit x 64bit ===> 128bit
128bit / 64bit ===> 64bit
等があるのでそれを使っちゃってますが

753 名前:デフォルトの名無しさん mailto:sage [2017/11/28(火) 13:20:30.03 ID:IU/PYwM1.net]
冪剰余を求めるのに
(a * b) % c
みたいなのがたくさん出てきませんか?
aもbもcも32bitの範囲を微妙に越えてて

754 名前:デフォルトの名無しさん [2017/11/28(火) 14:44:32.26 ID:jzUFRHpN.net]
誤差部分の間違いが判った。これでよさげだ。
ただし誤差評価を荒くやってはダメそうだが。一番最後の行のところ。



誤差項ありのマクローリン展開は、0<=c<=xが存在して

f(x) = Σ x^k * f(k)(0)/k! (kは0からn-1まで) +  x^n * f(n)(c)/n!

f(x) = -log(1-x)のn次導関数は、(n-1)!/(1-x)^n。
このときマクローリン展開は誤差項は x^n / (n*(1-c)^n)

x=1/2ならば、c=1/2のとき最大で、1/n

755 名前:デフォルトの名無しさん [2017/11/28(火) 19:45:30.22 ID:jzUFRHpN.net]
これが収束速いようだ。


log(2) = 3log(81/80) + 5log(25/24) + 7log(16/15)

log((x+1)/(x-1))
= log((1+1/x)/(1-1/x))
= 2 Σ 1/((2n+1)*x^(2n+1))

756 名前:デフォルトの名無しさん mailto:sage [2017/11/28(火) 22:18:22.38 ID:7WoPw74F.net]
>>728
1/log(2) ≒ 3.32
1/2log(161)+1/2log(49)+1/2log(31) ≒ 0.85

なので、計算に必要な項数は1/4程度
でも、1つの項の計算には時間がかかる

log(1-x)のマクローリン展開に0.5を入れた物は
分母が i * 2^i だから速く計算できるのだ

757 名前:デフォルトの名無しさん mailto:sage [2017/11/28(火) 22:20:46.48 ID:7WoPw74F.net]
>>727
残りの項を等比数列と見なせば
簡単に誤差の上限が出ます

758 名前:デフォルトの名無しさん mailto:sage [2017/11/28(火) 22:47:09.33 ID:7WoPw74F.net]
>>724
Haswellで33.96秒に縮まりました
シングルスレッドだと182.54秒で5.3倍
HTTが効くということは、
まだ多少改善の余地がありそう

一番内側のループは
vmulpd
vmulpd
vroundpd
vfmsub213pd
vfmsub132pd
vsubpd
なんと浮動小数点で計算してます

759 名前:デフォルトの名無しさん mailto:sage [2017/11/28(火) 22:53:54.93 ID:7WoPw74F.net]
n=10000000000の時は
0000010101 でした
出題者さま、合ってます?


また、たまたまですが

n=10000000004では
0101010101

n=10000000005では
1010101010

になります

760 名前:デフォルトの名無しさん mailto:sage [2017/11/28(火) 23:30:15.70 ID:9HoDrqB3.net]
一番内側のループのコード
fast-uploader.com/file/7067434368942/

PORT5がガラ空きで、処理のほとんどがPORT0,PORT1
こんなんでもHTTが効く
やっぱり浮動小数点はレイテンシがデカい

AVX512になれば
レジスタの数が倍になるので
8パラにしてレイテンシを隠蔽出来るんだけど
もちろんレジスタ長が倍になる方が大きい



761 名前:デフォルトの名無しさん [2017/11/29(水) 13:17:33.09 ID:mHyZby47.net]
>>728は後半部分が間違ってるか。log((x+1)/x) = log(1+1/x) の展開を用いるのが正解で。

log(・)の中身を1に近づけた方が収束が早くなるが、
こういった分解 log(2) = 3log(81/80) + 5log(25/24) + 7log(16/15)はどうみつけるのか。
これは数値が(x+1)/x の形だけど、(x+1)/(x-1)の分解もあるのか。こっちだと計算するベキ項が一つ飛ばしにできる。>>728のように。

762 名前:デフォルトの名無しさん mailto:sage [2017/11/29(水) 13:34:57.75 ID:8/kTvoZy.net]
2 = (81/80)^3 * (25/24)^5 * (16/15)^7

3 と 5 の指数の合計が0になる組み合わせを検索すれば良い

763 名前:デフォルトの名無しさん mailto:sage [2017/11/29(水) 13:37:30.83 ID:8/kTvoZy.net]
log(81/80) = log(162/160) = log((161+1)/(161-1))

わかってて書いてるんだと思ったが
>>729のlogの中身はこの値

764 名前:デフォルトの名無しさん [2017/11/29(水) 13:42:05.17 ID:mHyZby47.net]
>>728はそういうことか。みつけたやつのコピペで、そのとき考慮はしてなかった。

765 名前:デフォルトの名無しさん [2017/11/29(水) 13:45:31.51 ID:mHyZby47.net]
指数も固定でなくていいはずで、
16/15よりかはたとえば1001/1000のほうが1に近いからそういうのはいくらでも見つけられるのかとおもった。

766 名前:デフォルトの名無しさん mailto:sage [2017/11/29(水) 14:44:26.09 ID:8/kTvoZy.net]
分母分子の素因数の数と同じ項数が必要

例えば素因数が 2, 3, 5, 7 の4種類の場合、
1個差もしくは2個差のペアを4個探す

例えば
126/125
225/224
2401/2400
4375/4374

これらを適当に掛け算して2^nになるようにすると
項が4個の式がみつかる

767 名前:デフォルトの名無しさん mailto:sage [2017/11/30(木) 00:31:43.08 ID:H4qIjcIH.net]
分母、分子とも 2, 3, 5, 7, 11, 13, 17 のみしか素因数を持たない形の場合、
以下が一番計算する項の数が少ないようです

log(2) = 72*log(126/125)+27*log(225/224)-19*log(2401/2400)+31*log(4375/4374)

768 名前:デフォルトの名無しさん [2017/11/30(木) 05:07:54.11 ID:fMs2N0Mh.net]
>>740
その数値を検索すると、音楽のコンマというのが出てくる。関係あったり理論があったりするのか。


A.D. Fokker: Unison Vectors and Periodicity Blocks
www.huygens-fokker.org/docs/fokkerpb.html

List of 7-prime limit accidentals - The?Sagittal?forum
forum.sagittal.org/viewtopic.php?f=6&t=252

769 名前:デフォルトの名無しさん [2017/11/30(木) 05:28:17.43 ID:fMs2N0Mh.net]
log(2)とは無関係で、単に一個差のやつで適当な素因数分解できるやつに名前がついてるだけ?



An Investigation into the Extraction of Melodic and Harmonic Features from Digital Audio

unit interval name
4375/4374 Ragisma
2401/2400 Breedsma
225/224 Septimal Kleisma
145/144 Difference between 29:16 and 9:5
126/125 Small Septimal Semicomma
121/120 Undecimal Seconds Comma
81/80 Syntonic Comma

scholar.sun.ac.za/handle/10019.1/100826

770 名前:デフォルトの名無しさん [2017/11/30(木) 11:02:35.16 ID:fMs2N0Mh.net]
log2のほうは、分子・分母の素因数分解が似通ってないと成立しないってことで、
音楽のほうは小さい素数に限定して一個差ペアを求めたと理解。
log2のほうは、共通の素数で大きいやつを最初に固定すれば考えれば、よさげかと。



771 名前:片山博文MZ mailto:sage [2017/11/30(木) 12:12:48.85 ID:NsMGt5if.net]
お題。横x[cm]、縦y[cm]の長方形のステンレスの1枚の板がある。この板からm枚の複数の長方形の部材を切り出す。
部材のサイズは配列で与えられる。
部材のサイズ(縦×横)はそれぞれだいたい決まっているが、1cm程度変わってもよい。
ただし、部材の縦または横が変わるとそれぞれ一点減点となる。
すべての部材を切り出すことができれば、減点がなるべく少ない方法の切り出し方法を出力せよ。
すべての部材を切り出すことができなければ、面積が広い順になるべくたくさん部材を切り出せ。

772 名前:片山博文MZ mailto:sage [2017/11/30(木) 12:19:33.84 ID:NsMGt5if.net]
テストデータ。

x=10, y=10,
{
{5, 10}, {2, 2}, {2, 2}, {4, 3}, {6, 5}
}

x=5, y=12
{
{2, 5}, {3, 3}, {2,9}, {3, 2}, {4,3}
}

773 名前:片山博文MZ mailto:sage [2017/11/30(木) 12:28:07.36 ID:NsMGt5if.net]
部材の縦と横は入れ替わってもよい。
可能ならば、切り出し方法をSVG形式で出力せよ。

774 名前:片山博文MZ mailto:sage [2017/11/30(木) 12:51:59.04 ID:NsMGt5if.net]
切り出し方法は、

切り出す部材のx座標、y座標、幅、高さ

のリストとして出力せよ。

775 名前:片山博文MZ mailto:sage [2017/11/30(木) 12:56:57.25 ID:NsMGt5if.net]
切り出しに余裕があるときは、なるべくx座標の大きい方、y座標の大きい方を残すようにせよ。

776 名前:デフォルトの名無しさん mailto:sage [2017/11/30(木) 13:08:21.37 ID:tkxPMdZc.net]
斜めもOK?

777 名前:デフォルトの名無しさん mailto:sage [2017/11/30(木) 13:08:55.87 ID:tkxPMdZc.net]
人間用のパズルで、斜めにしないと解けないのとかありそう

778 名前:デフォルトの名無しさん [2017/11/30(木) 14:23:24.17 ID:SHLZLl2M.net]
問題文の条件が“だいたい”“なるべく”なんて
あいまい表現だらけ

これでプログラミングの問題かよ

779 名前:片山博文MZ mailto:sage [2017/11/30(木) 16:18:01.24 ID:NsMGt5if.net]
斜めは考えなくてもよい。

訂正。
すべての部材を切り出すことができれば、減点が最小である切り出し方法を出力せよ。
すべての部材を切り出すことができなければ、面積が広い順に切り出せる部材の面積が最大になるよう部材を切り出せ。
切り出しに余裕があるときは、x座標の大きい方、y座標の大きい方を残すようにせよ。

780 名前:680 mailto:sage [2017/11/30(木) 17:10:37.24 ID:8ZVWPbH7.net]
>>732
そこにある3つとも正解です
当初は L = Σ1/(k*2^k) として
2^n * L の小数部分を愚直に求める方法を想定していました



781 名前:デフォルトの名無しさん mailto:sage [2017/11/30(木) 17:26:52.63 ID:r8WkgLop.net]
普通に多倍長で計算したら計算量的に終わらないですよね?
n=314159265を求めるのに
冪剰余は使ってますよね?

おそらく私も同じような方法と思います
FMA3命令とOpenMPで高速化してるだけで

782 名前:デフォルトの名無しさん mailto:sage [2017/11/30(木) 22:49:50.18 ID:TklDiPhy.net]
愚直という言い方は良く割りませんでしたね
仰る通り冪剰余は用います

783 名前:片山博文MZ mailto:sage [2017/12/01(金) 14:26:32.50 ID:fw1UFg83.net]
再出題。横cx[cm]、縦cy[cm]の長方形または正方形のステンレスの1枚の板がある。この板からm枚の複数の長方形または正方形の部材を切り出す。
m枚の部材のサイズは(縦, 横)の配列で与えられる。
すべての部材を切り出すことができれば、切り出し方法を出力せよ。切り出しが不可能ならば「impossible」と出力せよ。
切り出し方法は、
(部材インデックス、部材の一番左のx座標、部材の一番上のy座標、幅、高さ)
のリストとして出力せよ。斜めの方向の切り出しは考えなくてもよい。
切り出しに余裕があるときは、x座標の大きい方、y座標の大きい方を残すようにせよ。ただし、x軸は右の向き、y軸は下向きとする。

テストデータ。

cx=10, cy=10, m=5, {5, 10}, {2, 2}, {2, 2}, {4, 3}, {6, 5}

cx=5, cy=12, m=5, {2, 5}, {3, 3}, {2, 8}, {3, 2}, {4, 3}

784 名前:デフォルトの名無しさん mailto:sage [2017/12/01(金) 17:01:28.13 ID:BqJQPTjH.net]
頭の悪そうな文章だな

正方形⊂長方形
ステンレスの板の座標上の位置指定が無い
余裕がある場合の条件の意味が曖昧

785 名前:片山博文MZ mailto:sage [2017/12/01(金) 18:41:36.20 ID:fw1UFg83.net]
ステンレスの板の左上座標は原点にあるものとする。
切り出しは、可能な限り、座標の小さい方を優先する(「余裕」の意味)。

786 名前:デフォルトの名無しさん mailto:sage [2017/12/01(金) 20:32:10.86 ID:9YSaSAW0.net]
>>758
相変わらず曖昧な表現

全ての長方形の上辺と左辺がどこかに接していれば良いのか?
そうじゃないのか?

このような条件のを1個だけ見つければ良いのか
すべて見つけるのか

787 名前:片山博文MZ mailto:sage [2017/12/01(金) 20:41:14.79 ID:fw1UFg83.net]
全ての部材の上辺と左辺が別の部材の辺、もしくは、元の板の端に接していること。
このような条件のをすべて見つけること。

788 名前:片山博文MZ mailto:sage [2017/12/01(金) 20:43:57.24 ID:fw1UFg83.net]
なんか、工学関係でこのような問題があるらしいが、まだ解決策があるかどうかわからん。これが解ければ、実用化待ったなし。

789 名前:デフォルトの名無しさん mailto:sage [2017/12/01(金) 21:15:23.73 ID:9YSaSAW0.net]
お題じゃなくて依頼かよ

790 名前:デフォルトの名無しさん mailto:sage [2017/12/01(金) 21:19:54.38 ID:9YSaSAW0.net]
実用性なら
切り



791 名前:やすさとか余り素材の形状とか
そういうのが重要だろうに

問題として中途半端過ぎる
[]
[ここ壊れてます]

792 名前:デフォルトの名無しさん [2017/12/01(金) 21:20:21.36 ID:qVeescqP.net]
また片山博文MZ が乞食をやってるのか

793 名前:デフォルトの名無しさん mailto:sage [2017/12/01(金) 21:23:07.33 ID:9YSaSAW0.net]
普通に考えて、NP問題だろう

794 名前:デフォルトの名無しさん [2017/12/01(金) 21:48:16.44 ID:8H4JUlF5.net]
なにやら揉めてますね
そろそろうんざりなので次のお題どうぞ

795 名前:デフォルトの名無しさん [2017/12/01(金) 23:36:29.58 ID:N1IVcYDB.net]
スポーツスケジューリング問題。

796 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 02:47:12.16 ID:QazTjKaA.net]
お題ってこういうのでもいいのかな
a[10] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 }
このように10個の整数を要素に持つ配列がある(整数の値は不定)
b = エントリーポイント
c = 移動する数量
d = 移動する距離
を与えることにより、配列の要素を移動させるプログラムを作りなさい
ただし配列の右端の要素を一つ移動させると、配列の左端に移動するものとする


a = 3, b = 1, c = 5, a = 0124567839
b = 1, c = 3, d = 1, a = 0412356789
b = 7, c = 1, d = 5, a = 1273456890
b = 0, c = 8, d = 1, a = 8012345679
b = 4, c = 5, d = 4, a = 6783901245
b = 9, c = 5, d = 4, a = 5679012384
b = 7, c = 3, d = 1, a = 9123456078

797 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 02:49:08.83 ID:QazTjKaA.net]
>>768
一番上の例は
b = 3, c = 1, d = 5, a = 0124567839
の間違いです

798 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 09:00:27.20 ID:ucQfMVKf.net]
>>768
https://ideone.com/zZdIlU
C++。なかなか素直な問題なのに邪悪な思念で見ていたため手間取った。
マニュアルを熟知していると簡単かもしれない。

799 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 09:04:48.71 ID:b0AFqm0g.net]
>>768 Ruby
https://ideone.com/0l4cEo

800 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 10:14:55.69 ID:ZeeZWfzn.net]
>>768
@Mathematica

https://ideone.com/z4q1Nk



801 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 12:12:41.56 ID:jbLAlLAh.net]
>>768
b + c が10を超えることはありますか?

802 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 12:55:22.10 ID:sC6phLBS.net]
>>773訂正
b,c,dが10を越えることはありますか?

803 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 13:05:23.73 ID:b0AFqm0g.net]
>>771はb,c,dが任意の自然数でも大丈夫なようにしておいた

804 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 13:08:19.92 ID:QazTjKaA.net]
みなさんプログラム作るの早いですね

>>774
一応a、b、cの条件は、このようになると思います。
0 <= a <= 9
0 <= b <= 8
0 <= c <= 10 - b - 1

bとcは0では意味がないので、こっちのほうがいいのかな
0 <= a <= 9
1 <= b <= 8
1 <= c <= 10 - b - 1

805 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 13:12:58.80 ID:QazTjKaA.net]
>>776
すみません、間違えました、abcじゃなくてbcdですね
0 <= b <= 9
1 <= c <= 8
1 <= d <= 10 - b - 1

806 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 13:34:35.32 ID:QazTjKaA.net]
>>777
すみません、訂正の訂正です。dは10-c-1ですorz
0 <= b <= 9
1 <= c <= 8
1 <= d <= 10 - c - 1

807 名前:デフォルトの名無しさん [2017/12/03(日) 17:47:25.64 ID:Gq7SJlPX.net]
Linked list 使うと楽そうな感じするな

808 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 18:26:21.27 ID:QazTjKaA.net]
>>770,771
せっかくなのでこのテストデータを作って検証してみましたが、全部合っていました、さすがですね
それにしても他人のプログラムって動かすことはできても、理解するのは困難ですね
>>772
Mathematicaは残念ながら持っていないので検証できませんでした

b = 8 c = 6 d = 2 a = 8901236745
b = 4 c = 3 d = 2 a = 0123784569
b = 4 c = 5 d = 2 a = 8123904567
b = 2 c = 5 d = 2 a = 0178234569
b = 0 c = 5 d = 3 a = 5670123489
b = 9 c = 3 d = 4 a = 3459016782
b = 5 c = 1 d = 7 a = 1253467890
b = 4 c = 6 d = 2 a = 8923014567
b = 6 c = 7 d = 2 a = 8901253467
b = 7 c = 5 d = 4 a = 5789016234
b = 4 c = 2 d = 2 a = 0123674589
b = 6 c = 4 d = 5 a = 4678950123
b = 7 c = 4 d = 4 a = 4789056123
b = 4 c = 5 d = 4 a = 6783901245
b = 8 c = 1 d = 5 a = 1238456790
b = 0 c = 2 d = 6 a = 2345670189
b = 3 c = 7 d = 1 a = 9120345678
b = 9 c = 4 d = 2 a = 4901256783
b = 8 c = 3 d = 6 a = 3456890712
b = 2 c = 5 d = 3 a = 0178923456

809 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 20:16:05.68 ID:hV+xPFYR.net]
>>768
ruby ワンライナー
https://ideone.com/sXGhCG

810 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 20:37:58.61 ID:ucQfMVKf.net]
>>780
お、あんた偉いな。
出題者でちゃんと答え合わせやってくれる人が稀でレスポンス薄いことが多いんだよ。
ちゃんと動いてよかったよ。



811 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 20:51:48.60 ID:ucQfMVKf.net]
>>774
自分は10超えてもらったら困るなぁ。
10っていうか、配列の要素数だな。
修正はそんなに難しくないけど。

812 名前:デフォルトの名無しさん mailto:sage [2017/12/03(日) 23:00:23.32 ID:QazTjKaA.net]
>>781
1行プログラムすごいですね
さすがスクリプト言語

>>782
そうなんですか、でもいろいろな言語で回答されるから、出題者も大変かもしれないですね
私は問題の意味すらよく分からないことが多いので、もっぱら見る専ですが

813 名前:デフォルトの名無しさん [2017/12/04(月) 02:36:11.06 ID:iGjrIGoV.net]
>>768
これでいいのかなあ?
Perl で書いた。
https://paiza.io/projects/ncIY4LljeBahWZPJpd8ZPQ

814 名前:デフォルトの名無しさん mailto:sage [2017/12/04(月) 06:47:18.44 ID:Rc7ie/2s.net]
>>785
b = 6、 c = 6、 d = 2
のときの動作がおかしいようです
8901452367
となるはずが
0167892345
となっており、移動する"678901"の並びが崩れてしまっています

815 名前:785 [2017/12/05(火) 02:32:35.27 ID:LDxS5CId.net]
>>786
問題勘違いしてました。素直にぐるぐる回すように修正しました。
https://paiza.io/projects/ncIY4LljeBahWZPJpd8ZPQ
下の「入力」タブの方にスペース区切りで b, c, d の値を1行づつ並べて入れてから実行させると「出力」に結果が出ます。
とりあえず >>768 に書いてある値を入力にセットしたところ出力は同じになりました。

816 名前:デフォルトの名無しさん mailto:sage [2017/12/05(火) 20:55:13.95 ID:vy+ohhoY.net]
>>787
入出力の確認をしただけですが、今回は問題ないようです
paiza使うと簡単に確認できて便利ですね

817 名前:デフォルトの名無しさん mailto:sage [2017/12/05(火) 21:48:50.31 ID:32LsMTj+.net]
>>768
僕の頭だとどうしても右端から左端に行くときの動きがイメージできないので、解答締め切ったあとでもいいのでちょろっと教えてもらえると嬉しいです
上3つまではわかるけどそこから先がそもそも答えにたどり着けない……

818 名前:デフォルトの名無しさん mailto:sage [2017/12/05(火) 23:47:14.24 ID:ynbcQBXQ.net]
>>789
ヒント。
(インデックス++)%配列の長さ
を繰り返すとどうなりますか?%は余剰デス。

819 名前:デフォルトの名無しさん mailto:sage [2017/12/06(水) 00:25:49.49 ID:gvvJf1Ph.net]
>>789
上の3つまでは分かるということなので、3つめのcの値を一つずつ増やしてみると、こんな感じになります
"7"、"78"、"789"、"7890"と並ぶ数値が増えていっているのが分かると思います
c+d の合計は9が最高なので、これ以上cを増やすにはdを減らさなくてはなりません
b = 7 c = 1 d = 5 a = 1273456890
b = 7 c = 2 d = 5 a = 2378456901
b = 7 c = 3 d = 5 a = 3478956012
b = 7 c = 4 d = 5 a = 4578906123

今度はcを2に固定して、dの値を一つずつ増やすと、こんな感じになります
"78"の並びが一つずつ右へずれていっているのが分かると思います
c+d の合計は9が最高なので、これ以上dを増やすにはcを減らさなくてはなりません
b = 7 c = 2 d = 1 a = 0123456978
b = 7 c = 2 d = 2 a = 8123456907
b = 7 c = 2 d = 3 a = 7823456901
b = 7 c = 2 d = 4 a = 2783456901
b = 7 c = 2 d = 5 a = 2378456901
b = 7 c = 2 d = 6 a = 2347856901
b = 7 c = 2 d = 7 a = 2345786901

こんな感じで分かるでしょうか?私も自分の頭で考えると混乱しますw

820 名前:デフォルトの名無しさん mailto:sage [2017/12/06(水) 00:31:57.65 ID:+0bHqE6f.net]




821 名前:ゥ分の考え方は、配列の一部を切り取ってパッディングするんだけど、
まず配列を回転させて切り取る第0インデックスを配列の最初に持って来る。
すると、配列の後ろにはすでにパディングが終わった数列のができてる。
で切り取って削除して尻尾にくっつける。
で、さっき回した分を戻してやると完成。

という方法で、>>770を解いた。
[]
[ここ壊れてます]

822 名前:デフォルトの名無しさん mailto:sage [2017/12/06(水) 00:32:05.18 ID:+0bHqE6f.net]
自分の考え方は、配列の一部を切り取ってパッディングするんだけど、
まず配列を回転させて切り取る第0インデックスを配列の最初に持って来る。
すると、配列の後ろにはすでにパディングが終わった数列のができてる。
で切り取って削除して尻尾にくっつける。
で、さっき回した分を戻してやると完成。

という方法で、>>770を解いた。

823 名前:デフォルトの名無しさん mailto:sage [2017/12/06(水) 00:32:32.42 ID:+0bHqE6f.net]
あちゃー
二重投稿になったある。
そんなに大事でもないのだけど。

824 名前:デフォルトの名無しさん mailto:sage [2017/12/06(水) 00:38:22.54 ID:+0bHqE6f.net]
C++は比較的不自由な言語なので頭使うのは鍛えられるよ。
パーツが少ないのでほとんど自作しないといけない。

825 名前:デフォルトの名無しさん [2017/12/06(水) 00:46:18.89 ID:DokUEpLm.net]
コンパイルが必要とかでスクリプト系の言語より
使うことに不便があるかもしれないが、
できるアプリが自由で高速・軽量!

ライブラリもSTLやboost以外にも、探せば便利なのがいっぱい。

826 名前:デフォルトの名無しさん mailto:sage [2017/12/06(水) 01:07:01.76 ID:+0bHqE6f.net]
よそのライブラリ使うとイデオンで動かないからなぁ。
まぁ、業務ではライセンスに合ったものを使えばいいよ。

827 名前:デフォルトの名無しさん [2017/12/06(水) 02:01:03.49 ID:QVT4XBLu.net]
>>789
塊が移動すると考えれば良い。
例えば 7, 4, 2 だとすると、 789 と先頭の 0 が移動する塊だ。
で、ちょっと分かり易くするためにこの塊を伏せて * で書くとするとこうなる。

*123456***

それでこの塊を右に一つずらす。その時に1は食われて尻尾から吐き出される。

**234561**

移動量2なのでもう一回右にずらす。すると2が食われて尻尾から吐き出される。

***345612*

それでは * から 7890 に戻してみよう。

8903456127

できあがり。

828 名前:デフォルトの名無しさん mailto:sage [2017/12/06(水) 02:58:25.26 ID:+0bHqE6f.net]
>>793
これ間違ってるな。
最後尻尾にくっつけるんじゃなくて、適所にインサートだった。
で戻す。
書いた日から時間たってるからすまん。

829 名前:デフォルトの名無しさん mailto:sage [2017/12/06(水) 08:41:18.93 ID:obBhCrma.net]
>>790
>>791
>>798
ありがとうございます
やっと理解できました
がんばって解いてみます

830 名前:デフォルトの名無しさん [2017/12/06(水) 17:48:37.81 ID:T95E7suL.net]
log2だけど、これ使うといいらしいよ。分割統治法のBSA法というやつらしい。
2個ずつの積を繰り返すことで計算回数が減らせる。


{{1, a0}, {0, r}}*{{1, a1}, {0, r}}を[ [○,P], [○,Q] ]とおくと
r*P/Qはa0 + a1/rであり、

{{1, a0}, {0, r}}*{{1, a1}, {0, r}}*{{1, a2}, {0, r}}を[ [○,P], [○,Q] ]とおくと
r*P/Qはa0 + a1/r + a2/r^2。

上の式を実際に計算してみる。
www.wolframalpha.com/input/?i=%7B%7B1,+a0%7D,+%7B0,+r%7D%7D*%7B%7B1,+a1%7D,+%7B0,+r%7D%7D*%7B%7B1,+a2%7D,+%7B0,+r%7D%7D



831 名前:デフォルトの名無しさん mailto:sage [2017/12/06(水) 21:09:44.45 ID:N+lgs3o9.net]
>>801
普通のlog 2の計算には使えても
>>680 には使えないかと

832 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 00:07:53.25 ID:YC8MWngg.net]
>>731 から更に縮まりました
もう誰も興味が無いかも知れませんが

コードいる?

833 名前:デフォルトの名無しさん [2017/12/07(木) 09:24:10.80 ID:XIHsqoOR.net]
>>801でできるはずだ。やってみる

834 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 10:09:03.65 ID:DjN/Fbox.net]
n=10^10で19.28秒にまで縮めた
n=10^13くらいまでなら

835 名前:髏Qてる間に終わる

>>804
期待してます!
[]
[ここ壊れてます]

836 名前:デフォルトの名無しさん [2017/12/07(木) 15:54:52.13 ID:XIHsqoOR.net]
804だけど考えてみたら面倒なんだな。
有理数(整数)で完全に求めてから割り算するのは時間かかりそうだから、
展開も、割り算も、有限で打ち切って求める精度がでるようにするのが普通?

837 名前:デフォルトの名無しさん [2017/12/07(木) 18:15:20.36 ID:wGY0QmnN.net]
お題
辺の長さが10,000以下の整数である直方体について
すべての面の対角線も整数となるものを全て求める

838 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 19:52:07.65 ID:5gbe7aWB.net]
対角線を出す式を忘れたのだ〜。
数学って難しい。

839 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 20:10:49.23 ID:bwV7uU+3.net]
>>807
答えは浮かんだけど、
手元にインタプリタがないので書けない。

840 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 20:38:16.84 ID:fmQCcJGl.net]
>>808
えーと、ほら、三角形の三角形のアレ



841 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 21:23:21.04 ID:BdlZ1dXv.net]
>>805 のソース一式とexeです。
>>680 の回答となります。
fast-uploader.com/file/7068204781334/

実行ファイルは、拡張子をexe_からexeに変えてください。
OSはWindows 64bit Vista以降
CPUはHaswell以降
で動作します。

842 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 21:26:37.34 ID:5gbe7aWB.net]
作ってみたけど、オッセ―。
なんか数学的にやらないとダメぽ。

>>810
検索したら出てきた。
ただのHYPODだった。

843 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 21:34:41.35 ID:5gbe7aWB.net]
あ〜ん。足し算10兆回かかるとかむりげーじゃ。
どうしようかこれ。

844 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 21:40:02.60 ID:5gbe7aWB.net]
>>807
https://ideone.com/5Tu6fx
C++。ギブアップ。遅すぎだ。
デバッグ不完全だからそこを忘れないで。
多分1日かけても終わらないと思う。

845 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 21:40:16.73 ID:BdlZ1dXv.net]
>>807
特に大きな工夫もなく普通に3重ループで出来ましたよ
151個かな

846 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 21:42:04.13 ID:BdlZ1dXv.net]
https://ideone.com/09jmll

847 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 21:44:43.70 ID:8KQwIEWy.net]
>>807 Java
https://ideone.com/iYsIgq
こうでいいのけ?

848 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 21:48:20.51 ID:5gbe7aWB.net]
ぶ。おれは・・・いったい・・・。
だめだなぁ。才能ないなぁ。

849 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 22:07:39.64 ID:BdlZ1dXv.net]
>>817の意味がわからん
解説よろしく!

850 名前:デフォルトの名無しさん [2017/12/07(木) 22:27:00.87 ID:XIHsqoOR.net]
>>801のように積へ変換した場合、どれ位の精度・桁数が必要なのか簡単にわからないな。
>>801でやると、誤差ありの巨大な数同士の掛け算になって、その結果誤差が拡大する。
和のままやると、適当に2ベキをかければ、各項の整数部分だけ計算すればよさそうだけど。
>>801は桁を十分にとったとしても、2進10桁以上の部分も計算途中で無視はできないか。



851 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 22:32:10.24 ID:5gbe7aWB.net]
グア。題意勘違いしてた。
直方体の対角線はいらんのか。うおー。
ばかばかー。

852 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 22:57:05.97 ID:5gbe7aWB.net]
>>807
https://ideone.com/Uipgvw
C++。書き直したら、>>816のパクリ見たくなった。
そしてそれでも遅いとかあかんなー。
うーん。なんでなんだろう・・・。

853 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 23:06:46.33 ID:BdlZ1dXv.net]
>>820
普通に、求めたい精度+α の精度を保てば十分かと
演算回数はlog(n)のオーダーなので
普通にlog(2)を求める時には使える手法

854 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 23:06:47.69 ID:8KQwIEWy.net]
>>819
https://ideone.com/ZCINKa
適当にコメント付けた

855 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 23:18:28.32 ID:8ACt5G91.net]
物体は表面だけでなく無

856 名前:数の内面を有するという考えは絶対に存在する
一方で全てを表面でしかとらえない人の存在も否定できない
[]
[ここ壊れてます]

857 名前:デフォルトの名無しさん mailto:sage [2017/12/07(木) 23:24:59.96 ID:BdlZ1dXv.net]
このポエムをどうプログラミングしろと?

858 名前:デフォルトの名無しさん mailto:sage [2017/12/08(金) 03:20:08.11 ID:JkPU7Xcj.net]
>>807 Ruby
https://ideone.com/3BPK13
20秒程かかってしまう

859 名前:デフォルトの名無しさん [2017/12/08(金) 12:45:22.72 ID:lX5lg0SB.net]
log2は>>801でもできそうだ。
積の先頭ほど精度が必要で、無視できる上限・下限を積の位置で可変にするか、
最初の積の計算で必要な精度をすべてに適用するかでいけそう。

860 名前:デフォルトの名無しさん mailto:sage [2017/12/08(金) 14:42:05.63 ID:3hyL4NRS.net]
>>817
これパクってstd::bitset<10001>でやったら動かないかな
nextSetBitだけ作れば動きそう



861 名前:デフォルトの名無しさん mailto:sage [2017/12/08(金) 17:20:05.13 ID:qoqqt6pE.net]
>>829
やってみた
いろいろ怪しいが速度は強烈に速いな

https://ideone.com/d4dU1Q

862 名前:デフォルトの名無しさん mailto:sage [2017/12/09(土) 00:08:31.54 ID:NdkcUgXa.net]
>>828
時間的に無理だろって話

863 名前:デフォルトの名無しさん [2017/12/09(土) 02:59:25.21 ID:C21Kkp0z.net]
>>807
これでいいかな?
Kotlin で書いた。しかしpaiza.ioの制限なのか、何故か import kotlin.math.* がエラーだったので java.lang.Math の関数を使っている。
https://paiza.io/projects/ImbYdf3NSWgW-zj8Ke6cDw

864 名前:デフォルトの名無しさん [2017/12/09(土) 09:05:25.04 ID:WAlxvB4a.net]
お題
10,000以下の三角形数をもとめる

865 名前:デフォルトの名無しさん mailto:sage [2017/12/09(土) 09:42:44.72 ID:HfcuYzyJ.net]
>>833
三角数だよね?
.js
https://ideone.com/WZBIFF

866 名前:デフォルトの名無しさん mailto:sage [2017/12/09(土) 10:35:24.71 ID:PLdtTEIG.net]
>>833 ruby
i,j=0,-1;p i while(i+=j+=1)<10000

867 名前:デフォルトの名無しさん mailto:sage [2017/12/09(土) 21:40:06.26 ID:PLdtTEIG.net]
>>833 Brainf**k ワンライナー(笑)
https://ideone.com/TyMeco
遅すぎて8bitまでしか計算できなかった

868 名前:デフォルトの名無しさん mailto:sage [2017/12/09(土) 23:46:47.87 ID:3TNSAl29.net]
ideone.comはたいして最適化しないBrainf**k処理系だからな

869 名前:デフォルトの名無しさん [2017/12/10(日) 00:50:34.10 ID:J0bkBqjd.net]
>>833
1+2+3+... だよね? じゃあこうだ。
perl -e '$i=0;$n=1;while(($i+=$n)<=10000){print"$i\n";++$n}'

870 名前:デフォルトの名無しさん [2017/12/10(日) 00:52:24.37 ID:J0bkBqjd.net]
>>833
while じゃなくて for にするとこう。
perl -e 'for($i=0,$n=1;($i+=$n)<=10000;++$n){print"$i\n"}'



871 名前:デフォルトの名無しさん [2017/12/10(日) 08:00:18.20 ID:uc7Ht429.net]
>833 R
cat(cumsum(0:140))

872 名前:デフォルトの名無しさん [2017/12/10(日) 09:05:44.08 ID:gZDGKqrG.net]
>>801は精度管理の手間を考えたら、そのまま級数計算するのと大差ないと諦めたが。
こうすれば割り算の小数計算がほぼでないからいいのでは? 既に実装済?


an = 1/n、r = 2として、Σ an/r^n を定数C倍したやつの整数部分の取り出し。
C*anを再びanとおく。
Σ an/r^n
= a2/r^2 + a4/r^4 +・・・+ aN(2)/r^N(2) (添え字は2の倍数を動く)
+ a3/r^3 + a9/r^9 + a15/r^15 + ・・・+ aN(3)/r^N(3)
+ ap/r^p + ・・・+ aq/r^q + ・・・ (pは素数、qはp未満の数で割り切れないpの倍数)

= 1/N(2)r^N(2) * ( N(2)*a2*r^(N(2)-2) + ・・・ + N(2)*aN(2) ) + ・・

この分子部分は、各項、整数でそのまま計算しても>>801でも速くなるはず。

873 名前:デフォルトの名無しさん [2017/12/10(日) 21:52:17.18 ID:gZDGKqrG.net]
>>841は添え字に被りが出ていて間違えてた。

874 名前:デフォルトの名無しさん mailto:sage [2017/12/10(日) 22:07:36.99 ID:XvO3Mos9.net]
やってみて時間教えて

875 名前: []
[ここ壊れてます]

876 名前:デフォルトの名無しさん mailto:sage [2017/12/10(日) 22:08:42.09 ID:XvO3Mos9.net]
>>805 >>811 を抜ける?

877 名前:デフォルトの名無しさん [2017/12/10(日) 22:22:45.57 ID:gZDGKqrG.net]
秒数ではCPU依存するから正確に比較できない。
掛ける2だけのループを10^10回するだけでも19秒では終わらない。
無料のideone codepadなどの実行可能時間以内にできる範囲とか、
ベースとなる簡単なコード、関数の何倍時間がかかるかなどだと比較できるけど。

878 名前:デフォルトの名無しさん mailto:sage [2017/12/10(日) 22:36:08.95 ID:3sNoocWL.net]
演算回数の見積りは?

879 名前:35歳 mailto:age [2017/12/11(月) 02:10:45.96 ID:OsSLt9Cy.net]
Bronze取りました

880 名前:35歳 mailto:age [2017/12/11(月) 02:11:34.08 ID:OsSLt9Cy.net]
Bronze取りました



881 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 04:58:28.24 ID:zs4BBX0s.net]
くだらん話かも知れんけど
竹内関数のメモ化

https://ideone.com/sVhke1

これはC++によるものだけど、C++や他の言語でもっと高速に書く方法はあるか?

882 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 05:19:34.19 ID:zs4BBX0s.net]
あ、ちなみにideoneの結果は間違っている
多分スタックオーバーフローしている
100, 50, 0の場合は答えは100

883 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 05:38:23.74 ID:pBTqvDfH.net]
>>849
constexprにすれば実行時はほぼ計算無しにできると思う。
コンパイル時間半端ないけど。

884 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 05:45:19.55 ID:pBTqvDfH.net]
ところで、いくらメモ化してても5回しか呼ばれないってことがあるのか?って気はする。

885 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 07:04:34.34 ID:pBTqvDfH.net]
https://ideone.com/Y9WhRz
竹内関数constexprにしてみた。
ウチの環境だとこの辺のパラメータが限界っぽいかな。
100,50,0だとメモリ使い切るらしい。

886 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 07:09:30.00 ID:pBTqvDfH.net]
あら、コンパイルエラーになっちゃった。
VCだと通ったんだけど。もちろんステップ数とか設定はいじってるが。

887 名前:デフォルトの名無しさん [2017/12/11(月) 08:32:22.37 ID:gAGFZ0s2.net]
>>849
こんなのとか?

たらいを回すならHaskella
2006年04月07日 22:09
blog.livedoor.jp/dankogai/archives/50447103.html

888 名前:デフォルトの名無しさん [2017/12/11(月) 12:03:51.37 ID:uZdMj4Ux.net]
お題
6つの辺の長さが 与えられた4面体の体積を求める

889 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 13:07:53.63 ID:iSg/oyC4.net]
お題
8つの辺の長さが与えられた超5面体の体積を求める

890 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 14:29:31.82 ID:hKbhSguL.net]
お題
与えられた自然数を高々四個の四角数(平方数)の和で表せ



891 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 14:35:19.85 ID:k7Z6O4lr.net]
>>856 Ruby
https://ideone.com/qbHExm
ただし四面体ABC-Dに対して入力の順序は
AB BC CA CD DA BD とする

892 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 16:06:12.32 ID:k7Z6O4lr.net]
>>857
8つだと多胞体が一意に定まらないと思うんだが

893 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 16:48:32.53 ID:qWzXCzKk.net]
>>853
64bit環境でやったらスラッシング起きて\(^o^)/

894 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 16:53:24.07 ID:iSg/oyC4.net]
>>860
じゃあ10個で

895 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 17:03:18.77 ID:k7Z6O4lr.net]
>>862
10でも足りないと思うんだけどひょっとして超五面体って五胞体のつもりで言ってる?

896 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 17:31:58.31 ID:iSg/oyC4.net]
4次元の5胞体

897 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 17:32:53.55 ID:iSg/oyC4.net]
5C2=10

898 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 22:30:10.81 ID:pBTqvDfH.net]
>>861
ウチはi6700メモリ8Gだな。20秒くらいボケーっとしてたらコンパイル完了する。
実実行より全然早い。

899 名前:デフォルトの名無しさん mailto:sage [2017/12/11(月) 23:43:41.01 ID:jF/PrBtV.net]
>>866
んー32bitでコンパイルしてみるかな
64bitはマジ卍ヤバい

900 名前:デフォルトの名無しさん mailto:sage [2017/12/12(火) 00:19:40.23 ID:JpJzeAvs.net]
>>866
悪い
VCで /constexpr:steps 1000000を付けてコンパイルしたら4秒ほどでコンパイルが終わった
多分/MPも付けてるからだと思う
実行結果は25になった

gcc 7.2.0 64bitだとどんどんメモリを食って行って最後にスラッシングが起きる
馬鹿正直な実装をしているからかも知れないね

VCの方がいろいろとメモリを食わないように工夫されてるのかも

Clangでも/constexpr:steps は -fconstexpr-steps という形でサポートされてるようだから
多分行けると思う
メモリ64G積んでるし



901 名前:デフォルトの名無しさん mailto:sage [2017/12/12(火) 01:27:56.58 ID:qpuoD4bc.net]
>>868
いいマシーンだな。
まぁ、ウチはあれくらいで資源尽きちゃうけど、メモリ64Gもあったらもっと行けるな。
気が向いたらどうぞ。

902 名前:デフォルトの名無しさん mailto:sage [2017/12/12(火) 04:08:00.08 ID:SvlIPxM4.net]
>>858 Java
https://ideone.com/ND4D2n

903 名前:デフォルトの名無しさん mailto:sage [2017/12/12(火) 22:52:21.86 ID:38dJ/vud.net]
以下のURLのように、同じ色の点同士をつなぐゲームがある。
https://play.google.com/store/apps/details?id=com.bigduckgames.flow

N×Mの2次元配列が与えられる。配列の各要素は半角英字('a'-'z')または'*'である。
半角英字は色付きの点を表し、'*'は空のマスを表す。
'*'以外の文字は、配列中に必ず2個ずつ存在する。

このパズルの解を一つ出力せよ。
・'-'は左右のマスをつなぐ
・'|'は上下のマスをつなぐ
・'.'はマスをつながない

解がない場合は"No solution"と出力せよ。

[input]
***rg
**bg*
r****
ob*yo
****y

[output]
*-*-*-r.g
|.......|
*.*-b.g-*
|.|......
r.*.*-*-*
..|.|...|
o.b.*.y.o
|...|.|..
*-*-*.*-y

904 名前:デフォルトの名無しさん [2017/12/15(金) 09:30:54.91 ID:gDuLBiTf.net]
>>841
やってはないけど、そもそもこれ間違ってるのと、同じような発想でやるとしても
全ての素数での分類ではなく、3分割くらいのほうが効率がいいのと、
Σ (2の倍数) + Σ (3の倍数かつ2の倍数でない) + Σ (2と3で割り切れない) 
分割する事もなく、N項の和だとしたらNの階乗か分数をなくせる最小公倍数かけてもいい。それだと掛け算もしくは割り算がいくつも出てくるが。

905 名前:デフォルトの名無しさん [2017/12/16(土) 14:04:43.43 ID:+Cq6iaDY.net]
>>871
等幅フォントで表示しているエディタにコピペしてようやっと何を言わんとしているか分かった。
それってマスとマスの間に - または | を入れて繋ぐってことでいいんだよね? で、つながない所がピリオドだと。
(まあ等幅フォントのASCIIでやるならそれしか方法ないとは思うけど)。

906 名前:デフォルトの名無しさん [2017/12/16(土) 14:07:59.25 ID:+Cq6iaDY.net]
しかしピリオドは

**
**

の時に

*.*
...
*.*

のようになって中央のピリオドが本来なら不要なものになるわけだが、それはスペースでなくても良いのかな?
まあただの幅合わせだからどうでもいいものではあるが。

907 名前:デフォルトの名無しさん mailto:sage [2017/12/17(日) 12:04:31.10 ID:V69L7+t+.net]
>>801 の方法で出来ると書いてるけど
結局誰もやってないのか

個人的には(高速には)出来ないと思っている

908 名前:デフォルトの名無しさん mailto:sage [2017/12/17(日) 12:18:14.72 ID:V69L7+t+.net]
>>871
課題じゃなくて
単にソルバーの作成依頼でしょ

909 名前:デフォルトの名無しさん mailto:sage [2017/12/17(日) 17:50:05.54 ID:3PMrWzl3.net]
無理に線引かないでrだのgだので埋めた方がわかりやすいと思うがな
すべてのマスを埋めなければ

910 名前:ならないルールが抜け落ちてるみたいだから
実は別物のゲームで交差があるとかなったらそうはいかないが
[]
[ここ壊れてます]



911 名前:デフォルトの名無しさん [2017/12/17(日) 20:33:27.61 ID:0HU8GFa9.net]
ブレゼンハム的なやつって、始点と傾き(と区間や境界等で決まる明示されない終点)が
与えられた際に、終点座標を求めてから始点に向かうのってアリなんだろうか?

912 名前:デフォルトの名無しさん [2017/12/18(月) 08:21:39.40 ID:T+ClDj4W.net]
ここでやるには問題がでかすぎ
100分割してほしい

913 名前:デフォルトの名無しさん mailto:sage [2017/12/21(木) 14:37:42.61 ID:/SOyyWKP.net]
>>871 Ruby
https://ideone.com/EOj9mz
ただし解は1つでありかつ線が通らないマスは無いことを前提とする
問題はここから引用:→www.nikoli.com/ja/puzzles/numberlink

914 名前:デフォルトの名無しさん mailto:sage [2017/12/21(木) 14:38:13.66 ID:/SOyyWKP.net]
あ、あと出力方法は自分好みに適当にいじってる

915 名前:デフォルトの名無しさん mailto:sage [2017/12/21(木) 15:58:54.33 ID:jrnuCabF.net]
訂正
ただし解は1つでありかつ線が通らないマスは無いことを前提とする
ではなく
解が存在すればすべての解は全てのマスを通ることを前提とする

916 名前:デフォルトの名無しさん [2017/12/22(金) 19:30:58.88 ID:PPoMR9m8.net]
お題
22の分割(たとえば3+3+5+8)のうち
分割したそれぞれの数の逆数の和が1になるものを求める

917 名前:デフォルトの名無しさん [2017/12/22(金) 19:39:05.90 ID:PPoMR9m8.net]
早速間違えましたすみません
3 +5 +6 +8
でした

918 名前:デフォルトの名無しさん mailto:sage [2017/12/22(金) 20:06:25.02 ID:FRcsVGN9.net]
>>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]

919 名前:デフォルトの名無しさん mailto:sage [2017/12/22(金) 21:21:23.60 ID:Mb+deFNF.net]
C++で書いたけど、オセー。
デバッグ大変だ。
うーん。困ったなぁ。

920 名前:デフォルトの名無しさん mailto:sage [2017/12/22(金) 22:04:05.10 ID:Mb+deFNF.net]
https://ideone.com/3ZWKv1
C++。こんなコード書いてみたけど、無理ゲー。
ちょっと厳しいなぁ。最近解けてないなぁ。
ちなみにデバッグ不完全なのであしからず。



921 名前:デフォルトの名無しさん mailto:sage [2017/12/22(金) 22:16:42.15 ID:cfNB9eDL.net]
こういう数学的な問題を解くにはやっぱりプログラミング以前に数学を勉強した方がいいのでしょうか?

922 名前:デフォルトの名無しさん mailto:sage [2017/12/22(金) 22:23:25.38 ID:Mb+deFNF.net]
>>888
数学は大事だよー。
俺数学出来ないから、解けない問題がそれなりにある。
算数では限界だ〜〜。
まぁ、数学とプログラミングって習得時はオーバーラップするところが少ないから融合するまでちょっと大変かな。
でも数学は強力なツールです。

923 名前:デフォルトの名無しさん mailto:sage [2017/12/22(金) 22:40:51.06 ID:wxhiocJz.net]
一般論でいえば必要だろうけど>>883なんて全部列挙したところで計算量はたかが知れてるし
目下必要なのは論理学的思考能力なのでは

924 名前:デフォルトの名無しさん mailto:sage [2017/12/22(金) 22:51:38.40 ID:rSDEoHGj.net]
>>883 Java
https://ideone.com/WiMkNl

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

925 名前:デフォルトの名無しさん mailto:sage [2017/12/23(土) 10:08:16.78 ID:t1pvAVGb.net]
お題
52をいくつかの自然数に分解して
それらの最小公倍数を最大化せよ

926 名前:デフォルトの名無しさん mailto:sage [2017/12/23(土) 10:30:51.64 ID:NDYwz7Jw.net]
分解って、積じゃなくて和で良いんだよね?
数学の知識を使うと一瞬だけど

927 名前:デフォルトの名無しさん [2017/12/23(土) 10:47:21.72 ID:xQ13BTQc.net]
>>892
2*3*5*7*11*23

928 名前:デフォルトの名無しさん mailto:sage [2017/12/23(土) 10:51:04.98 ID:NDYwz7Jw.net]
>>894
ダメだろ

929 名前:デフォルトの名無しさん mailto:sage [2017/12/23(土) 10:54:01.61 ID:NDYwz7Jw.net]
数学の知識が無いなら素直にコンピューターの力を借りなさ

930 名前: []
[ここ壊れてます]



931 名前:デフォルトの名無しさん mailto:sage [2017/12/23(土) 11:07:49.77 ID:afY4COyy.net]
そもそも数学で簡単にとけない問題を力わざでとくための計算機だろ

932 名前:デフォルトの名無しさん mailto:sage [2017/12/23(土) 11:20:55.96 ID:2Y/dvvuZ.net]
>>894
よくわからんが52の場合は
180180 [3, 4, 5, 7, 9, 11, 13]
ということらしいぞ

933 名前:デフォルトの名無しさん [2017/12/23(土) 11:22:52.27 ID:TLP4YLw7.net]
2+3+5+7+11+13+11=52

934 名前:デフォルトの名無しさん mailto:sage [2017/12/23(土) 11:23:44.11 ID:ZIVZRbx3.net]
C++17発行されたから開発環境がさっさと対応してGCDくらい使えるようになりたい。

935 名前:デフォルトの名無しさん mailto:sage [2017/12/23(土) 20:45:26.14 ID:PT43Bq9S.net]
>>768の問題で0<=b<10,0<c<10という制限がついた時
移動を何回か繰り返すと必ず元に戻るんだけど
その回数はbには無関係にc,10-c,10の最小公倍数で
okかな?

936 名前:デフォルトの名無しさん mailto:sage [2017/12/23(土) 23:54:31.73 ID:PT43Bq9S.net]
一回の移動ではd=1ね。
ま、その制限を付けなくともd,c,10-c,10の最小公倍数になるんだろうけど

937 名前:デフォルトの名無しさん mailto:sage [2017/12/24(日) 06:15:12.28 ID:C5ELqEVz.net]
>>901-902
10-c,10の最小公倍数じゃね?

938 名前:デフォルトの名無しさん mailto:sage [2017/12/24(日) 12:14:01.21 ID:PCWcyI8B.net]
>>899
>>896

939 名前:デフォルトの名無しさん [2017/12/24(日) 13:55:05.53 ID:aCkD6VOe.net]
数学云々言ってる奴って、何故かその成果見せないよな。
俺でも出来そうなFUD、いやマウントかな。

940 名前:デフォルトの名無しさん [2017/12/24(日) 16:16:06.49 ID:7ASFTRv4.net]
ていうか、計算機はどちらかというと算数だよな。
数学は公式とか証明とか、そういう手順みたいなものを考えるわけで、プログラミングに近い。
コンピュータは作られたプログラムに従って計算結果を出すだけ。
もちろんプログラムそのものをコンピュータに作らせることも可能だけどね。これは次元が違う話だよね。



941 名前:デフォルトの名無しさん mailto:sage [2017/12/24(日) 20:21:20.17 ID:TJswah5E.net]
プログラムには算数と三角関数とかがあればいい
あとN進法

942 名前:デフォルトの名無しさん mailto:sage [2017/12/24(日) 22:49:45.08 ID:ke4WkGne.net]
行列演算とか諸々の配列操作関数がないと無理だな

943 名前:デフォルトの名無しさん mailto:sage [2017/12/24(日) 23:49:37.37 ID:HHMC0VFW.net]
では簡単なお題を
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

944 名前:デフォルトの名無しさん mailto:sage [2017/12/25(月) 00:09:45.09 ID:3pQBp6tI.net]
>>909 Java 手抜き実装二つ
https://ideone.com/jybq1N
https://ideone.com/Wm8OQ2

945 名前: mailto:sage [2017/12/25(月) 00:32:41.94 ID:LEWwY/wL.net]
>>909
c++old mevius.2ch.net/test/read.cgi/tech/1434079972/29

946 名前:デフォルトの名無しさん mailto:sage [2017/12/25(月) 02:44:06.33 ID:FXcNW9u1.net]
>>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)]}

947 名前:デフォルトの名無しさん mailto:sage [2017/12/25(月) 04:27:01.50 ID:Cnt90MG5.net]
>>909
https://ideone.com/dxqIrP
C++。まぁこれくらいなら算数でも解ける範囲や

948 名前:な。
ただしコードがバグってないとは言ってない。へへ。
[]
[ここ壊れてます]

949 名前:デフォルトの名無しさん [2017/12/25(月) 06:21:01.65 ID:P1JMpVx5.net]
>>909 lisp
https://ideone.com/6D7LRp

950 名前:デフォルトの名無しさん [2017/12/25(月) 12:28:00.12 ID:Lg9qxqUa.net]
>>909
Kotlinらしくしてみようとはしたが、あまりにも短く、更に俺がまだよくKotlinを知らないためにこんな風になった。
https://paiza.io/projects/BpAXUQuDCaOSD6Q6GN4O8A
肝心な所はJavaとほぼ同じ。



951 名前:デフォルトの名無しさん mailto:sage [2017/12/25(月) 19:56:50.93 ID:IEH/2als.net]
>>909 F#
https://ideone.com/rRZ949

952 名前:デフォルトの名無しさん mailto:sage [2017/12/26(火) 10:23:38.85 ID:Hd2qVaf/.net]
>>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]

953 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 04:53:27.57 ID:N8L362th.net]
お題を捏造してやるぜ。
アンサーが42になる式を捏造せよ。という数学パズル。
小難しい式をでっち上げた人が優勝。
算数から数学、物理まで式になってればすべての手法が使用可能。統計とかでもいいよ。
制約は答えが42になることのみ。
解けるものはいるか?

954 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 04:55:12.31 ID:N8L362th.net]
あー、忘れてた。
ちゃんと検算して答えを確認できること。
俺、算数しかできないから、各種サービスにかけて検算できるのが望ましい。

955 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 04:57:55.88 ID:8O6aNcDe.net]
ぷろぐらみんぐ・・・?

956 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 05:01:29.85 ID:N8L362th.net]
ベンチマーク的な感じだな。
たまには本気を出したいだろ?お前ら。

957 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 05:04:57.45 ID:N8L362th.net]
当たり前だが、必要な関数が標準ライブラリになかったら自作すること。

958 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 07:10:57.10 ID:s+AqweGp.net]
>>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

959 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 07:34:31.76 ID:N8L362th.net]
>>923
元ネタはそれ。正解の一端。

960 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 08:07:25.24 ID:i+4FV8XV.net]
>>918
brainfuck
https://ideone.com/eJSjws



961 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 09:35:15.49 ID:wX0EFIYP.net]
>>918
難しさの判定を人間が気分でするしかないとなると死ぬまで気に入らないと
言い続けて終わらないようにもできてしまうわけで、少なくともお題の判定
方法としては適切ではないのではないか?

962 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 11:19:23.23 ID:ZkyapKMq.net]
式を捏造せよと言ってんのに、検算して答えがあってることを確かめろとか矛盾してて草

963 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 11:41:23.15 ID:N8L362th.net]
>>925
基本的かつ合理的。

>>926
投票制にする?

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

964 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 15:25:23.94 ID:0tvuK50P.net]
片山に次ぐ逸材かもしれないが出題者が馬鹿だとやる気が出ないという良い見本

965 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 15:31:12.30 ID:N8L362th.net]
自由を泳げないって不便だね。
何やっても良いんだからなんかすればいいって話なんだけど。
定型の答えなんか求めてないのは出題見ればわかるだろ。
発想力が欠如してるんじゃないか?

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

966 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 15:32:51.23 ID:N8L362th.net]
口だけのやつはぶっぶーですわ。

967 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 16:00:26.20 ID:4ng0NpPh.net]
自由を泳げないって

968 名前:デフォルトの名無しさん mailto:sage [2017/12/28(木) 18:49:12.75 ID:Er3In3fn.net]
Cコ:彡

969 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 00:30:23.43 ID:+gfutoXL.net]
>>909 rust
https://ideone.com/H6mdNM
・BigInt不使用
・n.to_s(b)の形にしたかったが素早く諦めた
・色んなところに迷いと妥協が見え隠れ

970 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 02:28:40.84 ID:IV3yH5ho.net]
お題:入力があったら6面のサイコロを振って出た目を出力してください
ただし数字を使ってはならない



971 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 03:07:31.93 ID:GekNq94X.net]
そういう数字を使ってはいけないって誰得なの?

972 名前:デフォルトの名無しさん [2017/12/29(金) 05:31:16.53 ID:5y9SQxLe.net]
>>935
Unicode の U+2680 〜 U+2685 は?
??????

973 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 09:00:41.20 ID:IV3yH5ho.net]
>>936
さぁ。。。

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

974 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 09:20:10.35 ID:GekNq94X.net]
>>935
https://ideone.com/GrYSWB
C++。こんな感じ?

975 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 09:29:20.12 ID:GekNq94X.net]
https://ideone.com/ZRXCD5
こっちの方がそれっぽいか。

976 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 20:57:46.71 ID:QkO9em45.net]
数字を使ってはならないってのが謎
AAで出力しろってか?

977 名前:デフォルトの名無しさん [2017/12/29(金) 21:21:03.51 ID:aTe03Y1I.net]
>>935
Rubyで。
p rand('abcdef'.length) + 'z'.length

978 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 21:28:13.36 ID:FAMD2vO+.net]
数字を使うなって表示なのかそれともソースなのか?

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

979 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 21:29:41.90 ID:u/2CuQjm.net]
両方だろ

980 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 21:50:46.64 ID:VnRfvHlH.net]
そもそも入力が何なのかすら意味不明。却下



981 名前:デフォルトの名無しさん [2017/12/29(金) 22:22:21.11 ID:1z8qBjEb.net]
お題
自然数 n を入力とし, a と b を乗ずると n になるような自然数 a と b を出力する.
a と b の侯補が複数存在する場合は, a と b の和がもっとも小さなものを出力すること.

982 名前:デフォルトの名無しさん [2017/12/29(金) 22:32:07.85 ID:5y9SQxLe.net]
>>938
じゃあUnicodeのU+2680からの文字を使った版。Kotlinで。
https://paiza.io/projects/GElJ8jIbi45jocyYirbO8w
入力があったらの部分は最初の readLine() だ。
下の「入力」タブの所で改行を一つ入れてあるので開いたら即出力がある。

983 名前:デフォルトの名無しさん [2017/12/29(金) 23:03:49.04 ID:5y9SQxLe.net]
>>935
また Kotlin。
サイコロの目の一つは5x5ビットあれば表現できるので配列に詰め込んで後で変換して出すようにした。
https://paiza.io/projects/uGhQ6cuRqbnlGc2TTvT92w?language=kotlin
別に配列でなくてもとにかく 5*5*6 (=150) bit 詰め込めるなら何でも良い。

984 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 23:13:30.16 ID:VnRfvHlH.net]
>>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
1

985 名前:1 * 1 = 11
3 * 4 = 12
13 * 1 = 13
7 * 2 = 14
[]
[ここ壊れてます]

986 名前:デフォルトの名無しさん mailto:sage [2017/12/29(金) 23:14:32.74 ID:VnRfvHlH.net]
>>949はRuby2.5.0ね

987 名前:デフォルトの名無しさん [2017/12/29(金) 23:25:01.60 ID:IY4nOP57.net]
>>935
https://paiza.io/projects/dpm1gJDuxMLd6pvQau8rig?language=kotlin

988 名前:デフォルトの名無しさん [2017/12/30(土) 00:34:17.12 ID:64dx8gku.net]
>>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

989 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 00:45:39.83 ID:6/kbfUjB.net]
>>949から100倍くらい早くなった
https://ideone.com/4qZ3Di

990 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 01:37:16.58 ID:2QbO+yEX.net]
>>951
出目が0〜6?

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



991 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 09:12:17.38 ID:6VD4P8Az.net]
>>946
https://ideone.com/GSawYb
C++。条件足りてるかよくわかってないけど、適当に書いたらそれぽい感じになった。
あってる保証はない。

992 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 09:19:03.41 ID:6VD4P8Az.net]
なんか俺の劣化>>953みたいな感じだな。
うーん。名案だとは思ったのだけど。むむむ・・・。

993 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 09:31:25.37 ID:6VD4P8Az.net]
うほ、フィルターしてる条件にバグがあった。良く動いてたな。

994 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 09:33:18.81 ID:6VD4P8Az.net]
これ、片方1のやつって素数かな?
エラトステネスの篩とどっちが軽いかな。

995 名前:デフォルトの名無しさん [2017/12/30(土) 12:46:04.20 ID:ZPxTZMGf.net]
お題
要素が素数, かつ要素の総和が2018になる集合のうち, 要素数がもっとも大きい集合を出力する.

996 名前:デフォルトの名無しさん [2017/12/30(土) 12:59:47.50 ID:64dx8gku.net]
>>959
[2]*(2018/2)

997 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 14:25:23.55 ID:6VD4P8Az.net]
>>959
https://ideone.com/lwcNQR
C++。DPの練習。必要な数はわかったが過程の表示の仕方がわからない。
どうすれバインダー。Orz

998 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 15:14:55.24 ID:6VD4P8Az.net]
>>961
https://ideone.com/DdepmL
C++。あってるか知らんけど、力業でベタ作業した結果、それっぽい数字にたどり着いた。
と、思ったら全然違う数字を指していた。

999 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 15:16:57.66 ID:6VD4P8Az.net]
>>959
https://ideone.com/XzeJ1E
C++。でけたー。DP難しいなぁ。

1000 名前:デフォルトの名無しさん [2017/12/30(土) 15:18:24.57 ID:ZOKm+QEU.net]
>>959
それ1なのでは?



1001 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 15:25:04.70 ID:6VD4P8Az.net]
要素数だから、コンテナカウントだと思って書いたんだけど。
え?題意勘違いしてる?

1002 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 15:25:53.45 ID:6VD4P8Az.net]
element countだよね?

1003 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 15:30:31.85 ID:qiSXHyFx.net]
2が1009個ある集合、>>960で答えが出てる

1004 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 15:32:23.03 ID:6VD4P8Az.net]
>>967
あー、それそういう意味だったのか。
うわー俺、蛇足だった。

1005 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 15:36:57.18 ID:6VD4P8Az.net]
>>967
それをさ、プログラムで解くのきつくない?
総当たりしないと俺は無理。重複許可すると途端に大変になる。

1006 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 16:05:45.05 ID:6VD4P8Az.net]
https://ideone.com/RVtf4i
適当に拡張してみたが、搭載メモリ8Gを使い切ってしまいデバッグ不可。
これ、意外と難問かもしれん。

1007 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 16:20:15.12 ID:6VD4P8Az.net]
ちょっとくどいけど、
これさ、量子アニーリングじゃないと解けないやつかなぁ??
なんかさっきからいじってるけど、ローカルポケットに落ちてる気がする。
グローバルポケットに落とす方法が皆目見当つかない。
解説頼む。

1008 名前:デフォルトの名無しさん [2017/12/30(土) 16:48:17.65 ID:ZPxTZMGf.net]
すみません, お題での 集合 は 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

1009 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 17:07:30.49 ID:YKsh4iwJ.net]
9個まではすぐ見つかるんだけど10個になった途端重くなる
10個の場合は存在しない?
逆に21個や33個の場合はすぐ見つかるんだ、どういう分布なんだろな

1010 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 17:11:07.91 ID:6VD4P8Az.net]
>>972
おー、よかった。どこまで深淵があるのか怖かったよ。
多分、>>963であってると思う。たぶん。



1011 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 18:48:52.49 ID:YKsh4iwJ.net]
>>959 C#
https://ideone.com/J9MmxS
33個と決め打ちした場合は4通りがすぐ出る
そのあと延々ループしてるがTime limit exceededで打ち切ってくれる

1012 名前:デフォルトの名無しさん [2017/12/30(土) 21:03:54.80 ID:30TR5CU8.net]
>>959
1も素数なんだが1が2018個ある集合はありなのか?
それだとお題としてほとんど意味のないひっかけ問題みたいになるわけだが、
そうではないなら問題を修正しろ。

1013 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 21:15:48.77 ID:KgXg1sy3.net]
>1も素数なんだが
>1も素数なんだが
>1も素数なんだが

1014 名前:デフォルトの名無しさん [2017/12/30(土) 21:23:36.74 ID:bLWDJrON.net]
>>977
あ、2か。
でも問題がこれだと同じことだよなあ。

1015 名前:デフォルトの名無しさん mailto:sage [2017/12/30(土) 21:26:45.29 ID:bA88XQgg.net]
>>976
4つ上のレスも確認できないくせに何言ってんの

1016 名前:デフォルトの名無しさん [2017/12/30(土) 21:42:01.90 ID:ZPxTZMGf.net]
一般に, 素数は 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

1017 名前: mailto:sage [2017/12/31(日) 00:33:09.15 ID:UjqOw9qv.net]
お題:指定した複数の wav フォーマットを連結して一つ wav ファイルを作成するプログラムを書け
・ファイルの指定方法はコマンドライン引数指定でかまわない
・wav ファイルフォーマットの仕様上の上限である 4GiB まで正常に結合できることを必須の最低条件とする
・PCM フォーマット・ステレオ2ch・サンプリング周波数 44.1kHz に対応しておればよい
・GUI に対応しておればなおよい

背景:いや、いろいろダウンロードして試しているのだけれども、4GiB まで正常に結合できるソフトウェアが見つからないのです‥

1018 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 01:09:52.02 ID:iFZSMKfw.net]
それでこのスレに辿り着くのは面白い

1019 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 01:21:45.50 ID:QH0un2fa.net]
前からこのスレにいる人でしょ。
お題としてはまったくこのスレに向いてないと思うが。

1020 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 01:55:26.47 ID:mjAZsjOp.net]
2000から3000位まで試してみたが、大体33前後になるみたい
(微妙に増加していくが緩慢)



1021 名前:デフォルトの名無しさん [2017/12/31(日) 03:02:32.19 ID:rf+Z6LCT.net]
>>981
これ使えないか?
hakobe932.hatenablog.com/entry/20060613/1150208682

1022 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 05:23:36.13 ID:Q5J3BQB7.net]
>>981
waveチャンクって2gbまでだっけ?sizeフィールドが32bitsignedだったような気がするんだけど。どうだっけ?

1023 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 05:28:08.43 ID:Q5J3BQB7.net]
書き出すのはそんなに難しくないんだけど、読み込むのが面倒なんだよなぁ。
それに、適当にくっつけるとくっつけたところにブツ!っていうのノイズが入ることがあったはず。

1024 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 05:33:17.47 ID:Q5J3BQB7.net]
https://ideone.com/AExWE6
これで、ちっちゃいやつは書き出した実績がある。ローカルの話だけどな。
読み込みはRiffの仕様よく知らないからわからない。

1025 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 09:49:37.67 ID:Jha/n6sD.net]
自分で書くよりfoobar2000でMerge all tracks into one output fileしちゃうよな
むしろ6GBとかいける、wave64になってんのかな

1026 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 10:12:35.10 ID:vp+PvkVL.net]
完全にスレチ

1027 名前: mailto:sage [2017/12/31(日) 13:06:54.78 ID:UjqOw9qv.net]
>>989
foobar2000 に merge する項目はありますか?
最新バージョンをインストールしましたが見当たりません‥

1028 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 14:14:14.10 ID:Jha/n6sD.net]
>>991
foo_converter.dllが標準で入ってるからそのまま使えるよ
スレチというかこの場合はサイト違いだな、Hydrogenaudioで検索した方が沢山みつかる

1029 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 19:53:16.48 ID:R6E+DNla.net]
"2018と素数" 類似問題
[お題]
前問よりどうやら、ユニークな素数の和で2018を作ると、
構成(要素)数 33個が最大で 4種類あるらしい。
最小は2個で27種類あるみたいだ。
3個だと 73種類、 4個だと 85014種類あるみたいだ。

ユニークな素数の和で2018を作る時、
最大の種類が作れるのは、構成数何個のときで、何種類か。

(注) 8個を超えると10億超えがしばらく続くらしい。

1030 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 19:58:31.90 ID:Q/CIq2T0.net]
>>981
ちゃんと理想の仕様を書けば作るけど



1031 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 20:02:31.92 ID:Q/CIq2T0.net]
>>986
32bit unsignedで(4Gi-1)Bまでだね
ファイルサイズも32bit unsigned

1032 名前:デフォルトの名無しさん mailto:sage [2017/12/31(日) 22:29:40.39 ID:q2wUTltf.net]
>>993 Java
https://ideone.com/DHe5Ij

1033 名前: mailto:sage [2018/01/01(月) 00:07:03.13 ID:JOZ5/YyG.net]
>>981
mevius.2ch.net/test/read.cgi/tech/1434079972/30
‥‥書初めになりました

1034 名前:デフォルトの名無しさん [2018/01/01(月) 06:04:16.51 ID:4wMbPbHX.net]
どうして2048ではなく2018などという中途半端な数にしたんだろうとずっと不思議に思っていたのだが(お題だから敢えて変な数にしたのかとか思ったんだが)、ようやっとわかったよ。今年の西暦年だったんだね。

1035 名前:デフォルトの名無しさん mailto:sage [2018/01/01(月) 06:13:54.33 ID:+ZNxt5nC.net]
>>995
勘違いしてたか。訂正ありがとう。

1036 名前:デフォルトの名無しさん mailto:sage [2018/01/01(月) 08:09:01.71 ID:OeEKMk/d.net]
>>997
そっちのスレに書くと本当にBTC貰えるの?
てか、出題者と交渉したって貰える保障が全くなくて無意味なスレのような気がするんだけど。

1037 名前:1001 [Over 1000 Thread.net]
このスレッドは1000を超えました。
新しいスレッドを立ててください。
life time: 395日 15時間 10分 31秒

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






[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<280KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef