modulo pila2 importacion: elemento2 exportacion: // Pila con 100 elementos como maximo inst clase Pila { oculto Elemento el; Elemento2 e2; oculto entero cima; entero x; iniciar() { cima := 0; } estaLlena() dev logico { // aa // bb si (cima = 100.1) entonces // ERROR Semántico dev cierto; sino dev falso; finsi apilar(0, 0); } apilar(Elemento elem, entero i) { si (no estaLlena()) entonces cima := cima + 1; el := elem; finsi i := 1; // ERROR Semántico e2.haceralgo(); } estaVacia() dev logico { si (cima = 0) entonces dev cierto; sino dev falso; finsi } desapilar() dev Elemento { si (no estaVacia(1)) entonces // ERROR Semántico cima := cima - realaentero(1.0); dev el; sino dev el; finsi } } clase Programa { inicio() { Elemento ed; Pila p; TipoErr k; // ERROR tipo no declarado entero i; p := crear(Pila); escribir(Pila); p.iniciar(); i := p.cima; i := Pila; //ERROR i:=1; mientras (i < 10) hacer ed := crear(Pila); // ERROR Semántico ed.modificar(i); p.apilar(ed, i); i:=i+1; finmientras } } implementacion: