Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Proceso Sumar_Fracciones
- Definir A, B, C, D Como Entero
- Definir Fraccion, BD, Aux1 Como Real
- Escribir "Ingrese un numero A. (A/B + C/D)"
- Leer A
- Escribir "Ingrese un numero B. (", A, "/B + C/D)"
- Leer B
- Escribir "Ingrese un numero C. (", A, "/", B, " + C/D)"
- Leer C
- Escribir "Ingrese un numero D. (", A, "/", B, " + ", C, "/D)"
- Leer D
- BD <- B*D
- Aux1 <- (BD / B) * A
- Aux2 <- (BD / D) * C
- Fraccion <- (Aux1+Aux2)/BD
- Escribir Fraccion
- FinProceso
Add Comment
Please, Sign In to add comment