blob: 5d683adc9a43b00e1bd7e203f1ba5df5c4d8ac4e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
#fib(0) is
# 1
#end
#fib(1) is
# 1
#end
#fib(n) is
# fib(n-1) + fib(n-2)
#end
#puts fib(100)
require 'yaml'
$memo = {}
if File.exists?("memofib.yaml") then
File.open("memofib.yaml", "r") do |f|
mem = YAML.load(f.read)
$memo = mem if mem
end
end
memofib(0) is
1
end
memofib(1) is
1
end
memofib(n) is
if $memo.include?(n) then
$memo[n]
else
f = memofib(n-1) + memofib(n-2)
$memo[n] = f
end
end
puts memofib(1000)
File.open("memofib.yaml", "w") do |f|
f.write YAML.dump($memo)
f.flush
end
|