sábado, 3 de enero de 2009

EJERCICIOS RESUELTOS

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

No hay comentarios:

Publicar un comentario