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