var k:char;
begin
  assign(input,'input.txt');
  assign(output,'output.txt');
  reset(input);

  close(input);
  rewrite(output);

  close(output);
end.