Nada

De cada persona que se presenta en las oficinas comerciales de la empresa que suministra Gas, para solicitas subsidios los siguientes datos:
Tipo de documento (un valor de 1 a 4)
Numero dedocumento
Situación laboral (’J’: jubilado, ‘E’:empleado, ‘D’: desocupado)
Importe abonado en el último bimestre
La información finaliza con número de documento igual a 0
Se pide informar:
Cantidad depersonas que se presentaron a solicitar subsidio
Porcentaje de jubilados, empleados y desocupados
Cantidad de personas según cada tipo de documento
Tipo y numero de documento de la persona que aboneel mayor importe

COMIENZO
Jub=0, empl=0, desc=0, cant1=0, cant2=0, cant3=0, cant4=0, max=0, nmax=0, cmax=0
INGRESAR “ingrese numero de documento”, ndoc
HACER MIENTRAS ndoc >=0
INGRESAR“ingrese tipo de documento”, tdoc
INGRESAR “ingrese situación laboral”, sitlab
INGRESAR “ingrese importe abonado”, impab
Si sitlab = J ENTONCES
Jub=jub+1
SINOSi sitlab=E ENTONCES
Empl=empl+1
SINO
Desc=desc+1FINSI
FINSI
SELECCIONAR CASO, tdoc
CASO 1 cant1=cant1+1
CASO 2 cant2=cant2+1
CASO 3 cant3=cant3+1
CASO 4cant4=cant4+1
FIN SELECCIONAR
Si impab > max ENTONCES
Max=impab
Cmax=tdoc
Nmax=ndoc
FINSI
INGRESAR “ingresenumero de documento”, ndoc
REPETIR
Total=jub+empl+desc
Porc1= (jub/total)*100
Porc2= (empl/ total)*100
Porc3= (desc/ total)*100
Total=jub+empl+desc
FIN



Un proveedor de servicio deInternet desea realizar un relevamiento de sus clientes, y de cada uno de ellos se conoce:
Codigo de cliente
Tipo de servicio ( (‘B’: banda, ‘W’:wifi)
Código de producto (un valor de 1 a 10)
Importe...