var
  w : widestring;
begin
  w:='äüö';
  writeln(w);
  writeln('äa');
end.