Funcion calcular_precio_final(precio_base, descuento)
precio_final <- precio_base - (precio_base * descuento / 100)
Devolver precio_final
FinFuncion
Algoritmo tienda_de_zapatos
// Inicialización de descuentos personalizados
Dimension descuentos_personalizados[6]
// Inicialización de diccionario para el total vendido por marca en el mes
Dimension total_vendido_mes[6]
// Inicialización del total vendido en el día
total_vendido_dia <- 0
// Menú de opciones
Escribir "Bienvenido al mundo de la moda"
Escribir "Puedes ver el listado de zapatos disponibles en nuestra tienda:"
Escribir "- Zapatos Nike $50000"
Escribir "- Zapatos Adidas $60000"
Escribir "- Zapatos Jordan $70000"
Escribir "- Zapatos Reebok $80000"
Escribir "- Zapatos Fila $35000"
Escribir "- Zapatos Converse $100000"
// Inicialización de descuentos personalizados
descuento <- 10
Para i <- 0 Hasta 5
Escribir Sin Saltar "Ingresa el descuento para ", i+1, " (en porcentaje): "
Leer descuento
descuentos_personalizados[i] <- descuento
FinPara
// Menú de opciones
opcion <- 0
Repetir
Escribir "Elige la marca de zapatos que deseas comprar: "
Escribir "1. Nike"
Escribir "2. Adidas"
Escribir "3. Jordan"
Escribir "4. Reebok"
Escribir "5. Fila"
Escribir "6. Converse"
Escribir "7. Ver total vendido por marca"
Escribir "8. Salir"
Leer opcion
Segun opcion Hacer
Caso 1:
precio_por_zapato <- 50000
marca <- "Nike"
Caso 2:
precio_por_zapato <- 60000
marca <- "Adidas"
Caso 3:
precio_por_zapato <- 70000
marca <- "Jordan"
Caso 4:
precio_por_zapato <- 80000
marca <- "Reebok"
Caso 5:
precio_por_zapato <- 35000
marca <- "Fila"
Caso 6:
precio_por_zapato <- 100000
marca <- "Converse"
Caso 7:
Para i <- 0 Hasta 5
Escribir "Total vendido de ", i+1, ": ", total_vendido_mes[i]
FinPara
Caso 8:
Escribir "Saliendo del programa..."
opcion <- 7 // Para salir del bucle
De Otro Modo:
Escribir "Opción no válida."
FinSegun
Si opcion >= 1 y opcion <= 6 Entonces
Escribir Sin Saltar "Ingresa el número de zapatos que deseas comprar: "
Leer numero_de_zapatos
total_vendido <- precio_por_zapato * numero_de_zapatos
descuento_aplicado <- calcular_precio_final(total_vendido, descuentos_personalizados[opcion-1])
total_vendido <- total_vendido - descuento_aplicado
total_vendido_dia <- total_vendido_dia + total_vendido
total_vendido_mes[opcion-1] <- total_vendido_mes[opcion-1] + total_vendido
Escribir "Marca de zapatos: ", marca
Escribir "Total vendido por esta marca antes de descuento: ", total_vendido + descuento_aplicado // El total antes del descuento
Escribir "Valor de descuento aplicado: ", descuento_aplicado
Escribir "Total vendido por esta marca después de descuento: ", total_vendido
Escribir "El total vendido en el día es: ", total_vendido_dia
Escribir "" // Salto de línea
FinSi
Hasta Que opcion = 7
Si total_vendido_dia > 0 Entonces
Escribir "El total vendido en el día es: ", total_vendido_dia
Sino
Escribir "No se ha realizado ninguna venta hoy."
FinSi
Escribir "Cantidad de zapatos vendidos en el mes por marca:"
Para i <- 0 Hasta 5
Escribir i+1, ": ", total_vendido_mes[i]
FinPara
FinAlgoritmo