Pascal / math / Frexp

arccos, arccosh, arcosh, arcsin, arcsinh, arctan2, arctanh, arsinh, artanh, ceil, ClearExceptions, cosh, cotan, cycletorad, degtograd, degtorad, DivMod, EnsureRange, floor, � Frexp, GetExceptionMask, GetPrecisionMode, GetRoundMode, GetSSECSR, gradtodeg, gradtorad, hypot, ifthen, InRange, intpower, IsInfinite, IsNan, IsZero, ldexp, lnxp1, log10, log2, logn, Max, MaxIntValue, maxvalue, mean, meanandstddev, Min, MinIntValue, minvalue, momentskewkurtosis, norm, popnstddev, popnvariance, power, radtocycle, radtodeg, radtograd, randg, SameValue, SetExceptionMask, SetPrecisionMode, SetRoundMode, SetSSECSR, Sign, sincos, sinh, stddev, sum, sumofsquares, sumsandsquares, tan, tanh, totalvariance, variance,

Funcion: Frexp()
Sintaxis:

procedure Frexp(
 
  X: float;
 
  var Mantissa: float;
 
  var Exponent: Integer
 
);

Descripcion: regresa mantisa y exponente
Ejemplo:

Program Example14;
 
{ Program to demonstrate the frexp function. }
 
Uses math;
 
Procedure dofrexp(Const X : extended);
 
var man : extended;
    exp: longint;
 
begin
  man:=0;
  exp:=0;
  frexp(x,man,exp);
  write(x,' has ');
  Writeln('mantissa ',man,' and exponent ',exp);
end;
 
 
begin
//   dofrexp(1.00);
   dofrexp(1.02e-1);
   dofrexp(1.03e-2);
   dofrexp(1.02e1);
   dofrexp(1.03e2);
end.

Librerias Pascal

Libreria crt - CRT - Pantalla y teclado del PASCAL de Turbo que maneja la unidad
Libreria dos - DOS - Interface Turbo Pascal MS-DOS
Libreria Graph - Unidad para manipular los graficos de la pantalla compatible con TP
Libreria Objects - Objetos basicos compatible con TP
Libreria math - Rutinas adicionales matematicas
Libreria Printer - Provee de acceso a la impresora
Libreria strings - Rutinas para el manejo de cadenas
Libreria BaseUnix - Funcionalidad Basica de Linux
Libreria System - Manejo de Archivos - Funciones para la manipulacion de archivos en Pascal