{ %fail }

program Project1;

var
  i: Longint;
begin
  i := 2;
  i := i div 0;
end.