UNIVERSIDAD NACIONAL
AUTÓNOMA DE HONDURAS EN EL
VALLE DE SULA (UNAH-VS)
Informática Administrativa
Asignatura: Lógica Computacional
Sección: 1800
Examen 3
Catedrática: Darlin Noe Madrid Fajardo
Nombre No. de Cuenta
Daniel Eduardo Sabillon Andino 20232000647
1. Calcular la suma de los primeros N números: Objetivo: Leer un
número N y calcular la suma de 1 hasta N usando Para.
Proceso SumaPrimerosN
Definir N, suma, i Como Entero
suma <- 0
Escribir "Ingrese un número N: "
Leer N
Para i <- 1 Hasta N Con Paso 1 Hacer
suma <- suma + i
Fin Para
Escribir "La suma de los primeros ", N, " números es: ", suma
FinProceso
2. Calcular la factorial de un número: Objetivo: Usar un
ciclo Para para calcular el factorial.
Proceso FactorialNumero
Definir N, factorial, i Como Entero
factorial <- 1
Escribir "Ingrese un número N: "
Leer N
Para i <- 1 Hasta N Con Paso 1 Hacer
factorial <- factorial * i
Fin Para
Escribir "El factorial de ", N, " es: ", factorial
FinProceso
3. Calcular el promedio de 3 notas: Objetivo: Pedir tres calificaciones
y mostrar el promedio.
Proceso PromedioNotas
Definir nota1, nota2, nota3, promedio Como Real
Escribir "Ingrese la primera nota: "
Leer nota1
Escribir "Ingrese la segunda nota: "
Leer nota2
Escribir "Ingrese la tercera nota: "
Leer nota3
promedio <- (nota1 + nota2 + nota3) / 3
Escribir "El promedio de las 3 notas es: ", promedio
FinProceso
4. Tabla de multiplicar de un número: Objetivo: Mostrar la tabla del
número ingresado del 1 al 10.
Proceso TablaMultiplicar
Definir num, i Como Entero
Escribir "Ingrese un número: "
Leer num
Para i <- 1 Hasta 10 Con Paso 1 Hacer
Escribir num, " x ", i, " = ", num * i
Fin Para
FinProceso
5. Contar cuántos números positivos y negativos se
ingresan: Objetivo: Leer N números y contar cuántos son positivos y
negativos.
Proceso ContarPositivosNegativos
Definir N, num, i, positivos, negativos Como Entero
positivos <- 0
negativos <- 0
Escribir "¿Cuántos números va a ingresar?: "
Leer N
Para i <- 1 Hasta N Con Paso 1 Hacer
Escribir "Ingrese el número ", i, ": "
Leer num
Si num > 0 Entonces
positivos <- positivos + 1
Sino
Si num < 0 Entonces
negativos <- negativos + 1
FinSi
FinSi
Fin Para
Escribir "Cantidad de números positivos: ", positivos
Escribir "Cantidad de números negativos: ", negativos
FinProceso