program SA;

var
  s, i, x: integer;

begin
  readln(x);
  s := 0;
  i := 0;
  if i < 10 then 
  begin
    while i < 10 do
    begin
      s := s + x;
      i := i + 1;
    end;
    writeln(s);
  end;
end.