1.Proceso Tabla_zodiacal
2.Definir D Como Entero
3.Definir m,n como cadena
4.Escribir 'ingrese nombre'
5.Leer n
6.Escribir 'ingrese dia'
7.leer D
8.Escribir 'ingrese mes'
9.Leer m
10.si(D>=21 Y m="marzo") & (d<=20 y m="abril")entonces
11.Escribir N,'su signo aries'
12.FinSi
13.si(D>=21 Y m="abril") & (d<=20 y m="mayo")entonces
14.Escribir N,'su signo aries'
15.FinSi
16.si(D>=21 Y m="mayo") & (d<=20 y m="junio")entonces
17.Escribir N,'su signo aries'
18.FinSi
19.si(D>=21 Y m="junio") & (d<=20 y m="julio")entonces
20.Escribir N,'su signo aries'
21,FinSi
22.si(D>=21 Y m="julio") & (d<=20 y m="agosto")entonces
23.Escribir N,'su signo aries'
24.FinSi
25.si(D>=21 Y m="agosto") & (d<=20 y m="septiembre")entonces
26.Escribir N,'su signo aries'
27.FinSi
28.si(D>=21 Y m="septiembre") & (d<=20 y m="octubre")entonces
29.Escribir N,'su signo aries'
30.FinSi
31.si(D>=21 Y m="octubre") & (d<=20 y m="noviembre")entonces
32.Escribir N,'su signo aries'
33.FinSi
34.si(D>=21 Y m="noviembre") & (d<=20 y m="diciembre")entonces
35.Escribir N,'su signo aries'
36.FinSi
37.si(D>=21 Y m="diciembre") & (d<=20 y m="enero")entonces
38.Escribir N,'su signo aries'
39.FinSi
40.si(D>=21 Y m="enero") & (d<=20 y m="febrero")entonces
41.Escribir N,'su signo aries'
42.FinSi
43.si(D>=21 Y m="febrero") & (d<=20 y m="marzo")entonces
44.Escribir N,'su signo aries'
45.FinSi
46.FinProceso
No hay comentarios:
Publicar un comentario