// Посмотрите, как выглядит ошибка выполнения при целочисленном делении на 0
begin
var i: integer := 0;
Print(2 div i);
end.