Приклад

Переведемо кілограми в грами, тоді формула для обчислення має вигляд:

1000 y <= х1m1+(x2-c)m2+1,25 х1(0,9m2)<=1000a

Приведемо програму:

program fish;

var x1,m1,x2,c,m2,y,a:longint;

begin

readln(x1,m1,x2,c,m2,y,a);

if (x1*m1+(x2-c)*m2+1.25*x1*0.9*m2 >=y*1000)and

(x1*m1+(x2-c)*m2+1.25*x1*0.9*m2 <=a*1000)then

writeln( ' Кок буде задоволений')else writeln(' Кок буде незадоволений');

readln; end.

2.14. Для відправки листів друзі виготовили два конверта прямокутної форми. Один конверт має сторони с1 та с2 см, а розміри другого конверта – t1 та t2 см. Щоб за пересилку листів менше платити, було запропоновано вкласти один конверт в інший. Допоможіть друзям визначити, чи можна це зробити.