derangement=: (A.&i.~ !)~ (*/ .~: # [) i.  NB. task item 1
subfactorial=: ! * +/@(_1&^ % !)@i.@>:  NB. task item 3