Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
modificar para escribir el objeto vacío y el arreglo vacío
objeto :- write('{'), atributo, auxobjeto, write('}'). atributo :- cadena, write(':'), valor. auxobjeto :- read(X), (X='fin'->write(''); X='atributo'->write(', '),atributo,auxobjeto; write('errorauxobjeto '), write(X) ). valor :- read(X), (X='numero'->numero; X='cadena'->cadena; X='objeto'->objeto; X='arreglo'->arreglo; write('errorvalor '), write(X) ). numero :- read(X), write(X). cadena :- read(X), write('"'), write(X), write('"'). arreglo :- write('['), valor, auxarreglo, write(']'). auxarreglo :- read(X), (X='fin'->write(''); X='valor'->write(', '),valor,auxarreglo; write('error '), write(X) ). :- objeto.
run
|
edit
|
history
|
help
0
arreglos 9 sept
Sánchez López Fernando Gabriel - JSON arrays
Fii
Fuck
Clase 3, tarea
2 de marzo
Garcia Castillo Super Query
Error corregido
task1
IF ANIDADOS