Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                

Ejercicio 2-8

Descargar como txt, pdf o txt
Descargar como txt, pdf o txt
Está en la página 1de 1

Algoritmo NumerosParesImpares

// Declarar variables
Definir num Como Entero
Definir contador Como Entero
Definir lista_numeros Como Cadena
Definir continuar Como Logico
contador <- 0
lista_numeros <- ""
continuar <- Verdadero

// Repetir hasta ingresar un número negativo o más de 10 números


Repetir
Escribir "Ingrese un número (negativo para terminar):"
Leer num

// Verificar si el número es negativo


Si num < 0 Entonces
Escribir "Se ingresó un número negativo. Terminando."
continuar <- Falso
Fin Si

// Determinar si el número es par o impar


Si num >= 0 Entonces
Si num % 2 = 0 Entonces
lista_numeros <- lista_numeros + "Par: " + ConvertirATexto(num) +
", "
SiNo
lista_numeros <- lista_numeros + "Impar: " + ConvertirATexto(num) +
", "
Fin Si
Fin Si

// Incrementar el contador
contador <- contador + 1

// Verificar si se han ingresado más de 10 números


Si contador >= 10 Entonces
Escribir "Se han ingresado más de 10 números. Terminando."
continuar <- Falso
Fin Si
Hasta Que continuar = Falso

// Mostrar todos los números ingresados


Escribir "Números recopilados: ", lista_numeros
FinAlgoritmo

También podría gustarte