Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Pascal/Turbo Pascal » Problemas free pascal

Pascal/Turbo Pascal - Problemas free pascal

Volver
Nuevo Tema
<<>>
 
Vista:
Imágen de perfil de Víctor

Problemas free pascal

Publicado por Víctor (1 intervención) el 25/07/2017 20:33:55
Cómo resolver este problema en free pascal

Un productor de leche lleva el registro de lo que produce en litros pero cuando entrega le pagan en galones.

Realicé un programa en Pascal que ayuda a resolver cuánto va a ganar por la entrega de su producción de un día. (1 galón=3.785 litros).

Nota: el programa deberá solicitar la cantidad de litros al usuario para realizar los cálculos respectivos.
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
sin imagen de perfil
Val: 287
Oro
Ha mantenido su posición en Pascal/Turbo Pascal (en relación al último mes)
Gráfica de Pascal/Turbo Pascal

Problemas free pascal

Publicado por dario (38 intervenciones) el 26/07/2017 16:44:02
Te dejjo esto a ver si te sirve.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
uses crt;
const
	galon = 3.785;
var
	litros:integer;
	g,costoGalon,total:real;
begin
	clrscr;
	write('Cantidad de litros producido por dia: ');
	readln(litros);
	write('Costo por galon: ');
	readln(costoGalon);
 
	g:=litros/galon; //convierte los litros a galones

	total:=g*costoGalon; //calcula el total galones*costoGalon

 
	writeln('Por ',g:5:2,' galones de leche recibira ',total:5: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
0
Comentar