Ir ao conteúdo

Raiz e potência - Pascal - Como?


MESTRE-ANDREI

Posts recomendados

Postado

aí..

tipo.. tem duas fç q fazem isso...

sqr(numero) eleva um numero ao quadrado

sqrt(numero) tira raiz quadrada...

é possivel elevar os numeros ou tiar raizes maiores usando o logaritimo neperiano... mas eu não lemro como faz no momento =PP

espero ter ajudado hehe

Postado

fácil :D :

x elevado a y é igual a exp(y*ln(x))

portanto, A recebe 2 elevado a terceira:

A := exp(3*ln(2))

Falando nisso,

exp(x) é igual a e elevado a x.

:-BEER

  • 8 anos depois...
Visitante: linscomt
 
Postado

{Real para inteiro obs: pode usar trunc e outros}
{pode ser function ExTrTOInt }
function ExtendedTRuncTOinteger(Xext:Extended):integer;
begin
result := TRUNC(Xext);
end;

{Raiz quadrada com func}
function RaizQd(X:Extended):Extended;
begin
result := sqrt(X);
end;

{Numero elevado ao Numero}
function X_elevado_Y(X,Y:integer):integer;
var i,VL:integer;
begin
VL := X;
for i := 1 to Y-1 do
X:= X*VL;

result := X;
end;

Espero que ajude a todos.

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...