Требуется загрузить теплоход апельсинами и лимонами так, чтобы стоимость груза была максимальной. при этом известно, что объем грузового отсека теплохода составляет 1000 м3; картонные коробки, в которых перевозятся апельсины и лимоны, имеют стандартные размеры: 50´50´40 см3; стоимость одной коробки с апельсинами равна $45; с лимонами - $60. потребитель данной продукции заинтересован, чтобы апельсинов по сравнению с лимонами было доставлено больше, по крайней мере, в 1,5 раза.
begin
write(1000/((50*50*40)/1000000)/2.5, "лимонов и "1000/((50*50*40)/1000000)/2.5*1.5 " апельсинов" );
//50*50*40 ищется объём одной коробки, /1000000 переводится в метры,
//1000/((50*50*40)/1000000) ищется количество коробок. нам нужно засунуть в // коробки как можно больше лимонов, т.к. они дороже. но их максимальное
//количество соотносится с апельсинами как 1:1,5. Всего частей 1+1,5=2,5
//лимоны отсюда одна часть, значит делим все коробки на количество
//частей и получаем количество лимонов. а количество апельсинов просто
//умножаем количество лимонов на 1,5
end.