Resolver ejercicio en Pascal

Voy comenzando a utilizar Pascal y necesito resolver el siguiente ejercicio :
Calcular el salario de un empleado $25 por hora, trabajando 40 horas con una tasa de impuesto del 12%
De antemano gracias

1 Respuesta

Respuesta
1
Me parece demasiado estático, la idea es que el código se emplea con variación de valores, pero bueno; te resuelvo el programita:
Program Ejercicio
Uses CRT;
Var resultado : Real;
Begin
resultado := (25*40)*((100-12)/100);
Write('Resultado: ');
WriteLn(resultado);
End;
Pero más útil sería escribirlo distinto. Asumo que no sabés cargar datos desde teclado, por lo que uso constantes:
Program Ejercicio
Uses CRT;
CONST HORAS_TRABAJADAS = 40;
PAGA_POR_HORA = 25;
IMPUESTOS = 12;
Var resultado : Real;
Begin
resultado := (PAGA_POR_HORA*HORAS_TRABAJADAS)*((100-IMPUESTOS)/100);
Write('Resultado: ');
WriteLn(resultado);
End;

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas