2010 * 10 в минус второй = 20,10(20,1) переносим запятую на 2 знака.
0102 * 10 в минус второй = 01,02(1,02) опять же, переносим просто запятую
var i,k,j,s:integer;
begin
readln(k);
FOR I:=100 TO 300 DO
s:=0;
for j:=1 to i do
if i mod j=0 then s:=s+j;
if s=k then writeln(i);
end;
end.