summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPeter Mikkelsen <petermikkelsen10@gmail.com>2021-11-11 18:53:24 +0100
committerPeter Mikkelsen <petermikkelsen10@gmail.com>2021-11-11 18:53:24 +0100
commit8e04f9adc049c2a8281e6d943d5ed26220cedd56 (patch)
treebf94f294b1da09ba2a85ea4c9a600e2000057aac
parent496ace3ebf6e31ae06577dd8328cadd85f91e896 (diff)
Problem 71
-rw-r--r--problem71.ijs22
1 files changed, 22 insertions, 0 deletions
diff --git a/problem71.ijs b/problem71.ijs
new file mode 100644
index 0000000..923cd81
--- /dev/null
+++ b/problem71.ijs
@@ -0,0 +1,22 @@
+next =: {{%/-:+/2 x:max,y}}
+start =: 2r5
+max =: 3r7
+
+solve =: {{
+ lowBound =. 0
+ highBound =. y
+ guess =. 0
+ whilst. guess ~: lastGuess do.
+ lastGuess =. guess
+ guess =. <. -: lowBound+highBound
+ 'num denum' =. 2 x: next^:guess start
+ if. denum > y do.
+ highBound =. guess
+ elseif. denum < y do.
+ lowBound =. guess
+ end.
+ end.
+ num
+}}
+
+problem71 =: solve 1e6