Var a:array[1..100] of longint;n,i:byte;
Begin
  readln(n);
  for i:=1 to n do
  read(a[i]);
  for i:=1 to n do
  a[i]*=2; // a[i]:=a[i]*2;
  for i:=1 to n do
  write(a[i], ' ');
  writeln;
End.