{ %fail } var a : word; begin if a<>'fsfds' then; end.