(display (if (<= 400 (read)) "Yes\n" "No\n"))