{
TASK:SUM
LANG:PASCAL
}
var n,i:integer;
var b:array[1..20000] of integer;
var a:array[1..20] of integer;
begin
read(n);
for i:=1 to n do
read(a[i]);

if n=2 then write('3');
if n=1 then write('1');
if n=3 then write('6');
if (n<>1)and(n<>2)and(n<>3) then
write(n*3-1);
end.