Scribd
Cargar
22 vistas1 página

Ejemplo Repetir

paseudo

Cargado por

CryptoEmprendimiento
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como TXT, PDF, TXT o lee en línea desde Scribd
22 vistas1 página

Ejemplo Repetir

paseudo

Cargado por

CryptoEmprendimiento
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como TXT, PDF, TXT o lee en línea desde Scribd

// Doblar es un procedimiento que toma una variable num�rica

// por referencia y le duplica el valor modificando la propia variable


SubProceso Doblar(num Por Referencia)
num <- num * 2;
FinSubProceso

// Triple es una funci�n que toma una variable num�rica


// por valor y devuelve el triple de su valor como resultado
Subproceso num <- Triple(num)
num <- num * 3;
FinSubProceso

// Proceso Principal
Proceso Principal
Definir n como Numerico;
n <- 1;

Escribir "Doblamos n 5 veces, con n=",n;


// La funci�n doblar toma el n�mero y le modifica su propio valor
Doblar(n);
Escribir n;
Doblar(n);
Escribir n;
Doblar(n);
Escribir n;
Doblar(n);
Escribir n;
Doblar(n);

// �Cuanto vale n en este momento? (n*2*2*2*2*2)


Escribir n;

Escribir "Triple de n=",n;


// En cambio Triple toma la variable por valor y devuelve su triple
Escribir Triple(n);

Escribir "Tres veces el triple de n=",n;


// Tres veces el triple de n (n*3*3*3)
Escribir Triple(Triple(Triple(n)));

// Pero el valor original de n no se ha modificado


Escribir "Finalmente n sigue valiendo";
Escribir n;

FinProceso

También podría gustarte