Algoritmo Caja_Registradora

Definir cp, p, vp, tp, tf, td, cd, vu, cl, in, op como entero

tf<-0

td<-0

cl<- 123

in <- 0

Mientras (in==0) Hacer

Escribir "=== Menú ==="

Escribir "1. Vender"

Escribir "2. Ver Total del día y Finalizar"

leer op

Segun op Hacer
1:

Limpiar Pantalla

Escribir "Digite la cantidad de productos que venderá:"

leer cp

Para i<-1 Hasta cp Con Paso 1 Hacer

Escribir "Ingrese el valor del producto: ",i

leer p

Escribir "Ingrese la cantidad a vender del producto: ",i

leer vp

tp<-p*vp

tf<-tf+tp

Fin Para

Escribir "Digite la clave de la caja registradora: "

leer cl

Si (cl==123) Entonces

Escribir "Ingrese la cantidad de dinero entregada por el cliente: "

leer cd

vu <- cd - tf

Escribir "*** Resumen de la compra***"

Escribir "El total de la compra fué: ",tf

Escribir "Dinero entregador por el cliente: ",cd

Escribir "Vuelto del cliente: ",vu

td<-td+tf

tf<-0

Sino

Escribir "¡La clave ingresada no es válida!"

FinSi
2:

Limpiar Pantalla

                        in<-1
                      Escribir "El total en ventas del día fué: ",td
                  De Otro Modo:
                        Escribir "¡Ingresó una opción inválida!"
            Fin Segun
      Fin Mientras
FinAlgoritmo

	Created by EDUARDO ULISES ESTRADA DE LA CRUZ about 3 years ago

Algoritmo relacionado a una caja registradora