-----------------------------------------------------------------
Описание: function LongDiv(X: Longint; Y: Integer): Integer; inline($59/$58/$5A/$F7/$F9);
Назначение: Быстрая подставляемая подпрограмма деления на языке ассемблера, возвращающая целочисленное значение X/Y.