Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
MARTINEZ LOPEZ SAID - ARBOL
arbol :- write('ARBOL('),read(X),write(X),write(')'),aux1. rama :-write('RAMA('),read(X), write(X),write(')'),valor,aux1. aux1 :- read(X),(X='rama'->rama; X='arbol'->arbol; X='fin'->write('')). hoja :-write('HOJA('),read(X), write(X),write(')'),aux2. aux2 :- read(X),(X='hoja'->hoja; X='fin'->write('')). valor :-read(T),(T='hoja'->hoja). :- arbol.
run
|
edit
|
history
|
help
0
Ge
jproba inicio 9 novV3
ETS ingenieria del conocimiento
decisiones anidadas
tarea: lograr que un objeto tenga varios atributos
Tarea2_Tun_Rojas_Diana_Carolina
JSON_23-08_if_anidados
Tarea 4NM70 HCHCHP.2
Ejercicio 4 Bernardo Lemus Daniel
Base de Conocimiento Espinoza Francisco