Человек покупает x кг яблок по цене a рублей и y кг груш по цене b рублей. На следующей неделе цены изменились: яблоки подешевели на m%, а груши подорожали на n%. Какая покупка дороже на или на этой неделе?

var

 x,a,y,b,m,n: integer;

begin

 write ('Введите значения в порядке [x,a,y,b,m,n]: ');

 read (x,a,y,b,m,n);  

 x:=x*a; y:=y*b;

 var x1:= x-x*(a/100);

 var y1:= y+y*(b/100);

 write ('Покупка оказалась дороже на ',(x+y > x1+y1)? 'предыдущей ':'этой',' неделе');

end.