scheme

やってみた: (1 2 3 4 5)が与えられたとき( (1 2) (2 3) (3 4) (4 5) )を返すような関数の定義

答え見ないでやってみた vallog: [1,2,3,4,5] が与えられたとき [[1,2][2,3][3,4][4,5]] を返すような関数を定義せよ #!/usr/bin/env gosh (use srfi-1) (use util.list) (use gauche.test) ;; 1 だけならこれ (define (slices* lis) (zip lis (cdr lis))) ;…

10分でコーディングをやってみた

10分でコーディング | プログラミングに自信があるやつこい!!まずRubyでやってみた。 (予想通り)10分以上かかる。StringとかArrayとかのマニュアルにちゃんと目を通しておかないと、自分の頭に浮かんだ解法とそれをどうRubyで表現できるか(or できないか…

自然対数の底eを連分数展開で計算する

自然対数の底eといえばですが、これを連分数展開するととなるそうです。面白いですね。Schemeで書いてみました。 ;;(+ 2 (/. 1 (+ 1 (/ 1 (+ 2 (/ 2 (+ 3 (/ 3 (+ 4 (/ 4 (+ 5 (/ 5 (+ 6 (/ 6 (+ 7 0))))))))))))))) (define (e) (let loop ((i 1) (f (lambd…