-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Determina si un año es bisiesto o no.
1
2
3
4
5
6
7
8
9
2
3
4
5
6
7
8
9
Proceso AnoBisiesto
Escribir Sin Saltar "Ingresa el valor de anno:";
Leer anno;
Si ((anno MOD 4 = 0) Y (anno MOD 100 <> 0)) O anno MOD 400 = 0 Entonces
Escribir "el año es bisiesto";
SiNo
Escribir "el año no es bisiesto";
FinSi
FinProceso
Escribir Sin Saltar "Ingresa el valor de anno:";
Leer anno;
Si ((anno MOD 4 = 0) Y (anno MOD 100 <> 0)) O anno MOD 400 = 0 Entonces
Escribir "el año es bisiesto";
SiNo
Escribir "el año no es bisiesto";
FinSi
FinProceso