Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Un supermercado requiere una aplicación para el calculo
- de una venta. El supermercado vende los siguientes tipos
- de productos, los cuales son:
- 1) Frutas: Las cuales tienen un nombre, peso(g) y un valor
- gramos
- 2) Carnes: las cuales itenen un nombre, un tipo (cerdo, pollo,
- res y pescado) y un peso (g)
- - Si es cerdo, tiene un nombre (parte) y un precio(g)
- - Si es pollo, tiene un nombre (parte), un tipo (gallina, pollo)
- y un precio por g
- - Si es res , tiene un nombre(parte), proceso(molida ono)
- precio por g.
- - Si es pesado, tiene un nombre (tipo de pez), origen (rio
- lago o mar) precio por g.
- 3) Electrodoméstico: Nombre, Marca, un precio por unidad
- 4) Higiene personal: Nombre, marca, precio por docena
- 5) Bebidas: nombre, marca, precio por unidad
- Un venta es una colección de elementos que se compran,
- donde se tiene el elementos (producto supermercado) y
- el número de unidades/gramos/docenas que se compran.
- Si se compran Frutas o Carnes el IVA es el 5% por estos
- elementos, en otro caso se aplica 19%
- Diseñe una función que reciba una lista de ventas, un número
- de bolsas que necesita la persona (impuesto 40 por bolsa)
- y retorne el detallado a pagar: Subtotal, IVA, impuesto a
- bolsas y total a pagar.
- (define-struct fruta (nombre pesoG valorG))
- (define-struct carne (nombre tipo pesoG))
- (define-struct carne-cerdo (parte precioG))
- (define-struct carne-pollo (parte tipo precioG))
- (define-struct carne-res (parte proceso precioG))
- (define-struct carne-pescado (tipo origen precioG))
- (define-struct electrodomestico (nombre marca precioU))
- (define-struct higiene (nombre marca precioD))
- (define-struct bebidas (nombre marca precioU))
- (define-struct venta (producto unidades))
- (define-struct detallado (subtotal IVA bolsas total))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement