Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
ARREGLOS
objeto :- write('{'), read(X), (X='atributo'->atributo; write('')), write('}'). atributo:- cadena, write(':'), valor,a1. a1 :- read(X), (X='atributo'->write(','),atributo; X='fin'->write('')). X='pf'->write(',')). valor :- read(X), (X='numero'->numero; X='cadena'->cadena; X='metodo'->metodo; X='arreglo'->arreglo; X='objeto'->objeto). metodo:- write('"function() {'),instruccion,write('return a;}"'). instruccion:- read(X), (X='asignacion'->asignacion; X='decision'->decision; X='fin'->write('')). arreglo:- write('['), read(X), (X='valor'->valor,a2; write('')), write(']'). a2 :- read(X), (X='arreglo'->write(','),arreglo; X='fin'->write('')). decision:- write('if ('),read(X),write(X),write(')'),verdadero. verdadero:- write('{'),instruccion,write('}'). asignacion:- read(X),write(X),write('='),read(Y),write(Y),write(';'),instruccion. cadena:- write('"'),read(X),write(X),write('"'). numero:- read(X),write(X). :- objeto.
run
|
edit
|
history
|
help
0
ejercicio 8 feb
Tarea 4NM70 HCHCHP
Chem
Entrega empresa
Codificador de decisiones anidadas
2 de marzo
tarea para calif 1
json final
Tarea
Tarea SQL Query Arredondo Amaro Carlos Jair