ESCODIGO

Modularidad

EJEMPLO 1: Escribir un modulo esPrimo que permita determinar si un número es primo


  Parametros de Entrada : Numero : entero
  Parametros de Salida   : Boolean

  Inicio
  /*Un numero es primo si la cantidad de divisores que tiene es 2*/
    Para i = 1 , Numero Hacer
      Si Numero MOD i = 0 Entonces
        NroDivisores = NroDivisores + 1
    Si NroDivisores = 2 Entonces
      esPrimo = True
    Sino
      esPrimo = False
  Fin

Funciones

EJEMPLO 1: Escribir un modulo CambiarBase que permita la representación del número N en la base B


Modulo CambiarBase
Parametros de Entrada : Numero, Base : Entero
Parametros de Salida   : Entero

Inicio
  N = 0;
  Mientras Numero >= Base Hacer
  Inicio
    CamBase = Numero MOD Base * Potencia(10,N) +  CamBase
    Numero = Numero DIV Base;
    N = N + 1;
  Fin
  CambiarBase = CamBase
Fin

EJEMPLO 2: Escribir un Modulo para determinar la Potencia de un Número


Modulo Potencia
Parametros de Entrada : Numero: Real; Exponente : Entero
Parametros de Salida   : Entero

Inicio
  i = 0
  Poten = 1
  Mientras Exponente >= i Hacer
  Inicio
    Poten = Poten * Numero
    i = i + 1
  Fin
  Potencia = Poten
Fin