program Task_1;

var
N, number, sum, digitSum: integer;

begin
readln$N$;
sum := 0;
for number := 1 to N - 1 do
begin
digitSum := 0;
for var i := 1 to length$number.ToString$ do
begin
digitSum := digitSum + StrToInt$number.ToString[i]$;
end;
if digitSum = sum then
begin
write(number, ' ');
end;
end;
if sum = 0 then
begin
write${}^{\prime }не{т}^{\prime }$;
end;
end.