(define n (read))
(if (even? n) (print  (make-string (/ n 2) #\1)) (print(string-append "7" (make-string (- (quotient n 2) 1) #\1) ) ))