La Web del Programador: Comunidad de Programadores
 
    Pregunta:  57923 - ¿EXISTE ALGUNA FUNCION EN DELPHI PARA POTENCIAS?
Autor:  Antonio Peña Lamorú
Bien!! Yo imparto Delphi7 sobre windows y necesito saber si existe alguna funcion para aplicaciones de consolas que me permita determinar la potencia enesima de un numero X. Se que yo mismo puedo contruir una funcion que se encargue de hacerlo, pero todavia no le he impartido ese conocimiento a mis alumnos asi que si alguien me puediera ayudar le estaria muy agradecido. Ah!!! y si no es mucho pedir y conoce alguna funcion que me haga lo mismo que el clrscr de Turbo Pascal tambien se lo agradeceria.

Saludos y gracias anticipadas
Tony.

  Respuesta:  Luis Felipe García Gutiérrez
pues tanto como existir no conozco, pero se puede hacer de forma sencilla:

procedura Potencia(num:integer; pot:integer):integer;
var
i:integer;
begin
result:=0;
for i:=1 to pot do
result:=result+(num*i);
end;

y para llamarla sería +- así:
Potencia(2,4);

espero sea útil!