let f a b c d e =
  let comp x y = if x <= y then 1 else -1
  in
  match List.sort comp [a;b;c;d;e] with
    [a;b;c;d;e] -> Printf.printf "%d %d %d %d %d\n"  a b c d e
  | _ -> ()
let () = Scanf.scanf "%d %d %d %d %d\n" f;;