// Universidad Rural de Guatemala - Algoritmos FE729
// Parametros por valor y por referencia
// Fuente: Practica 3, parte D
SubProceso PorValor(dato Por Valor)
	dato <- 99
	Escribir "Dentro de PorValor, dato vale ", dato
FinSubProceso

SubProceso PorReferencia(dato Por Referencia)
	dato <- 99
	Escribir "Dentro de PorReferencia, dato vale ", dato
FinSubProceso

Algoritmo DemoParametros
	Definir numero Como Entero

	numero <- 10
	Escribir "Antes: ", numero
	PorValor(numero)
	Escribir "Despues de PorValor: ", numero

	numero <- 10
	PorReferencia(numero)
	Escribir "Despues de PorReferencia: ", numero
FinAlgoritmo