[ Foro de Pascal ]
El ejercicio es el siguiente:
Un acopiador paga por tonelada según el cereal
Trigo $ 38
Girasol $ 56
Soja $ 67
Si el porcentaje de humedad es mayor al 10%, el importe abonado sufre una quita del 8%.
Determine los datos que se requieren para establecer el importe a abonar por un productor que
entrega una determinada cantidad de un cereal, con la respectiva medición de humedad.
No logro entender muy bien, esto es lo que hice hasta ahora, aunque también me da error jaja, espero que me puedan ayudar, gracias
program TpEj2;
uses crt;
VAR
humedad,importe:integer;
trigo,girasol,soja:longint
BEGIN
crscr;
writeln('Ingrese la cantidad de humedad');
readln(humedad);
if humedad>10 then
begin
importe:=trigo-0.008
end;
END.
(No se puede continuar esta discusión porque tiene más de dos meses de antigüedad. Si tienes dudas parecidas, abre un nuevo hilo.)