Question

Ajutoor...Program Pascal..La un magazin sunt comercializate 3 tipuri de mere se stie pretul unui kg si cantitate de mere de fiecare tip.La ce pret mediu trebuie comercializate astfel incit suma incasata la vanzare sa fie aceeiasi ca si la vanzarea merelor cu pret initial?

Answer 1

var a,b,c,pa,pb,pc,x,s:real;

begin
  read(a,pa,b,pb,c,pc);
  s:=a+b+c;
  x:=(pa*a+pb*b+pc*c)/s;
  write(x);
end.