Pseudocódigo

pseudocode.md

01 - Suma

Algoritmo Suma
        Leer A, B
        C <- A + B
        Escribir 'El resultado de la suma es: ', C
FinAlgoritmo

02 - Multiplicación

Algoritmo Multiplicacion
        Leer A, B
        C <- A*B
        Escribir 'El resultado de la multiplicaci�n es: ', C
FinAlgoritmo

03 - División

Algoritmo Division
        Leer A, B
        C <- A/B
        Escribir 'El resultado de la divisi�n es: ' C
FinAlgoritmo

04 - Área y perímetro de un triángulo

Algoritmo areaDeUnTriangulo
      // Ingreso los datos
      Escribir "Ingrese los 3 lados de un triángulo: "
      Leer L1, L2, L3
      // Proceso los datos del perimetro en la variable "perímetro"
      PERIMETRO <- (L1 + L2 + L3)
      // Proceso los datos para el semi-perimetro
      SEMIPERIMETRO <- PERIMETRO / 2
      // Proceso los datos para el área según el teorema de Herón
      AREA <- (SEMIPERIMETRO * (SEMIPERIMETRO - L1) * (SEMIPERIMETRO - L2) * (SEMIPERIMETRO - L3)) ^ (1 / 2)

      // Perímetro = lado1 + lado2 + lado3 = 5.0 + 6.0 + 7.0 = 18.0
      // Semiperímetro = Perímetro / 2 = 18.0 / 2 = 9.0

      // área = (semiperímetro * (semiperímetro - lado1) * (semiperímetro - lado2) * (semiperímetro - lado3))
      // = raiz cuadrada de  (9.0 * (9.0 - 5.0) * (9.0 - 6.0) * (9.0 - 7.0))
      // = raiz cuadrada de  (9.0 * 4.0 * 3.0 * 2.0)
      // = raiz cuadrada de  (216.0)
      // 14.69694 (aproximado)

      Escribir "El perimetro es ", PERIMETRO
      Escribir "El área es ", AREA
FinAlgoritmo

05 - Fórmula general

Algoritmo Formula_general
        Definir a, b, c, x, x1, x2 como real
        Escribir "Dame el valor de a"
        Leer a
        Escribir "Dame el valor de b"
        Leer b
        Escribir "Dame el valor de c"
        Leer c
        x <- (b*b) - 4 * a * c
        
        SI x < 0 Entonces
                Escribir "Sin solución ya que X es menor a 0"
        SiNo
                x1 = (-b + RC(x)) / (2 * a)
                x2 = (-b - RC(x)) / (2 * a)               
        FinSi
        
        Escribir "X1 = ", x1 
        Escribir "X2 = ", x2
FinAlgoritmo

06 - Tabla de multiplicar

Algoritmo tablaDeMultiplicar
        Escribir "Ingrese la tabla: ";
        Leer tabla;
        Para i <- 1 Hasta 10 Hacer
                Escribir tabla," x ", i, " = ", (i * tabla);
        FinPara
FinAlgoritmo

07 - Número impar

Algoritmo numeroParImpar
        Escribir "Por favor ingrese un n�mero"
        Leer a
        
        Si a % 2 = 0 Entonces
                Escribir a," SI es un n�mero par"
        SiNo
                Escribir a," NO es un n�mero par"
        FinSi
FinAlgoritmo

08 - Arreglo numérico

Proceso arreglo_numerico
        Definir num como entero;
        CAPACIDAD = 5;
        Dimension num[CAPACIDAD];
        num[1] = 5;
        num[2] = 10;
        num[3] = 15;
        num[4] = 20;
        num[5] = 25;

        Para i <- 1 Hasta CAPACIDAD Con Paso 1 Hacer
                Escribir "Escribe un valor para el indice: ", i;
                LEER num[i];
        Fin Para

        Para i <- 1 Hasta CAPACIDAD Con Paso 1 Hacer
                ESCRIBIR num[i];
        Fin Para
 FinAlgoritmo

09 - Mayor de edad

Algoritmo mayorDeEdad
        
        Leer edad
        
        SI (edad < 18) Entonces
                Escribir "Usted es MENOR de edad"
        SiNo 
                Escribir "Usted es MAYOR de edad"
        FinSi

FinAlgoritmo

10 - Promedio por arreglos

Algoritmo promedioPorArreglos
        Definir numNotas como Entero
        Escribir "Ingrese el n�mero de materias a promediar"

        Leer numNotas
        Dimension notas[numNotas]
        
        Para i<-1 Hasta numNotas Con Paso 1 Hacer
                Escribir "Ingrese el valor de la nota #", i
                Leer notas[i]
        Fin Para
        
        promedio = (notas[1]+notas[2]+notas[3]) / 3
        
        Si promedio > 7.5 Entonces
                Escribir "Promedio aprobatorio de "
        SiNo
                Escribir "Promedio reprobatorio de "
        Fin Si

        Escribir promedio
FinAlgoritmo