-
Lenguaje
Pascal
-
Descripción
Un empleado tiene su sueldo fijo, y va a recibir un aumento del 15% de su sueldo, se necesita saber cuánto de dinero representa ese 15%.
1
2
3
4
5
6
7
8
9
10
11
12
13
2
3
4
5
6
7
8
9
10
11
12
13
program AumentoDelSueldoFijo;
uses crt;
var aumento, sueldo_fijo : real;
begin
write ('Ingresa el valor de sueldo fijo: ');
readln (sueldo_fijo);
aumento := sueldo_fijo*0.15;
writeln ('Valor de aumento: ', aumento:0:6);
writeln;
write ('Presiona una tecla para terminar . . . ');
readkey;
end.
uses crt;
var aumento, sueldo_fijo : real;
begin
write ('Ingresa el valor de sueldo fijo: ');
readln (sueldo_fijo);
aumento := sueldo_fijo*0.15;
writeln ('Valor de aumento: ', aumento:0:6);
writeln;
write ('Presiona una tecla para terminar . . . ');
readkey;
end.