Prolog

Agregar N elemetos a una Lista en Tiempo de Ejecución

domains
i=integer
li=i*
predicates
nondeterm ingreso(i,li)
nondeterm leer
clauses

ingreso(0,[]).
ingreso(N,L):- N1=N-1,ingreso(N1,L1),
write(”Ingrese Numero= “),
readint(E), L=[E|L1].

leer:- write(”Ingrese N= “),readint(N),N>0,
ingreso(N,L),
write(”Lista “,”\n”,L),nl.
goal
leer,
readln(_).
::::: Problema deGranjero ::::::

Ayuda al Granjero a pasar al Lobo, la oveja y su caja de Coles al otro lado del Río. La Canoa solo soporta al Granjero y tan solo una de sus pertenencias a la Vez.
Recuerda que:
LosLobos comen Ovejas, Las Ovejas comen Coles.

::::: Canivales y Misioneros ::::::

Ayuda a los 3 Canibales y 3 Misioneros a trasladarse al otro lado del lago.
Ten en Cuenta que:
Solo pueden viajardos a la vez.
Si el número de canibales supera al número de misioneros en algún lado del lago, estos se los comerán.

::::: Test Cruzar el Río ::::::

El objetivo es que la familia protagonista deljuego junto a un policía y un ladrón crucen un río usando una balsa.

Para hacerlo existen cinco reglas:

1.- Sólo dos personas en la balsa por vez.
2.- El padre no puede estar con ninguna desus hijas sin la presencia de su madre.
3.- La madre no puede estar con ninguno de sus hijos sin la presencia del padre.
4.- El ladrón (camisa a rayas) no puede estar con ningún miembro de la familiasi el policía no esta ahí.
5.- Los que manejan la balsa son: el padre, la madre y el policía.

Para jugarlo, click en Links relacionados y luego, cuando aparece la pantalla con siglas en japonéshay que pinchar sobre el círculo azul en la parte inferior derecha de la pantalla.

Para mover a los protagonistas hay que hacer click sobre ellas. La balsa se moverá al pinchar sobre los tubos rojosa cada lado del río.

::::: PROLOG ::::::

1. Vegetal o Animal
Este pequeño programa permite determinar si un objeto es vegetal o animal.
eje01.pro
Domains
P=symbolPredicates
nondeterm...