Erstellt von EDUARDO ULISES ESTRADA DE LA CRUZ
vor fast 3 Jahre
|
||
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
Möchten Sie kostenlos Ihre eigenen Notizen mit GoConqr erstellen? Mehr erfahren.