var
 lala,x,haha,i,j: integer;
 lili: boolean;
begin
    lala:=10;
    x:=2;
    haha:=0;
    for i:=1 to lala do
        begin
            j:=i;
            lili:=true;
            while (j>1) do
                begin
                    if (j mod x = 1) then lili:=false;
                    j:=j div x;
                end;
            if (lili=true) then haha:=haha+i
            else haha:=haha+1;
        end;
    writeln(haha);    
end.

dmFyCiBsYWxhLHgsaGFoYSxpLGo6IGludGVnZXI7CiBsaWxpOiBib29sZWFuOwpiZWdpbgogICAgbGFsYTo9MTA7CiAgICB4Oj0yOwogICAgaGFoYTo9MDsKICAgIGZvciBpOj0xIHRvIGxhbGEgZG8KICAgICAgICBiZWdpbgogICAgICAgICAgICBqOj1pOwogICAgICAgICAgICBsaWxpOj10cnVlOwogICAgICAgICAgICB3aGlsZSAoaj4xKSBkbwogICAgICAgICAgICAgICAgYmVnaW4KICAgICAgICAgICAgICAgICAgICBpZiAoaiBtb2QgeCA9IDEpIHRoZW4gbGlsaTo9ZmFsc2U7CiAgICAgICAgICAgICAgICAgICAgajo9aiBkaXYgeDsKICAgICAgICAgICAgICAgIGVuZDsKICAgICAgICAgICAgaWYgKGxpbGk9dHJ1ZSkgdGhlbiBoYWhhOj1oYWhhK2kKICAgICAgICAgICAgZWxzZSBoYWhhOj1oYWhhKzE7CiAgICAgICAgZW5kOwogICAgd3JpdGVsbihoYWhhKTsgICAgCmVuZC4=