Calcular el sueldo neto mensual de un empleado, conociendo su nombre, cedula de identidad, pago por hora trabajada, el número de horas trabajadas al mes, el % de descuento por impuesto sobre la renta, el % de descuento por seguro social, los cuales son aplicados sobre el sueldo bruto.
Análisis Entrada:
Nombre-emple: cadena
Cedula-emple: alfanumérico
Pago-hora-trab: real
Nro-horas-trb: entero
Porc-desc-islr: real
Proc-desc-sso: real
Procesos:
Sueldo neto= sueldo bruto-desc-islr
Sueldo bruto= nro-horas-trab*pago-horas-trab
Desc-islr=sueldo bruto*porc-desc-islr
Desc-sso=sueldo bruto*porc-desc-sso
Pascal Salida: reporte que indique sueldo neto a cobrar por el empleado
INICIO ALGORITMO Sueldo
CONS
VAR
Nombre-emple: cadena
Cedula-emple: alfanumérico
Pago-hora-trab, porc-desc-islr
Proc-desc-sso: real
Nro-horas-trab: entero
Sueldo-neto-sueldo-bruto
Desc-islr, desc-sso: real
PROCEDIMIENTO leer-datos
INICIO PROCEDIMIENTO leer-datos
MOSTRAR (`introduzca el nombre del empleado´)
LEER (nomb-emple)
MOSTRAR (`escribir la cedula de identidad del empleado´)
LEER (ced-emple)
MOSTRAR (`tipee el número de horas trabajadas por el empleado´)
LEER (nro-horas-trab)
MOSTRAR (`introduzca el pago de cada hora trabajada´)
LEER (pago-horas-trab)
MOSTRAR (`escriba el porcentaje a aplicar por concepto de descuento de islr´)
LEER (porc-desc-islr)
MOSTRAR (`escriba el porcentaje a aplicar por concepto de descuento de sso´)
LEER (porc-desc-sso)
FIN PROCEDIMIENTO leer-datos
PROCEDIMIENTO s bruto
INICIO PROCEDIMIENTO s bruto
Sueldo-bruto ← nro-horas-trab*pago-horas-trab
FIN PROCEDEMIENTO s bruto
PROCEDIMIENTO DESCUENTO
INICIO PROCEDIMIENTO DESCUENTO
Desc-islr ← porc-desc-islr*sueldo-bruto
Desc-sso ← porc-desc-sso*sueldo-bruto
FIN PROCEDIMIENTO DESCUENTO
PEROCEDIMIENTO s neto
INICIO PROCEDIMIENTO s neto
Sueldo-neto ← sueldo-bruto-desc-islr-desc-sso
FIN PROCEDIMIENTO s neto
PROCEDIMIENTO reporte
INICIO PROCEDIMIENTO reporte
IMPRIMIR (`recibo de pago´)
IMPRIMIR (`nombre del empleado´)
IMPRIMIR (nomb-emple)
IMPRIMIR (`cedula del empleado´)
IMPRIMIR (ced-emple)
IMPRIMIR (`sueldo neto a pagar´)
IMPRIMIR (sueldo-neto)
FIN PROCEDIMIENTO reporte
INICIO PROCEDIMIENTO PRINCIPAL
LLAMAR leer datos ( )
LLAMAR s bruto ( )
LLAMAR descuento ( )
LLAMAR s neto ( )
LLAMAR reporte ( )
FIN PROCEDIMIENTO PRINCIPAL
FIN ALGORITMO SUELDO
sábado, 3 de enero de 2009
Suscribirse a:
Enviar comentarios (Atom)
No hay comentarios:
Publicar un comentario