Pascal/Turbo Pascal - Programa para calcular nuevo salario

   
Vista:

Programa para calcular nuevo salario

Publicado por Tropicfail (5 intervenciones) el 26/11/2015 05:51:38
Saludos a todos y gracias por tomarse la molestia de leer, estoy empezando a estudiar informatica y estamos viendo pascal, me pusieron este ejercicio pero no logro dar con él.

3.- A un trabajador desea calcular el Nuevo sueldo basado en El sueldo actual y el % de incremento.

Este es el codigo que tengo hasta ahora.


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Program NewSalary;
 
Uses Wincrt;
 
Var
 
Sueldo_Antiguo:real;
Salario:real;
incremento:real;
Sueldo_Nuevo:real;
Porcentaje:real;
 
Begin
 
Writeln('Escribe el monto de tu sueldo actual');
Readln(Sueldo_Antiguo);
 
Writeln('Escribe el porcentaje del incremento');
Readln(Porcentaje);
 
Sueldo_Nuevo:=Sueldo_Antiguo*Porcentaje/100; // Acá multiplico mi sueldo viejo por el porcentaje por ejemplo 15 y lo divido entre 100 para que me agarre como porcentaje.
Readln(incremento); // Esto no se si esta bien, quiero que me lea el valor para luego usarlo
 
Salario:=Sueldo_Antiguo+incremento; // Intento hacer que a mi sueldo antiguo se le sume el valor del incremento.
 
Writeln('Tu nuevo salario sera de ',Salario); // Acá quiero que ya muestre el salario nuevo.
 
End.



Muchas gracias por la ayuda, disculpen mi ignoracia.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Programa para calcular nuevo salario

Publicado por dario (40 intervenciones) el 26/11/2015 06:17:14
Te propongo esta solucion:

1
2
3
4
5
6
7
8
9
10
11
12
13
uses crt;
var
	actual,porcentaje,temp,nuevo:real;
begin
	clrscr;
	write('Ingrese su saldo actual: ');readln(actual);
	write('Porcentje de incrremento: ');readln(porcentaje);
 
	temp:=actual * (porcentaje/100);
	nuevo:=actual + temp; //este es el nuevo sueldo
 
	writeln('Tu nuevo sueldo sera de ',nuevo:4:2);
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Programa para calcular nuevo salario

Publicado por Tropicfail (5 intervenciones) el 26/11/2015 06:24:51
Muchas gracias por tu respuesta, ahora que leo tu codigo comprendo mucho mejor el procedimiento para realizarlo pero me surge una duda en este instante ¿Por que se coloca esto?

1
writeln('Tu nuevo sueldo sera de ',nuevo:4:2);


El nuevo:4:2 , siempre me ha surgido esa duda, si me la pudieses aclarar, y en caso tal si siempre se coloca asi o varia depende a que.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Programa para calcular nuevo salario

Publicado por dario (40 intervenciones) el 26/11/2015 14:22:09
Eso significa lo siguiente:
writeln('Tu nuevo saldo sera de ',nuevo:4:2);
La variable 'nuevo' es de tipo real, por pantalla aparecera el nuevo saldo pero 4 numeros y dos decimales.Mejor con un ejemplo.
a = 4.4882938
writeln(a:4:2) ==> aparece 4.49 se redondea.
Otro ejemplo:
a = 5.34
b = 3.69
c = a/b
el resultado de 'c' es 1.447154471, si lo quieres con tres decimales haces lo siguiente: writeln(c:4:3), deja espacio para 4 numeros y tres decimales. c = 1.447.
Solo se usa para numeros reales.
Espero que lo entiendas.
Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Programa para calcular nuevo salario

Publicado por Tropicfail (5 intervenciones) el 27/11/2015 02:27:22
Muchisimas gracias por tu respuesta, de verdad me ha aclarado.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar