Saltar al contenido
EjemplosEnglishEspacio →

Factorial y potencia

Funciones que calculan el factorial y una potencia.

Nivel
Intermedio
Conceptos:
Entrada y salida
Funciones
Para
Abrir en Codoritmo

Ejecuta, modifica y depura este ejemplo en el navegador.

Lo que aprenderás

Una Funcion recibe parámetros y devuelve un valor en la variable que va antes de <-. Puedes llamarla dentro de un Escribir como si fuera una función de PSeInt.

Código

factorial-power.psc · 25 líneas
Funcion resultado <- Factorial(n)    Definir resultado, i Como Entero    resultado <- 1    Para i <- 2 Hasta n Hacer        resultado <- resultado * i    FinParaFinFuncionFuncion resultado <- Potencia(base, exponente)    Definir resultado Como Real    Definir i Como Entero    resultado <- 1    Para i <- 1 Hasta exponente Hacer        resultado <- resultado * base    FinParaFinFuncionAlgoritmo FactorialYPotencia    Definir n Como Entero    Escribir "Escribe un número:"    Leer n    Escribir n, "! = ", Factorial(n)    Escribir "2 elevado a ", n, " = ", Potencia(2, n)    Escribir "Comprobación con el operador ^: ", 2 ^ nFinAlgoritmo

Diagrama de flujo

Cada bloque del diagrama corresponde a una instrucción del código.

Algoritmo FactorialYPotencia
Algoritmo FactorialYPotenciaAlgoritmo FactorialYPotenciaAlgoritmo FactorialYPotenciaDefinir n Como EnteroDefinir n Como EnteroEscribir "Escribe un número:"Escribir "Escribe un número:"Leer nLeer nEscribir n, "! = ", Factorial(n)Escribir n, "! = ",Factorial(n)Escribir "2 elevado a ", n, " = ", Potencia(2, n)Escribir "2 elevado a ", n, "= ", Potencia(2, n)Escribir "Comprobación con el operador ^: ", 2 ^ nEscribir "Comprobación con eloperador ^: ", 2 ^ nFinAlgoritmoFinAlgoritmo
Funcion Factorial
Funcion FactorialFuncion resultado <- Factorial(n)Funcion resultado <- Factorial(n)Definir resultado, i Como EnteroDefinir resultado, i ComoEnteroresultado <- 1resultado <- 1Para i <- 2 Hasta n HacerPara i <- 2 Hasta nresultado <- resultado * iresultado <- resultado * iFinFuncion (devuelve resultado)FinFuncion (devuelve resultado)
Funcion Potencia
Funcion PotenciaFuncion resultado <- Potencia(base, exponente)Funcion resultado <-Potencia(base, exponente)Definir resultado Como RealDefinir resultado Como RealDefinir i Como EnteroDefinir i Como Enteroresultado <- 1resultado <- 1Para i <- 1 Hasta exponente HacerPara i <- 1 Hasta exponenteresultado <- resultado * baseresultado <- resultado * baseFinFuncion (devuelve resultado)FinFuncion (devuelve resultado)

Ejemplo de ejecución

Esto muestra el programa al ejecutarlo. Las respuestas escritas por el usuario aparecen resaltadas.

Escribe un número:Respuesta del usuario: 66! = 7202 elevado a 6 = 64Comprobación con el operador ^: 64

Desafío

Crea una función Sumatoria(n) que sume los números de 1 a n.

Ver pista

Copia la estructura de Factorial, pero empieza en 0 y suma en lugar de multiplicar.

Abrir en Codoritmo