reorganize examples
This commit is contained in:
17
examples/pi.script
Normal file
17
examples/pi.script
Normal file
@@ -0,0 +1,17 @@
|
||||
sum := 0.0
|
||||
k := 0
|
||||
|
||||
iterations := 100
|
||||
|
||||
while k < iterations {
|
||||
k_f := float(k)
|
||||
sum = sum + 1.0 / pow(16.0, k_f) *
|
||||
(4.0 / (8.0 * k_f + 1.0) -
|
||||
2.0 / (8.0 * k_f + 4.0) -
|
||||
1.0 / (8.0 * k_f + 5.0) -
|
||||
1.0 / (8.0 * k_f + 6.0))
|
||||
k = k + 1
|
||||
}
|
||||
|
||||
put("π ≈ ")
|
||||
print(sum)
|
||||
Reference in New Issue
Block a user