Ejemplos de algoritmo en pseint

EJEMPLO DE PROBLEMAS SECUENCIALES:

1) Suponga que un individuo desea invertir su capital en un banco y desea saber cuánto dinero ganara después de un mes si el banco paga a razón de 2% mensual.

Proceso sin_titulo 

    definir cap_inv, gan Como Real;
    cap_inv<-0;
    gan<-0;
    Imprimir "Introduzca el capital";
    leer cap_inv;
    gan<-cap_inv*0.02
    Imprimir "La ganancia a obtener es", gan;
FinProceso
 

EJEMPLO DW PROBLEMAS SELECTIVOS:

2) Determinar si un alumno aprueba a reprueba un curso, sabiendo que aprobara si su promedio de tres calificaciones es mayor o igual a 10; reprueba en caso contrario.

  Proceso sin_titulo
    definir nota1, nota2, nota3 Como Entero;
    Definir prom Como Real;
    nota1<-0;
    nota2<-0;
    nota3<-0;
    prom<-0;
    Imprimir "Ingrese la primera nota";
    Leer nota1;
    Imprimir "Ingrese la segunda nota";
    Leer nota2;
    Imprimir "ingrese la tercera nota";
    Leer nota3;
   
    prom<-(nota1+nota2+nota3)/3;
    si prom>=40; Entonces
        Imprimir "Alumno aprovado";
    Sino
        Imprimir "Alumno reprovado";
    FinSi
FinProceso