(* uudecoding *)

var
  fi, fo: text;


begin
  repeat
    read(f