// Переменные, одну для цикла, одну для ввода с клавы, три для разложения числа на десятки сотни и единицы.

var k,k1,k2,k3,i:integer;

// Начало программы
begin


//ввод числа K будет производиться до тех пор пока оно не будет в диапозоне
repeat
readln(k);
until (k>=1) and (k<=180);


 // если к>99, то раздробим его на разряды
if k>99 then begin
//  сотни
k1:=k div 100;
// десятки
k2:=k mod 100 div 10;
// единицы
k3:=k mod 100 mod 10;


              // Начало цикла
              for i:=10 to 99 do
              // Условие
              if (i mod 10=k1) or (i mod 10=k2) or (i mod 10=k3)
              or (i div 10=k1) or (i div 10=k2) or (i div 10=k3)
              // Если число имеет цифру k, то мы его выведем. П.с. число имеет цифру k либо в десятках, либо в единицах, либо в том и в том случае.
              then write(i:3);
              // Конец цикла
              end;
              
              
// Если, к<10, то начнем цикл
if k<10 then begin
// Начало цикла
for i:=10 to 99 do
// Условие
if (i mod 10=k) or (i div 10=k)
// Если число имеет цифру k, то мы его выведем. П.с. число имеет цифру k либо в десятках, либо в единицах, либо в том и в том случае.
then write(i:3);
end;
end.