Proceso invertido
Definir num, cf, inv, aux Como Entero
Leer num
aux<-num
Mientras aux>0 Hacer
cf <- aux MOD 10
aux <- (aux - cf)/10
inv<-inv*10+cf
FinMientras
Escribir "numero inicial :", num
Escribir "numero invertido:",
inv
FinProceso
Separata de trabajo 10 – Estructuras repetitivas MIENTRAS
Semana 13
Ejercicios explicativos
1. Construir un algoritmo que permita ingresar un número entero calcular su factorial. Emplear la estructura
repetitiva MIENTRAS.
Proceso factoriales
Definir n,fact,aux Como Real
fact<-1 // contador
aux<-1 // contador
Escribir "Ingrese n"
Leer n
Mientras aux<=n
Hacer fact<-
fact*aux aux<-
aux+1
FinMientras
Escribir n, "! = "
, fact
FinProceso
2. Dado un número entero positivo cualquiera, invertirlo y mostrarlo en pantalla.
