Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Astar
:- dynamic(fact/1). astar(S):- solution(S), terminalstate, !. astar(S):- solution(S). astar(S):- repeat, gotonextstate, solution(S), (terminalstate,!);true. solution(10):- fact(10). gotonextstate:- retract(fact(X)), X2 is X+1, assert(fact(X2)). terminalstate:- fact(10). :- assert(fact(0)).
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
tarea completa
Morales Bazan Josue Jonathan - EXAMEN - 2daparte
Guzman_Goiz_Javier_EJE3
OBJETO
Empresa
Lin205
Extra. Pinales Escalona Eduardo Salvador
Generador cod. json.
THIRD LAB
Tarea: Arreglos JSON FLAR
Please log in to post a comment.