(define l (read)) ;箱の幅 (define k (read));ブロックの数 (print (* (floor (/ (- l 1) (* 2 k))) k))