Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Tarea Arreglos- Gonzalez Hernandez Edgar Alejandro
objeto:- write('{'),read(X), (X='atributo'->atributo),write('}'). atributo:- read(X), write('"'), write(X), write('":'),tipoatributo(X),a1. a1:- read(X),(X='atributo'-> write(','),atributo; (X='fin'->write(''))). tipoatributo(M):- read(X), (X='metodo'->metodo(M); (X='numero'->numero); (X='cadena'->cadena); (X='objeto'->objeto); (X='arreglo'->arreglo); write('error')). cadena:- read(X), write('"'), write(X), write('"'). numero:- read(X), write(X). arreglo:- write('['), (read(X), atribArreglo(X)), write(']'). atribArreglo(X):- (X='fin',write('añade')); (X='numero'->numero, añadArreglo); (X='cadena'->cadena, añadArreglo); (X='objeto'->objeto, añadrreglo); (X='arreglo'->arreglo, addArr). añadArreglo:- read(X), write(','), atribArreglo(X). metodo(M):- write('"function() {'), a2, write(' return '), write(M), write(';}"'). a2:- read(X),(X='decision'-> decision;(X='asignacion'->asignacion); (X='fin'-> write(''); write('ERROR:'), write(X))). asignacion:- read(X), write(X), write('='), read(Y), write(Y), write(';'),a2. decision:- write('if('),condicion,write(')'), verdadero, falso. condicion:- read(X), write(X). verdadero:- write('{'),a2,write('}'). falso:- write('else {'),a2,write('}'). :-objeto.
run
|
edit
|
history
|
help
0
SuperQuerys
recusrivos y atributos
TareaPunto
THIRD LAB
método isan
2 - codificador JSON Empresa
Genetic Algorithm Robots
2.Examen
sanchez fuentes alan giovanni
MAX EDUARDO HERNANDEZ RENDON EJERCICIO 2