Pascal/Turbo Pascal - potenciacion en pascal

 
Vista:
Imágen de perfil de Horacio

potenciacion en pascal

Publicado por Horacio (1 intervención) el 29/03/2005 22:59:36
Deseo saber como se puede elevar un numero X a la potencia Y . Si es que existe una sola instruccion u operador aritmético
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:potenciacion en pascal

Publicado por Hurricane (39 intervenciones) el 30/03/2005 01:08:46
Con la siguiente función:

{ Entrega 'Base' elevada a 'Exponente' }
Function Pow(Base,Exponente :Real) :Real;
Begin
If IsPar(Exponente) then
Base := Abs(Base);
If (Base < 0) then
Pow := -1.0 * Pow(Abs(Base), Exponente)
Else
Pow := Exp(Exponente*Ln(Base));
End; {Pow}

Saludos ;-)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar