Функция Ldexp( X: Extended; Y: Integer ): Extended;

Модуль: Math

Описание
Функция вычисляет X*2Y.

Пример
var
  z1, z2: Real;
begin
...
  z1:= Ldexp(0.4, -3);     {z1:=0.05}
  z2:= Ldexp(0.4,  3);     {z2:=3.2}
...
end;