[過去ﾛｸﾞ] プログラミングのお題スレ Part9 [無断転載禁止]©2ch.net (1002ﾚｽ)

プログラミングのお題スレ Part9 [無断転載禁止]©2ch.net http://mevius.5ch.net/test/read.cgi/tech/1480579110/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 ﾚｽ栞

---

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

---

142: デフォルトの名無しさん [sage] 2017/03/05(日) 09:20:54.74 ID:FnE3e1tn >>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)) http://mevius.5ch.net/test/read.cgi/tech/1480579110/142

260: デフォルトの名無しさん [sage] 2017/06/02(金) 23:44:04.74 ID:cFhdiKGB 三千円じゃ安い http://mevius.5ch.net/test/read.cgi/tech/1480579110/260

340: デフォルトの名無しさん [sage] 2017/07/08(土) 11:54:07.74 ID:H5pSyGdF >>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 value] 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}" http://mevius.5ch.net/test/read.cgi/tech/1480579110/340

408: デフォルトの名無しさん [sage] 2017/07/23(日) 18:50:17.74 ID:5CSy1R8t 基数を10のべき乗にするとか(printf()的なものが簡単だから)、乗算はunsigned shortやintとの 乗算に限るとか、除算無しとかいうのは… プログラムの本体に組み込まれてしまって、再利用可能なライブラリの形で括りだされてる事の 方が少ないかｗ http://mevius.5ch.net/test/read.cgi/tech/1480579110/408

629: デフォルトの名無しさん [sage] 2017/11/16(木) 14:11:34.74 ID:9+S8V57k 整数の範囲でも有理数の範囲でも答えが変わらないからつまらん 一旦非整数を経由しないと作れないのがないとやっぱり... http://mevius.5ch.net/test/read.cgi/tech/1480579110/629

650: デフォルトの名無しさん [] 2017/11/19(日) 22:39:02.74 ID:oda4btU4 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着は誰か？ http://mevius.5ch.net/test/read.cgi/tech/1480579110/650

851: デフォルトの名無しさん [sage] 2017/12/11(月) 05:38:23.74 ID:pBTqvDfH >>849 constexprにすれば実行時はほぼ計算無しにできると思う。 コンパイル時間半端ないけど。 http://mevius.5ch.net/test/read.cgi/tech/1480579110/851

950: デフォルトの名無しさん [sage] 2017/12/29(金) 23:14:32.74 ID:VnRfvHlH >>949はRuby2.5.0ね http://mevius.5ch.net/test/read.cgi/tech/1480579110/950

978: デフォルトの名無しさん [] 2017/12/30(土) 21:23:36.74 ID:bLWDJrON >>977 あ、2か。 でも問題がこれだと同じことだよなあ。 http://mevius.5ch.net/test/read.cgi/tech/1480579110/978

---

ﾒﾓ帳

(0/65535文字)

---

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

---

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

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.040s