[過去ログ] プログラミングのお題スレ Part9 [無断転載禁止]©2ch.net (1002レス)
前次1-
抽出解除 レス栞

このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
142: 2017/03/05(日)09:20:54.74 ID:FnE3e1tn(2/2) AAS
>>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)
省14
260: 2017/06/02(金)23:44:04.74 ID:cFhdiKGB(1) AAS
三千円じゃ安い
340
(1): 2017/07/08(土)11:54:07.74 ID:H5pSyGdF(1) AAS
AA省
408
(1): 2017/07/23(日)18:50:17.74 ID:5CSy1R8t(1) AAS
基数を10のべき乗にするとか(printf()的なものが簡単だから)、乗算はunsigned shortやintとの
乗算に限るとか、除算無しとかいうのは…

プログラムの本体に組み込まれてしまって、再利用可能なライブラリの形で括りだされてる事の
方が少ないかw
629: 2017/11/16(木)14:11:34.74 ID:9+S8V57k(1/4) AAS
整数の範囲でも有理数の範囲でも答えが変わらないからつまらん

一旦非整数を経由しないと作れないのがないとやっぱり...
650
(2): 2017/11/19(日)22:39:02.74 ID:oda4btU4(1) AAS
500, 100, 50, 10, 5, 1円のすべての種類の硬貨を、1枚以上使って、
合計15枚で750円にする時、10円硬貨は何枚になるか?

A〜E の5人のランナーが走った結果、
完走したのは、1着とべべの2人で、残りの3人は、途中で棄権した

ここで、完走した2人は、必ず真実を言い、
棄権した3人は、必ず嘘をつくものとする
(つまり、事実に対して、真偽値を取る)

A: D は棄権した
B: A は、べべだった
C: E は棄権した
省3
851: 2017/12/11(月)05:38:23.74 ID:pBTqvDfH(1/5) AAS
>>849
constexprにすれば実行時はほぼ計算無しにできると思う。
コンパイル時間半端ないけど。
950: 2017/12/29(金)23:14:32.74 ID:VnRfvHlH(3/3) AAS
>>949はRuby2.5.0ね
978: 2017/12/30(土)21:23:36.74 ID:bLWDJrON(1) AAS
>>977
あ、2か。
でも問題がこれだと同じことだよなあ。
前次1-
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.037s