diff options
| author | Peter Mikkelsen <petermikkelsen10@gmail.com> | 2021-09-28 11:34:17 +0200 |
|---|---|---|
| committer | Peter Mikkelsen <petermikkelsen10@gmail.com> | 2021-09-28 11:34:17 +0200 |
| commit | 233e5ef85e2372aca2b8147d73ff68109a0caf88 (patch) | |
| tree | 76bc4ade7c038e51f50f48934cb2d45e151c2cfb /problem55.ijs | |
| parent | cb11d04ba18d94b63479eef4cc9d42ddd2fd5f4a (diff) | |
Problem 55
Diffstat (limited to 'problem55.ijs')
| -rw-r--r-- | problem55.ijs | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/problem55.ijs b/problem55.ijs new file mode 100644 index 0000000..912db70 --- /dev/null +++ b/problem55.ijs @@ -0,0 +1,15 @@ +digits =: 10&#.^:_1 +reverse =: |.&.digits +next =: reverse+] +palindrome =: reverse=] +isLychrel =: {{ + r =. 1 + for_i. i.50 do. + if. palindrome y =. next y do. + r =. 0 + break. + end. + end. + r +}} +countBelow =: {{ +/isLychrel"0 i.y}} |