summaryrefslogtreecommitdiffstats
path: root/057.bc
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2009-05-16 15:02:25 -0500
committerJesse Luehrs <doy@tozt.net>2009-05-16 15:02:25 -0500
commit661f8268419e2961d06828b9625e90cd47b18f2f (patch)
treeb77a3a3ffbfc3672f4f7f33787d478578de92c40 /057.bc
parentad25423b766497251aa1ed946335c91aa962c582 (diff)
downloadprojecteuler-661f8268419e2961d06828b9625e90cd47b18f2f.tar.gz
projecteuler-661f8268419e2961d06828b9625e90cd47b18f2f.zip
solution to 57
Diffstat (limited to '057.bc')
-rw-r--r--057.bc18
1 files changed, 18 insertions, 0 deletions
diff --git a/057.bc b/057.bc
new file mode 100644
index 0000000..3ef738c
--- /dev/null
+++ b/057.bc
@@ -0,0 +1,18 @@
+#!/usr/bin/bc
+
+scale = 0
+numer = 1
+denom = 2
+count = 0
+for (iter = 0; iter < 1000; iter++) {
+ real_numer = numer + denom
+ if (length(real_numer) > length(denom)) {
+ dummy = count++
+ }
+ numer += denom * 2
+ tmp = numer
+ numer = denom
+ denom = tmp
+}
+count
+halt