トップ «前の日記(2013-04-13(Sat)) 最新次の日記(2013-04-15(Mon))» 編集

屑俺日記

僕の備忘録(PC、UN*X、ネットワーク関連が中心)なんです。
自分の書いたところは適当(な時とか)に書き換えますので御了承を。

2013-04-14(Sun) 予報は下り坂っぽい

☆ 循環小数

recursion のことを考えたりしているうちに、 Wikipediaみたり検索しながらなんとなく。

1.242424 ... の場合、
x = 1.242424 ...
100x = 124.242424 ...
99x = 123
x = 123/99
x = 41/33

$ python  -c  'print 41/33.0'
1.24242424242

35.015231523 ... の場合、
x = 35.015231523 ...
10x = 350.15231523 ...
100000x = 3501523.15231523 ...
99990x = 3501173
x = 3501173/999990 (公約数はない)

$ ruby -e 'puts 3501173.0/99990'
35.0152315231523

よく分からないけど、どうやら合ってるっぽい。

☆ 何番目を消せ

なんか前に書いた気がするが、まあいいか。

(define rm_one
  (lambda (num lis)
    (cond
     ((zero? num) (cdr lis))
     ((null? lis) '())
     (#t (cons (car lis)
               (rm_one (- num 1)
                       (cdr lis)))))))

gosh> (rm_one 0 '(ゼロ いち 二つめ 三番目))
(いち 二つめ 三番目)
gosh> (rm_one 2 '(ゼロ いち 二つめ 三番目))
(ゼロ いち 三番目)
gosh> (rm_one 5 '(ゼロ いち 二つめ 三番目))
(ゼロ いち 二つめ 三番目)

[ツッコミを入れる]

リンクはご自由にどうぞ。でもURLや内容が変った場合はあしからず。

index.htmlはここから。