var a,b,c,i:longint;
begin
for i:=100 to 999 do
begin
a:=i mod 10;
b:=i div 10 mod 10;
c:=i div 100;
if (b>a) and ((a+b+c) mod 2=0) and (c>b) then writeln(i);
end;
end.
/**************************************************************
	Problem: 1712
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/