program t25;
var i : integer;
begin
  i := 'ab'
end.