Usuario:Ricardocorrea~eswikibooks/programacion4

EJERCICIO 6.4 PAGINA 241

Nota: este ejercicio esta hecho con base en el lenguaje de Programacion segun joyanes.

EN ESTE EJERCICIO SE PONE EN PRACTICA LO DE LA CAJITA QUE EL PROFESOR NOS EXPLICO

_____________________________________________________________________

Realizar un algoritmo que permita ordenar tres numeros mediante un procedimiento de intercambio en ds variables (paso de parametros por referncia)

auxi<-a
a<-b
b<-auxi

y la definicion del procedimiento sera:

Procedimiento intercambio (E/S real: a,b) var real: auxi

inicio
 auxi<-a
 a<-b
 b<-auxi
fin_procedimiento

El algoritmo de ordenacion se realizara mediante el procedimiento de intercambio.

algoritmo ordenar_3_numeros var real: x,y,z

inicio
 escribir(`deme 3 numeros reales`)
 leer(x,y,z)
 si x>y entonces
  intercambio(y,z)
 fin_si
 si y>z entonces
  intercambio(x,y)
 fin_si
 escribir(x,y,z)
fin