program SumNum;
var
i: Integer;
begin
for i := 10 to 99 do begin
if (i div 10 + i mod 10) mod 2 = 0 then
Write (i, ' ');
end;
ReadLn;
end.
program SumNum;
var
i: Integer;
begin
for i := 10 to 99 do begin
if (i div 10 + i mod 10) mod 2 = 0 then
Write (i, ' ');
end;
ReadLn;
end.