Ir ao conteúdo
  • Cadastre-se

Pascal/Delphi Exponenciação em Delphi 7


Visitante

Posts recomendados

Podem me explicar uma forma de fazer exponenciação?
Da forma que eu to fazendo não dá certo, tentei de algumas formas e não obtive sucesso. Vou continuar tentando mas se puderem me dar alguma luz ^^

var
	numero1, numero2, resultadoFinal: Integer;
implementation  
	numero1 := StrToInt(edt1.Text);
	numero2 := StrToInt(edt2.Text);
	resultadoFinal := Power(numero1,numero2);
	edt3.Text := IntToStr(resultadoFinal);

 

Link para o comentário
Compartilhar em outros sites

@Chato    você precisa de números com casas decimais , então crie variáveis do tipo double :

  a1,b1,c1 : double;

e  coloque a biblioteca Math lá no uses , e faça como na soma de números inteiros para pegar o que está no edit e converter para inteiro , depois use seu

power(base , expoente);

e depois para colocar no edit converta float para string

procedure TForm1.Button7Click(Sender: TObject);
begin
  a1 := strtoint(edit1.text);
  b1 := strtoint(edit2.text);
  c1 := Power(a1,b1);
  edit3.Text := floattostr(c1);
end;

 

Link para o comentário
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisa ser um usuário para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora

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...

 

GRÁTIS: ebook Redes Wi-Fi – 2ª Edição

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!