25ege

k:=0;s:=30001;
for i:=1 to N do
    if(a[i] mod 2 = 0) and (a[i] < s) then
        s:=a[i];
if s < 20 then
    k:= 20 - s;
if s > 20 then
    k:=-1*(s-20)
if s = 20 then
    k:=0;
for i:=1 to N do
    if (a[i] mod 2 = 0) then
        a[i] = a[i] + k;
for i:= 1 to N do
    writeln(a[i]);