Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Guerrero Hernández Angel, ejercicio 3 del examen
objeto :- write('{'), read(X),(X='atributo'->atributo; write('')),a1, write('}'). a1:- read(X),(X='atributo'->write(','),atributo,a1; X='fin'->write('')). atributo:-cadena, write(':'), valor. valor:- read(X), (X='numero'->numero; X='cadena'->cadena; X='arreglo'->arreglo; X='objeto'->objeto). cadena:-write('"'),read(X),write(X),write('"'). numero:- read(X),write(X). arreglo :- write('['),aR2,write(']'). aR2:- read(X),(X='atributo'->valor,aR3; X='finA'->write('')). aR3:- read(X),(X='atributo'->write(','),valor,aR3; X='finA'->write('')). :- objeto.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
jproba inicio 9 novV2
demostración clasificador
08-09-2021-qwery de redes bayesianas
ArreglosyAtributos_4CM70_RosanoVargasIvan
Calculadora de ISAN Flores López Angel Raymundo
Empresa_NavaArellano
Salgado Sanchez Ivan_Examen2
Tarea: Arreglos JSON FLAR
Arreglos-Alcántara Noriega Marco Antonio
Balance
Please log in to post a comment.