mensajes
Cosa
{
copie 99 en x
copie 11 en pu
muestre "Ahora existo, soy una Cosa !\nTengo:\nprivado: x=\t", x,
"\npúblico: pu=\t", pu
}
DemePrivado(x) nop
MuestreSusDatos muestre "Tengo:\nprivado x= ", x, "\npúblico pu=", pu
/*AgregarAprivado(deme cuanto) copie x + cuanto en x ERROR en EJECUCIÓN
pues cuanto NO es cantidad sino Object*/
AgregarAprivado(deme cuanto es una cantidad) copie x + cuanto en x
}
tarea
{
muestre "Clase_y_tarea"
el objeto a es una Cosa
el objeto recibido es una cantidad
/*copie a.x en recibido ERROR: No accesible debido a su nivel de
protección BIEN */
copie a.pu en recibido /* BIEN */
muestre "Copiado desde a.pu ", recibido /* BIEN */
muestre "Salida directa: ", a.pu /* BIEN */
/*muestre "DemePrivado: ", a.DemePrivado ERROR: Ninguna sobrecarga
acepta 0 argumentos BIEN */
/*a.DemePrivado(recibido) ERROR Argumento inválido por el tipo de Flujo
(por defecto es doy) BIEN */
a.DemePrivado(deme recibido) /* BIEN */
muestre "Recibido con DemePrivado: ", recibido
copie 77 en a.pu
muestre "Copiado a a.pu: ", a.pu
/*copie x+10 en x ERROR: x NO existe BIEN */
a.AgregarAprivado(10)
a.MuestreSusDatos
}