// Посмотрите, как выглядит ошибка выполнения при целочисленном делении на 0
var i: integer := 0;

begin
  Write(2 div i);
end.