program okupljanje;
var nlj:array[1..5] of longint;
    lj,p,mp:longint;
    i:integer;

begin
 readln(lj,p);
 for i:=1 to 5 do read(nlj[i]);

 mp:=lj*p;

 for i:=1 to 5 do
   if i=5 then writeln(nlj[i]-mp)
          else write(nlj[i]-mp,' ');

end.