Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Object with array
objeto :- write('{'),aux1, write('}'). aux1 :- read(X), (X='atributo' ->atributo,aux2; X='fin'->write(''); write('te equivocaste 1'),write(X)). aux2 :- read(X), (X='atributo' ->write(' , '), atributo,aux2; X='fin'->write(''); write('te equivocaste 2'),write(X)). aux3 :- read(X), (X='valor' ->valor,aux4; X='fin'->write(''); write('te equivocaste 3'),write(X)). aux4 :- read(X), (X='valor' ->write(' , '), valor,aux4; X='fin'->write(''); write('te equivocaste 4'),write(X)). atributo :- read(Nbatributo), write('"'),write(Nbatributo),write('":'), valor. arreglo :- write('['),aux3, write(']'). valor :- read(X), (X='objeto' ->objeto; X='arreglo' ->arreglo; X='cadena'->read(Cadena), write('"'),write(Cadena),write('"'); X='numero'->read(Numero),write(Numero); write('te equivocaste 5'),write(X)). :- objeto.
run
|
edit
|
history
|
help
0
jproba inicio 9 nov
Query de agrupación Garduño Rubio Brandon Antonio
segundo ejercisio 8 feb
Examen Int Nego 30-mar-21
Agrupación Bayes
Clasificador con If's anidados- Guerrero Hernandez Angel
Programa completo
Salgado Sanchez Ivan_Examen2
Karyme-elseif
Salgado Sanchez Ivan_Examen2