ゲームの体をした マルチ商法 です。 ゲームで金儲けしようっていう時点で、もはやゲーマーではないです。 ゲームを趣味にしてゲームを愛してやまない人達と一緒にしないでもらいたい。 迷惑です！ 以上。

日本語版くるううううう！！ www.spike-chunsoft.co.jp PC版は無理かなー？ (でもウィッチャー3の件もありますし・・・) PS5版買いますからっ！！ PC版もお願いします！ｗ (どうしても無理なら PS5 版で遊びますけども) 知らない人向けに説明しますと、AD&D …

問題 2.70まず符号化がバグってたので直しました。 encode 手続きは本書に載ってるものそのままです。 (define (encode message tree) (if (null? message) '() (append (encode-symbol (car message) tree) (encode (cdr message) tree)))) (define (encode…

問題 2.69 みんな大好きハフマン符号化木！ (define (make-leaf symbol weight) (list 'leaf symbol weight)) (define (leaf? object) (eq? (car object) 'leaf)) (define (symbol-leaf x) (cadr x)) (define (weight-leaf x) (caddr x)) (define (make-code…

某セブン◯レブンのカシミールカレー・・・ まっずい 辛いだけで旨味なんて何も無し。 これ美味しいとか言ってる奴は 病院行って舌を診てもらったほうがいいぞ。 どこに旨さがあるんだこのカレー。 ただひたすら辛いだけ。唐辛子の汁かってぐらいまずい。 カ…

www.youtube.com ランちゃーーーーーん！（野太い声 今も昔もランちゃん派です。可愛すぎんか？ 昭和のアイドル最強すぎんか。 もしかすると知らない人も居るかもしれないので、 サムネの人↑がランちゃん。ポジションはセンター。メンバーカラーは赤。 CANDI…

途中の問題は後であげますね。面倒くさくてｗ問題 2.42 みんな大好きエイトクイーンパズル！ (define nil '()) (define (fold-right op initial sequence) (if (null? sequence) initial (op (car sequence) (fold-right op initial (cdr sequence))))) (def…

ついに製品版がリリースされました！ やったーパチパチパチ！！ やるよ！ でも今日はもう遅いんで、 今からやると朝になっちゃうからｗ やめとこう。 公式には日本語未対応ですが、日本語でプレイしますっ！！ （いろいろネットで調べて日本語対応しましたｗ…

久々にレイド参戦！ ©2019 Bandai Namco Online Inc. ©2019 Bandai Namco Studios Inc. そんなに上手くは無いと思うんだけど、みんなサボりまくってるのかな？ ていうか「救護賞」がめっちゃいっぱいあるんだけどバグってね？ｗ 大丈夫なんこれｗｗｗ

news.yahoo.co.jp リモートワークでも、きちんと仕事ができる人と、できない人がいます。 で、できない人は出社、できてる人はリモートワークで問題ないと思うのですが、 「リモートワークができる人とできない人がいるのは不公平だ！」 みたいな謎理論で、…

インストール時に自動で外部記憶装置ｗ*1をスキャンするのですが・・・ けしからんゲーム*2で検出しますたｗｗｗｗｗ 正規に買ってるゲームなのでたぶん誤認識だとは思うんだけども。HDD の肥やし状態になってたゲームなので、一応駆除しておきました。 あー…

ESET を使っていますがライセンス更新が迫っているので、どうしようかと思っていたところ、Windows セキュリティは検出率も優秀だし十分という話も最近ではよく聞くので、試しに数日 ESET から Windows セキュリティ にしてみたのですよ。ESET をアンインス…

問題 2.13 (define (make-center-percent c p) (make-center-width c (* c p)))前問で、make-center-percent 手続きは make-center-width 手続きを使って実装しました。 (define (make-center-width c w) (make-interval (- c w) (+ c w)))アリッサがした実…

問題 2.12 本文では、パーセント指定を 3.5±0.15 みたくしたいということなので、 そのまま実装すると (define (make-center-percent c p) (make-center-width c (* c p))) (define (percent i) (/ (width i) (center i)))こうなります。 ;; r1 = 6.8Ω ±10% …

問題 2.11 mul-interval 手続きに渡される r1, r2 の符号の組み合わせを考えます。 ;; r1 r2 ;; + + + + : o ;; + + + - : x ;; + + - + : o ;; + + - - : o ;; + - + + : x ;; + - + - : x ;; + - - + : x ;; + - - - : x ;; - + + + : o ;; - + + - : x ;;…

問題 2.10 make-interval 手続きの a, b は、それぞれ下限許容限界値 上限許容限界値です。 0 をまたぐ interval を div-interval 手続きに渡すと、内部の make-interval 手続きで a > b となる interval が発生してしまい、make-intercal 手続きの仕様に合…

問題 2.9 区間の幅 width 手続きの実装から。 (define (width x) (/ (- (upper-bound x) (lower-bound x)) 2.0))本文の説明をそのまま書くだけです。r1 と r2 は同じ抵抗を使います。 (define r1 (make-interval 6.12 7.48)) (define r2 (make-interval 4.47…

問題 2.6 ;; one (define one (lambda (f) (lambda (x) (f x)))) ;; two (define two (lambda (f) (lambda (x) (f (f x)))))確かこんな感じだったｗ 次いってみよー。問題 2.7 (define (make-interval a b) (cons a b))make-intarval はこのように実装されて…

問題 2.5 まず掛け算についておさらいしておこう。 ・偶数と偶数を掛け算したときに、結果は偶数になる？それとも奇数になる？ ・奇数と奇数を掛け算したときに、結果は偶数になる？それとも奇数になる？この２つについてまず見ていこう。 偶数 x 偶数 = 2m …

コーナー名が変わってしまったが気にしたら負けだ！問題 2.4cons car cdr は標準装備の手続きなので、それぞれ lcons lcar lcdr とします。 (define (lcons x y) (lambda (m) (m x y))) (define (lcar z) (z (lambda (p q) p)))トレースすればわかります。 x…

問題 2.3 (define (average x y) (/ (+ x y) 2)) (define (make-segment start-point end-point) (cons start-point end-point)) (define (start-segment seg) (car seg)) (define (end-segment seg) (cdr seg)) (define (make-point x y) (cons x y)) (defi…

問題 2.2 (define (average x y) (/ (+ x y) 2)) (define (make-segment start-point end-point) (cons start-point end-point)) (define (start-segment seg) (car seg)) (define (end-segment seg) (cdr seg)) (define (make-point x y) (cons x y)) (defi…

news.yahoo.co.jp ソシャゲは ゲームの体をした集金システム であり、子供にとって害でしかありません。 親であるあなたは、そんな事言われなくともよく理解しているはずです。 大人が暇つぶしでソシャゲをするのは別に良いでしょう。 自分で稼いだお金をど…

不動点の復習をしようと思って始めたのですが、第1章は全部は復習していませんが、最後の問題まで終わってしまったので、第2章をやりますか。暇だし。の前に、第 1 章の締めくくりとして本文に書いてあることは、とても大切なのでメモしておこう。 Lisp は他…

問題 1.46 (define (average x y) (/ (+ x y) 2)) (define tolerance 0.00001) (define (close-enough? v1 v2) (< (abs (- v1 v2)) tolerance)) (define (iterative-improve improve enough? first-guess) (define (iter guess) (let ((next (improve guess)…

news.yahoo.co.jp よし、じゃあ Scheme を勉強しよう。Scheme はとてもコンパクトな言語なので、すぐ覚えられるよ。R5RS という Scheme 言語の仕様書に設計思想が書かれているので紹介しよう。 プログラミング言語の設計は，機能の上に機能を積み重ねること…

暇すぎて復習が捗りすぎぃｗ問題 1.45 (define nil '()) (define (average x y) (/ (+ x y) 2)) (define (square x) (* x x)) (define (enumerate-interval low high) (if (> low high) nil (cons low (enumerate-interval (+ low 1) high)))) ;; (define to…

まとめて解答していく！問題 1.41 (define (inc n) (+ n 1)) (define (double f) (lambda (x) (f (f x))))問題省略、解説省略。 gosh> (((double (double double)) inc) 5) 21double で 2 回 これを double で 4 回。 これをさらに double なので 16 回。 5 …

問題1.40 newtons-methodの手続きと一緒に (newtons-method (cubic a b c) 1)の形の式で使い、三次式 x3 + ax2 + bx + c の零点を近似する手続き cubic を定義せよ。本文に、 変換 x → g(x) が微分可能な関数であれば、方程式 g(x) = 0の解は である。 とあ…

問題 1.8 立方根をとる Newton 法は y が x の立方根の近似値なら、よりよい近似は の値で与えられるという事実によっている。この式を使い平方根の手続きと似た立方根の手続きを実装せよ。 (数式面倒くさいけど頑張って書きました。褒めてｗ) (define (squa…