From 75e79bf2fcbf9c0b3e09bc5d8bf4fde307e42e7e Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Thu, 26 Aug 2021 14:30:53 +0200 Subject: problem 36 --- problem36.ijs | 6 ++++++ 1 file changed, 6 insertions(+) create mode 100644 problem36.ijs diff --git a/problem36.ijs b/problem36.ijs new file mode 100644 index 0000000..628cf70 --- /dev/null +++ b/problem36.ijs @@ -0,0 +1,6 @@ +bits =: 2&#.^:_1 +decimals =: 10&#.^:_1 +palindrome =: |.-:] +palins =: [: palindrome each bits;decimals +both =: [: *./ ;&palins +problem36 =: +/I.both"0 i.1e6 -- cgit v1.2.3