diff options
-rw-r--r-- | problem4.ijs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/problem4.ijs b/problem4.ijs new file mode 100644 index 0000000..93b27c9 --- /dev/null +++ b/problem4.ijs @@ -0,0 +1,4 @@ +ns=.100+i.900 NB. 3-digit numbers go from 100-999 +multsStrs=. ": each /:~ ~. ;ns*/ns +isPalindrome=. [: *./ |. = ] +problem4=: >_1{(;isPalindrome each multsStrs)#multsStrs |