var
  d1,d2 : longint;
  c1 : char;
  s1,s2 : string;
begin
  readln(s1);
  d1:=length(s1);
  delete(s1,d1-2+1,2);
  s1[d1]:='###';
  s1[1]:='*';
  writeln(s1);
end.