var x;
begin
  x := 0;
  if x > 0 then x := 1;
end.