#!/usr/bin/env gosh

(define (abs x)
  (if (< x 0)
      (* -1 x)
      x))

(let ((input (read)))
  (display (abs (- input 1)))
  (newline))