Hola colegas, buenos dias soy bastante nuevo en el tema y no logro encontrar el error en esto.
intente de todo, y no logro darme cuenta del error
el enunciado dice así.
Ingreso la cantidad de km a recorrer y la velocidad crucero.
si la velocidad crucero del auto es menor a 110 km/h
a los 50 litros de combustible con los que empieza el auto se le restaran 0,33litros cada 5 km.
si es mayor a 110 se le restara 0,5 litros cada 5 km
si me quedo sin combustible tengo q mostrar la cantidad de km que recorri
aca va mí código
Variabes:
Código Delphi
[-] kmar:real;
velc:integer;
fuel:real;
kmfinal:real;
fuel:=50;
velc:=StrToInt(vel_C.caption);
kmar:=strToInt(km.caption);
if (velc<=110) then
begin
begin
while (fuel>0)do
(fuel-0.33)
kmfinal=kmfinal-5;
end;
end;
showmessage ('km recorridos'(floattostring(kmfinal));
end.