Ejercicio 7 lpp
Ejercicio 6 lpp:
Stock
Solución al ejercicio:
//definiciòn variables
Cadena[30] nombre_cliente
Caracter nombre_producto
Entero cantidad_producto,stock_a, n, aa,stock_b, ca, cb, na, nb, nbu, ng, nr, cbu, cg, cr, stock_bu, stock_g, stock_r,total
Inicio //programa principal
stock_bu<-100
stock_g<-100
stock_r<-100
stock_a<-100
stock_b<-100
Escriba "Ingrese el nombre del producto "
Escriba "El nombre del producto se basa en: "
llamar Nueva_linea
Escriba "U para Budweiser, G para Grolsch,"
llamar Nueva_linea
Escriba "R para Redds,A para aguila, B para BBC: "
llamar Nueva_linea
Lea nombre_producto
Escriba "Ingrese la cantidad que desea sacar: "
Lea n
si nombre_producto= 'U' Entonces
stock_bu<-stock_bu-n
sino
stock_bu<-stock_bu
Fin si
si nombre_producto= 'G' Entonces
stock_g<-stock_g-n
sino
stock_g<-stock_g
Fin si
si nombre_producto= 'R' Entonces
stock_r<-stock_r-n
sino
stock_r<-stock_r
Fin si
si nombre_producto= 'A' Entonces
stock_a<-stock_a-n
sino
stock_a<-stock_a
Fin si
si nombre_producto= 'B' Entonces
stock_b<-stock_b-n
sino
stock_b<-stock_b
Fin si
llamar Nueva_linea
Escriba " Producto: Budweiser Total en stock: ",stock_bu , " Unidades"
llamar Nueva_linea
Escriba " Producto: Grolsch Total en stock: ",stock_g , " Unidades"
llamar Nueva_linea
Escriba " Producto: Redds Total en stock: ",stock_r , " Unidades"
llamar Nueva_linea
Escriba " Producto: Aguila Total en stock: ",stock_a , " Unidades"
llamar Nueva_linea
Escriba " Producto: BBC Total en stock: ",stock_b , " Unidades"
llamar Nueva_linea
llamar Nueva_linea
si stock_bu <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de Budweiser "
fin si
si stock_g <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de Grolsch "
fin si
si stock_r <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de Redds "
fin si
si stock_a <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de Aguila "
fin si
si stock_b <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de BBC "
fin si
Fin
En la siguiente imagen se muestra la solución al ejercicio:
Stock
Solución al ejercicio:
//definiciòn variables
Cadena[30] nombre_cliente
Caracter nombre_producto
Entero cantidad_producto,stock_a, n, aa,stock_b, ca, cb, na, nb, nbu, ng, nr, cbu, cg, cr, stock_bu, stock_g, stock_r,total
Inicio //programa principal
stock_bu<-100
stock_g<-100
stock_r<-100
stock_a<-100
stock_b<-100
Escriba "Ingrese el nombre del producto "
Escriba "El nombre del producto se basa en: "
llamar Nueva_linea
Escriba "U para Budweiser, G para Grolsch,"
llamar Nueva_linea
Escriba "R para Redds,A para aguila, B para BBC: "
llamar Nueva_linea
Lea nombre_producto
Escriba "Ingrese la cantidad que desea sacar: "
Lea n
si nombre_producto= 'U' Entonces
stock_bu<-stock_bu-n
sino
stock_bu<-stock_bu
Fin si
si nombre_producto= 'G' Entonces
stock_g<-stock_g-n
sino
stock_g<-stock_g
Fin si
si nombre_producto= 'R' Entonces
stock_r<-stock_r-n
sino
stock_r<-stock_r
Fin si
si nombre_producto= 'A' Entonces
stock_a<-stock_a-n
sino
stock_a<-stock_a
Fin si
si nombre_producto= 'B' Entonces
stock_b<-stock_b-n
sino
stock_b<-stock_b
Fin si
llamar Nueva_linea
Escriba " Producto: Budweiser Total en stock: ",stock_bu , " Unidades"
llamar Nueva_linea
Escriba " Producto: Grolsch Total en stock: ",stock_g , " Unidades"
llamar Nueva_linea
Escriba " Producto: Redds Total en stock: ",stock_r , " Unidades"
llamar Nueva_linea
Escriba " Producto: Aguila Total en stock: ",stock_a , " Unidades"
llamar Nueva_linea
Escriba " Producto: BBC Total en stock: ",stock_b , " Unidades"
llamar Nueva_linea
llamar Nueva_linea
si stock_bu <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de Budweiser "
fin si
si stock_g <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de Grolsch "
fin si
si stock_r <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de Redds "
fin si
si stock_a <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de Aguila "
fin si
si stock_b <=12 Entonces
Escriba "Poco stock. Realizar minimo pedido de 50 unidades de BBC "
fin si
Fin
En la siguiente imagen se muestra la solución al ejercicio:
Comentarios
Publicar un comentario