|
متميزة بكلية التربية بالجبيل
|
رد: ملخص جميع lab الذكاء الاصطناعي (معمل)أ.مريم+ورش العمل
مرحبا
هذا الباقي الملخصات وورش العمل(بالمرفقات)و
هذا كودمثال على القواعد
[frame="14 95"]
st(nada,20,female,photoshop,1,a).
st(reem,22,female,photoshop,2,b).
st(sa7ar,30,female,networks,1,c).
st(a7mad,22,male,networks,1,b).
st(ali,15,male,office,1,c).
st(samar,22,female,photoshop,1,a).
male(X):-
st(X,_,male,_,_,_).
female(X):-
st(X,_,female,_,_,_).
man(X):-
st(X,A,male,_,_,_),A>=20.
woman(X):-
st(X,A,female,_,_,_),A>=20.
boy(X):-
st(X,A,male,_,_,_),A<20.
girl(X):-
st(X,A,female,_,_,_),A<20.
groub(X,Y):-
st(X,_,female,photoshop,_,a),
st(Y,_,female,photoshop,_,b).
groub2(X,Y,Z):-
st(X,_,_,office,_,_),
st(Y,_,_,photoshop,_,_),
st(Z,_,_,networks,_,_).
groub3(X,Y):-
st(X,_,_,photoshop,1,_),
st(Y,_,_,photoshop,2,_).
groub4(X,Y):-
man(X),st(X,_,_,networks,_,_),
woman(Y),st(Y,_,_,networks,_,_).
bannar:-
write("*******************"),nl,
write("* micky mouse *"),nl,
write("* *"),nl,
write("* disney land *"),nl,
write("*******************").
go:-
write("enter your name ?"),nl,
read(X),
write("welcome "),
write(X).
[/frame]
|