EJEMPLOS
DE ESTRUCTURAS SELECTIVAS (IF)
Proceso Grupo
Escribir "!!!!HOLA...¡¡¡, COMO
TE LLAMAS..????"
Leer nom
Escribir "DE QUE GRUPO ERES...??",
nom
Leer grupo
Si grupo=6207 Entonces
Escribir
"BIENVENIDO"
Sino
Escribir "NO ERES
BIENVENIDO"
Fin Si
FinProceso
Proceso Edad2
Escribir "Ingresa tu edad"
Leer edad
Si edad>=0 y edad<=3 Entonces
Escribir
"BEBE"
sino
Si edad>=4 y
edad<=11 Entonces
Escribir
"NIÑO"
sino
Si
edad>=12 y edad<=17 Entonces
Escribir
"ADOLESENTE"
sino
Escribir
"ADULTO"
FinSi
Fin Si
FinSi
FinProceso
Proceso Ecuacion
Escribir
'***************************************'
Escribir 'Ingresa el valor de los
coeficientes de la Ecuación de Segundo Grado'
Escribir 'Cúal es el valor de A'
Leer A
Escribir 'Cúal es el valor de B'
Leer B
Escribir 'Cúal es el valor de C'
Leer C
Det<-(B*B)-(4*A*C)
Si Det<0 Entonces
Escribir 'Tus raíces son
imaginarias, '
Escribir 'por lo que se
resuelven mediante números complejos'
Sino
Si Det=0 Entonces
Escribir 'Tus
raíces son iguales, '
x1<--B/2*A
Escribir 'El
valor de X1 y X2 es: ',x1
Sino
Escribir 'Tus
raíces son Reales, '
x1<--B+(rc(Det))/(2*A)
x2<--B-(rc(Det))/(2*A)
Escribir 'El
valor de X1 es: ',x1
Escribir 'El
valor de X2 es: ',x2
FinSi
FinSi
FinProceso
Proceso Edad1
Escribir "Ingresa tu edad"
Leer edad
Según edad Hacer
0,1,2,3:
Escribir
"bebe"
4,5,6,7,8:
Escribir
"niño"
9,10,11:
Escribir
"adolescente"
De Otro Modo:
Escribir
"adulto"
Fin Según
FinProceso
Proceso
Segun_SI
Escribir "Ingresa tu
grupo"
Leer grupo
Escribir "INGRESA TU
CAPACITACION"
Leer capacitacion
Si capacitacion="info"
Entonces
Segun grupo Hacer
4206:
Escribir
"46-I"
4207:
Escribir
"47-I... Bienvenid@"
6206:
Escribir
"62-I"
6207:
Escribir
"67-I"
De Otro Modo:
Escribir
"error"
Fin Según
sino
Si grupo=4205 Entonces
Escribir
"45-C"
Sino
Si grupo=6205
Entonces
Escribir
"65-C"
Sino
Escribir
"error2"
Fin Si
Fin Si
FinSi
FinProceso
EJEMPLOS
DE ESTRUCTURAS REPETITIVAS
Proceso
repetir2
Para i<-0 Hasta 10 Con Paso 4
Hacer
Escribir i, ".-
HOLA"
A=A+5
Escribir
'**************"
Escribir "EL VALOR
DE A ES: ",A
Fin Para
FinProceso
Proceso
Repetir4
r=0
Mientras r<=3 Hacer
r=r+1
Escribir "Ingresa
dos números, separados por enter"
Leer a,b
s<-a+b
m<-a*b
d<-a/b
Escribir "La suma
de tus números es: ",s
Escribir "La
multiplicación de tus números es: ",m
Escribir "La
división de tus números es: ",d
Fin Mientras
Escribir "Hasta la vista...
", nombre
FinProceso
Proceso Promedio
suma=0
r<-"si"
Mientras r="si" Hacer
c<-c+1
Escribir "ingresa
un numero"
Leer num
suma<-suma+num
Escribir
"¿continuar? si/no"
Leer r
Fin Mientras
p<-suma/c
Escribir "tu promedio es:
", p
FinProceso