A continuación se presentan algunos ejemplos que ilustran como empezar a programar:

EJEMPLO 1

Algoritmo: GRADOS A RADIANES

/* Este algoritmo convierte de grados a radianes.

Ejemplo de una Estructura Secuencial. */

Constante PI 3.1416

PRINCIPAL

inicio

      flotante GRAD, RAD ;

      leer (GRAD);

      RADGRAD * PI /180;

    /* El símbolo * indica multiplicación*/

     imprimir (RAD) ;

fin

 

EJEMPLO 2

Algoritmo: SEGUNDO GRADO

/* Calcula las raíces reales de la ecuación de segundo grado:

aX2 + bX + c = 0.

Ejemplo de Estructura de Bifurcación Condicional. */

PRINCIPAL

inicio

      flotante   a, b, c, d, X1, X2, RE, IM ;

      imprimir  (“DAME LOS VALORES DE a, b, c") ;

      leer (a, b, c) ;

      d (b *  b) – 4 * a * c ;

         si (d > 0)

            inicio

              /* La función sqrt calcula la raíz cuadrada */

                  X1 (-b + sqrt (d)) / (2 * a) ;

                  X2  (-b - sqrt (d))  / (2 * a) ;

                   imprimir (“LAS RAICES SON:") ;

                   imprimir (X1 , X2) ;

             fin

           sino

                  inicio

              /* La función fabs calcula el valor absoluto y la función sqrt calcula la raíz cuadrada */

                     d fabs (d) ;

                      RE -b / (2 * a) ;

                      IM  sqrt (d) / (2 * a) ;

                      imprimir (“ LAS RAICES SON IMAGINARIAS Y SON:") ;

                      imprimir (RE, IM) ;

               fin

fin


EJEMPLO 3

Algoritmo: POTENCIA

/* Calcula el número X elevado a la n.

Ejemplo de Estructura Ciclo Mientras. */

PRINCIPAL

inicio

      flotante X, pot, n, k ;

      imprimir (“Dame el valor de la base y del exponente") ;

      leer (X, n) ;

      k 0 ;

     pot  1 ;

     mientras  (k < n)

          inicio

               pot pot  *  X ;

               k k + 1 ;

          fin

     imprimir (“El resultado es" pot) ;

fin


EJEMPLO 4

Algoritmo: ÁREA MÁXIMA

/* Calcula cuando el área de un círculo es mayor a cierto valor dado.

Despliega el valor del radio para el cual todavía es menor y el área ocupada.

Ejemplo de estructura Ciclo Hacer_Mientras. */

     constante pi  3.1416

PRINCIPAL

inicio

      flotante    rad, inc, amax, área ;

      imprimir (“Radio Inicial") ;

      leer (rad) ;

      imprimir (“Incremento del Radio") ;

      leer (inc) ;

      imprimir (“Area Máxima") ;

      leer (amax) ;

           hacer

               inicio

                    area pi*rad*rad ;

                    rad   rad+inc ;

               fin

           mientras (amax > área)

                    rad rad-inc ;

                    area pi*rad*rad ;

                    imprimir (“Para el radio", rad) ;

                    imprimir (“se tiene un área de “, área) ;

                    imprimir (“que es menor el área máxima de “, amax) ;

fin


EJEMPLO 5

Algoritmo: PROMEDIOS

/* Para un grupo con N alumnos se calcula el promedio de sus calificaciones, teniendo cada alumno tres calificaciones diferentes.

Ejemplo de Estructura Ciclo Desde. */

PRINCIPAL

inicio

      flotante  N, i, j, SUM CALIF, PROM ;

      imprimir (“DAME EL NUMERO DE ALUMNOS") ;

      leer (N) ; 

      desde (i1; i < = N; i  i +1)

              inicio

                  SUM 0 ;

                   desde (j 1;  j < = 3; j j + 1)

                     inicio

                          imprimir ("DAME LA CALIFICACION", j) ;

                          leer (CALIF) ;

                          SUMSUM  + CALIF ;

                     fin

                 PROMSUM  /  3 ;

                 imprimir  (“EL PROMEDIO DEL ALUMNO ES", PROM) ;

              fin

fin