var
  s : string;
begin
  s:='asdf';
   if not(''<s) then
     halt(1);
end.