Ejemplo: Inteligencia empírica con código fuente
“AGUILA O SOL”
Imprime “Dame opción águila o sol”
Var lanzamiento
Numero=Random (1 al 2)
If (Numero=1)
OpcionMaquina=águila
End if
If (Numero=2)
OpcionMaquina=sol
End if
If (lanzamiento=OpcionMaquina)
Imprime “EMPATE”
End if
If (lanzamiento=águila && OpcionMaquina=sol)
Imprime “GANA HUMANO”
End if
If (lanzamiento=sol && OpcionMaquina=águila)
Imprime “PIERDE LA MAQUINA”
End if
**********RESUELTO***********
Imprime “¿Qué escoges Sol o Águila?
Var OpcionHumano
Suerte=Random (1 al 2)
If (Suerte=1)
OpcionGanadora=Sol
Else
OpcionGanadora=Águila
End if
If (OpcionHumano=OpcionGanadora)
Imprime “GANA HUMANO”
Else
Imprime “GANA MAQUINA”
End if
0 comentarios:
Publicar un comentario