MACRO PROMEDIO(suma, n) (suma / n)
MACRO VENDEDORES 2
MACRO VENDOR1 0
MACRO VENDOR2 1
MACRO DIAS 7
MACRO DOMINGO 0
MACRO LUNES 1
MACRO MARTES 2
MACRO MIERCOLES 3
MACRO JUEVES 4
MACRO VIERNES 5
MACRO SABADO 6
VARIABLE string dia_nombre[DIAS] = {"DOMINGO", "LUNES", "MARTES", "MIERCOLES", "JUEVES", "VIERNES", "SABADO"}
VARIABLE string vendedor[VENDEDORES]
VARIABLE int ventas[DIAS][VENDEDORES]
FUNCION leer_datos(VARIABLE string* vendedor, VARIABLE int ventas[DIAS])
{
VARIABLE int dia = DOMINGO
imprimir("Ingrese el nombre del vendedor")
leer(*vendedor)
MIENTRAS(dia <= SABADO)
{
imprimir("Ingrese las ventas del dia ", dia_nombre[dia])
leer(ventas[dia])
dia++
}
}
FUNCION obtener_ventas_por_dia(VARIABLE int del_dia[DIAS])
{
VARIABLE int dia = DOMINGO
MIENTRAS(dia <= SABADO)
{
del_dia[dia] += ventas[dia][VENDOR1]
del_dia[dia] += ventas[dia][VENDOR2]
dia++
}
}
FUNCION obtener_ventas_por_vendedor(VARIABLE int vendedor[VENDEDORES])
{
VARIABLE int dia = DOMINGO
MIENTRAS(dia <= SABADO)
{
vendedor[VENDOR1] += ventas[dia][VENDOR1]
vendedor[VENDOR2] += ventas[dia][VENDOR2]
dia++
}
}
FUNCION int mayor(VARIABLE int ventas[DIAS])
{
VARIABLE int dia = DOMINGO
VARIABLE int max_dia = dia
MIENTRAS(dia <= SABADO)
{
SI(ventas[dia] > ventas[max_dia])
{
max_dia = dia
}
dia++
}
REGRESAR max_dia
}
FUNCION int menor(VARIABLE int ventas[DIAS])
{
VARIABLE int dia = DOMINGO
VARIABLE int min_dia = dia
MIENTRAS(dia <= SABADO)
{
SI(ventas[dia] < ventas[min_dia])
{
min_dia = dia
}
dia++
}
REGRESAR min_dia
}
FUNCION int main()
{
VARIABLE dia = DOMINGO
VARIABLE int ventas_por_dia[DIAS] = {0,0,0,0,0,0,0}
VARIABLE int ventas_por_vendedor[VENDEDORES] = {0, 0}
VARIABLE int total
leer_datos(&vendedor[VENDOR1], ventas[VENDOR1])
leer_datos(&vendedor[VENDOR2], ventas[VENDOR2])
obtener_ventas_por_dia(ventas_por_dia)
obtener_ventas_por_vendedor(ventas_por_vendedor)
total = (ventas_por_vendedor[VENDOR1] + ventas_por_vendedor[VENDOR2])
imprimir("Ventas totales: ", total)
imprimir("Promedio de ventas general: ", PROMEDIO(total, (VENDEDORES * DIAS)))
imprimir("Promedio de ventas del vendedor: ", vendedor[VENDOR1], PROMEDIO(ventas_por_vendedor[VENDOR1], DIAS)
imprimir("Promedio de ventas del vendedor: ", vendedor[VENDOR2], PROMEDIO(ventas_por_vendedor[VENDOR2], DIAS)
MIENTRAS(dia <= SABADO)
{
imprimir("Promedio de ventas del dia: ", dia_nombre[dia], PROMEDIO(ventas_por_vendedor[dia], VENDEDORES))
dia++
}
SI(ventas_por_vendedor[VENDOR1] < ventas_por_vendedor[VENDOR2])
{
imprimir("El vendedor con mas ventas fue: ", vendedor[VENDOR2])
imprimir("El vendedor con menos ventas fue: ", vendedor[VENDOR1])
}
SINO
{
imprimir("El vendedor con mas ventas fue: ", vendedor[VENDOR1])
imprimir("El vendedor con menos ventas fue: ", vendedor[VENDOR2])
}
imprimir("El dia con mas ventas fue: ", dia_nombre[mayor(ventas_por_dias)])
imprimir("El dia con menos ventas fue: ", dia_nombre[menor(ventas_por_dias)])
REGRESAR 0
}