(define a (read)) (define b (read)) (define c (read)) (define d (read)) (print(remainder(* a b c)d))