(define (solve n)
  (cond [(member n (list 2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61)) "Sosu!"]
        [(member n (list 4 9 16 25 36 49)) "Heihosu!"]
        [(member n (list 8 27)) "Ripposu!"]
        [(member n (list 6 28)) "Kanzensu!"]
        [else n]))

(define (main args)
  (let ([n (read)])
    (print (solve n)))
  0)