Ejemplos de Visual Prolog(IA)

Publicado en por R05Y

%Hola espero y les sirva de verdad y perdon por no explicarlo, pero cualquier duda escribanme vale :D

%listas
meses([enero,febrero,marzo,abrirl,mayo,junio,julio,agosto,septiembre,octubre,noviembre,diciembre]).

mesMedio(X,[X|Y],Y).
mesMedio(X,[Z|L],[Z|M]):- mesMedio(X,L,M).

%preguntas
?-meses(L),mesMedio("marzo",L,M).

?-mesMedio("enero",[enero,febrero,marzo,abrirl,mayo,junio,julio,agosto,septiembre,octubre,noviembre,diciembre],M).


%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%utilizacion de operadores
porcentaje1(X,Y,Z):-Z is (X*Y)div 100.
porcentaje2
(X,Y,Z):-Y is X div Z.
porcentaje3
(X,Y,Z):-X is Y*Z.

porcentajeAdd
(X,Y,Z):-Z is ((X*Y)div 100)+X
.
porcentajeDel(X,Y,Z):-Z is ((X*Y)div 100)-X.

%preguntas
?- porcentaje1(230,10,Z).
      Z=23
?- porcentaje2(230,Y,23).

     Y=10
?- porcentaje3(X,10,23).
    X=230
?- porcentajeAdd(230,10,X).

   X=253
?- porcentajeDel(230,10,X).

   X=207

Etiquetado en Programacion

Comentar este post

Hoteles Granada 05/09/2010 17:33


Visual Prolog a que programa corresponde? Es lo mismo que Visual Basic o .Net? Ya nos comentareis, pero creo que eso que habeis puesto no es lo mismo que pienso yo jejeje.