From 87148a396856589ed5b22f02967b5c0eda0f70e2 Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Thu, 11 Nov 2021 19:56:12 +0100 Subject: Problem 76 --- problem76.ijs | 9 +++++++++ 1 file changed, 9 insertions(+) create mode 100644 problem76.ijs diff --git a/problem76.ijs b/problem76.ijs new file mode 100644 index 0000000..d5f070c --- /dev/null +++ b/problem76.ijs @@ -0,0 +1,9 @@ +NB. Copied from problem 31, and modified to work here +ways =: {{ + if. y=0 do. + x=0 + else. + +/([:(ways&(<:y)) x-y*])"0 i.>:<.x%y + end. +}} M. +problem76 =: (ways <:) 100 -- cgit v1.2.3