Escriba el algoritmo que permita registrar a cada vendedor y la cantidad de líneas de cada tipo vendida. El algoritmo debe mostrar el sueldo fijo, la comisión ganada por cada tipo de línea telefónica vendida y el sueldo final.
Luego, debe mostrar un resumen informando lo siguiente:
- El total de líneas pre pago vendidas (considerando todos los vendedores)
- El total de líneas post pago vendidas (considerando todos los vendedores)
- La cantidad de líneas prepago vendidas en Piura, en Sullana y Talara
- La cantidad de vendedores asignados a Piura, Sullana y Talara.
AUTOR: Dixon
Fecha: 18/10/2017 - 7:48 am
*/
PSEUDOCÓDIGO:
ENTERO N , J , PREP , POSTP
CARACTER CIUDAD
CADENA [30] NOMBRE
REAL SUELDOFIJO , COMISION , SUELDOFINAL
ENTERO TOTALPRE ,TOTALPOST
ENTERO TOTALPRE_PI, TOTALPRE_SU, TOTALPRE_TA
ENTERO TOTALPOST_PI, TOTALPOST_SU, TOTALPOST_TA
INICIO
TOTALPRE <- 0
TOTALPOST <- 0
TOTALPRE_PI <- 0
TOTALPRE_SU <- 0
TOTALPRE_TA <- 0
TOTALPOST_PI <- 0
TOTALPOST_SU <- 0
TOTALPOST_TA <- 0
LLAMAR COLOR_TEXTO(14)//14 AMARILLO
N<-0
MIENTRAS (N<=0) HAGA
LLAMAR NUEVA_LINEA()
ESCRIBA "INGRESE LA CANTIDAD DE VENDEDORES : "
LEA N
SI (N<=0)ENTONCES
LLAMAR NUEVA_LINEA()
LLAMAR COLOR_TEXTO(12)//12 ROJO
ESCRIBA "ERROR. DATO INCORRECTO. INTENTE OTRA VEZ"
LLAMAR COLOR_TEXTO(14)//14 AMARILLO
FIN SI
FIN MIENTRAS
//PIDIENDO LOS DATOS DE LOS "N" VENDEDORES
PARA J <- 1 HASTA N HAGA
LLAMAR NUEVA_LINEA()
ESCRIBA "VENDEDORES ",J
LLAMAR NUEVA_LINEA()
ESCRIBA "=================================="
LLAMAR NUEVA_LINEA()
LLAMAR NUEVA_LINEA()
ESCRIBA "INGRESE NOMBRE DEL VENDEDOR: "
LEA NOMBRE
LLAMAR NUEVA_LINEA()
CIUDAD <- 'X'
MIENTRAS (CIUDAD <>'P')Y(CIUDAD<>'p')Y(CIUDAD<>'S')Y(CIUDAD <>'s')Y (CIUDAD <>'T')Y (CIUDAD <>'t') HAGA
ESCRIBA "INGRESE LA CIUDAD"
LLAMAR NUEVA_LINEA()
ESCRIBA "[P] PIURA - [S] SULLANA - [T] TALARA: "
LEA CIUDAD
SI (CIUDAD<>'P')Y (CIUDAD<>'p')Y(CIUDAD<>'S')Y(CIUDAD<>'s')Y(CIUDAD<>'T')Y(CIUDAD<>'t') ENTONCES
LLAMAR NUEVA_LINEA()
LLAMAR COLOR_TEXTO(12) //12 ROJO
ESCRIBA "ERROR. LETRA DE CIUDAD INCORRECTA. INTENTO OTRA VEZ"
LLAMAR COLOR_TEXTO(14) //14 AMARILLO
FIN SI
FIN MIENTRAS
//EL SUELDO FIJO
SUELDOFIJO <- 0 //
MIENTRAS ( SUELDOFIJO <=0 ) HAGA
LLAMAR NUEVA_LINEA()
ESCRIBA "INGRESE EL SUELDO FIJO: "
LEA SUELDOFIJO
SI (SUELDOFIJO <=0) ENTONCES // ERROR
LLAMAR NUEVA_LINEA()
LLAMAR COLOR_TEXTO(12) //12 ROJO
ESCRIBA "ERROR. LETRA DE CIUDAD INCORRECTA. INTENTO OTRA VEZ"
LLAMAR COLOR_TEXTO(14) //14 AMARILLO
FIN SI
FIN MIENTRAS
POSTP <-0
MIENTRAS (PREP < 0 ) HAGA
LLAMAR NUEVA_LINEA()
ESCRIBA "INGRESE CANTIDAD DE LINEAS PRE PAGO: "
LEA PREP
SI (PREP < 0 ) ENTONCES
LLAMAR NUEVA_LINEA()
LLAMAR COLOR_TEXTO(12)
ESCRIBA "ERROR.CANTIDAD INCORRECTA. INTENTE OTRA VEZ"
LLAMAR COLOR_TEXTO(14)
SINO
TOTALPRE <- TOTALPRE + PREP
CASO CIUDAD
'P', 'P': TOTALPRE_PI <-TOTALPRE_PI + PREP
'S','s': TOTALPRE_SU <- TOTALPRE_SU + PREP
'T','t':TOTALPRE_TA <-TOTALPRE_TA + PREP
FIN CASO
FIN SI
FIN MIENTRAS
POSTP <- -1
MIENTRAS ( POSTP < 0 ) HAGA
LLAMAR NUEVA_LINEA()
ESCRIBA "INGRESE CANTIDAD DE LINEAS PRE PAGO: "
LEA POSTP
SI (POSTP < 0 ) ENTONCES
LLAMAR NUEVA_LINEA()
LLAMAR COLOR_TEXTO(12)
ESCRIBA "ERROR. VALOR DE CANTIDAD DE LINEAS POSTPAGO VENDIDAS INCORRECTA. INTENTE OTRA VEZ"
LLAMAR COLOR_TEXTO(14)
SINO
TOTALPOST <- TOTALPOST + POSTP
CASO CIUDAD
'P' , 'P': TOTALPOST_PI <- TOTALPOST_PI + POSTP
'S' , 's': TOTALPOST_SU <- TOTALPOST_SU + POSTP
'T' , 't': TOTALPOST_TA <- TOTALPOST_TA + POSTP
FIN CASO
FIN SI
FIN MIENTRAS
COMISION <- 5* PREP + 8* POSTP
SUELDOFINAL <- SUELDOFINAL + COMISION
LLAMAR NUEVA_LINEA()
LLAMAR COLOR_TEXTO(11)
ESCRIBA "================================================"
LLAMAR NUEVA_LINEA()
ESCRIBA "VENDEDOR: ", NOMBRE
LLAMAR NUEVA_LINEA()
ESCRIBA "CIUDAD: ", CIUDAD
LLAMAR NUEVA_LINEA()
ESCRIBA "CANTIDAD PRE PAGO: ",PREP
LLAMAR NUEVA_LINEA()
ESCRIBA "CANTIDAD POST PAGO: ", POSTP
LLAMAR NUEVA_LINEA()
ESCRIBA "SUELDO FIJO (S/.): ",SUELDOFIJO
LLAMAR NUEVA_LINEA()
ESCRIBA "COMISION (S/.): ",COMISION
LLAMAR NUEVA_LINEA()
ESCRIBA "SUELDO FINAL (S/.): ",SUELDOFINAL
LLAMAR NUEVA_LINEA
ESCRIBA "==================================="
LLAMAR COLOR_TEXTO(14)
FIN PARA
LLAMAR NUEVA_LINEA()
ESCRIBA "REPORTE FINAL"
LLAMAR NUEVA_LINEA()
ESCRIBA "TOTAL DE LINEAS PRE PAGO VENDIDAS: ",TOTALPRE
LLAMAR NUEVA_LINEA()
ESCRIBA "TOTAL DE LINEAS POST PAGO VENDIDAS: ",TOTALPOST
LLAMAR NUEVA_LINEA()
ESCRIBA "TOTAL DE LINEAS PREPAGO VENDIDAS EN PIURA ES:",TOTALPRE_PI
LLAMAR NUEVA_LINEA()
ESCRIBA "TOTAL DE LINEAS PREPAGO VENDIDAS EN SULLANA ES: ",TOTALPRE_SU
LLAMAR NUEVA_LINEA()
ESCRIBA "TOTAL DE LINEAS PREPAGO VENDIDAS EN TALARA ES: ",TOTALPRE_TA
LLAMAR NUEVA_LINEA()
LLAMAR COLOR_TEXTO(12)
ESCRIBA "TOTAL DE LINEAS POSTPAGO VENDIDAS EN PIURA ES: ",TOTALPOST_PI
LLAMAR NUEVA_LINEA()
ESCRIBA "TOTAL DE LINEAS POSTPAGO VENDIDAS EN SULLANA ES: ",TOTALPOST_SU
LLAMAR NUEVA_LINEA()
ESCRIBA "TOTAL DE LINEAS POSTPAGO VENDIDAS EN TALARA ES: ",TOTALPOST_TA
// LA APLICACION DEBE INDICAR EN QUE CIUDAD SE VENDIO MAS LINEAS PRE PAGO
LLAMAR NUEVA_LINEA()
SI(TOTALPRE_PI > TOTALPRE_SU) Y (TOTALPRE_PI > TOTALPRE_TA) ENTONCES
ESCRIBA "LA CIUDAD QUE VENDIO MAS LINEAS PREPAGO ES PIURA: ",TOTALPRE_PI
LLAMAR NUEVA_LINEA()
LLAMAR COLOR_TEXTO(14)
SINO
SI(TOTALPRE_SU > TOTALPRE_PI) Y (TOTALPRE_SU > TOTALPRE_TA) ENTONCES
ESCRIBA "LA CIUDAD QUE VENDIO MAS LINEAS PREPAGO EN SULLANA: ",TOTALPRE_SU
LLAMAR NUEVA_LINEA()
SINO
ESCRIBA "LA CIUDAD QUE VENDIO MAS LINEAS PREPAGO EN TALARA: ",TOTALPRE_TA
FIN SI
FIN SI
// LA APLICACION DEBE INDICAR EN QUE CIUDAD SE VENDIO MAS LINEAS PRE PAGO
LLAMAR NUEVA_LINEA()
SI(TOTALPOST_PI > TOTALPOST_SU) Y (TOTALPOST_PI > TOTALPOST_TA) ENTONCES
ESCRIBA "LA CIUDAD QUE VENDIO MAS LINEAS POSTPAGO ES PIURA: ",TOTALPOST_PI
LLAMAR NUEVA_LINEA()
LLAMAR COLOR_TEXTO(15)
SINO
SI(TOTALPOST_SU > TOTALPOST_PI) Y (TOTALPOST_SU > TOTALPOST_TA) ENTONCES
ESCRIBA "LA CIUDAD QUE VENDIO MAS LINEAS POSTPAGO EN SULLANA: ",TOTALPOST_SU
LLAMAR NUEVA_LINEA()
SINO
ESCRIBA "LA CIUDAD QUE VENDIO MAS LINEAS POSTPAGO EN TALARA: ",TOTALPOST_TA
FIN SI
FIN SI
FIN
No hay comentarios.:
Publicar un comentario