Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Ejercicio 3 Examen Arredondo Amaro Carlos Jair
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('"'). arreglo :- write('['),valor,a2,write(']'). a2 :- read(X),(X='otro'->naarreglo;write('')). naarreglo :- write(','),valor,a2. numero:- read(X),write(X). :- objeto.
run
|
edit
|
history
|
help
0
tarea por punto extra
lk
TAREA ARREGLO
Fidel Adrian Sanchez Bravo
Raz tarea 11 de marzo
Morales Bazan Josue Jonathan - EXAMEN - 2daparte
codificacion de mercado
primer ejercicio
objetos con metodo y asignaciones infinitas
EMPRESA_INICIO