{Реалізація учасника Середенка Олександра, з дрібними модифікаціями}
var m:array[0..4999, 0..4999] of integer;
k,i,j,x,y,x1,y1,r,p: longint;
begin
readln(p);
readln(x,y);
r:=0;
for k:=1 to p-1 do begin
readln(x1, y1);
if x1>x then begin
for i:=x to (x1-1) do m[i, y]:= m[i,y]+1;
end;
if x1<x then begin
for i:=x downto (x1+1) do m[i, y]:= m[i,y]+1;
end;
if y1>y then begin
for i:=y to (y1-1) do m[x,i]:=m[x,i]+1;
end;
if y1<y then begin
for i:=y downto (y1+1) do m[x,i]:=m[x,i]+1;
end;
x:=x1;
y:=y1;
end;
for i:=0 to 4999 do
for j:=0 to 4999 do
if m[i,j]>1 then
r:=r+1;
writeln(r);
end.
e9Cg0LXQsNC70ZbQt9Cw0YbRltGPINGD0YfQsNGB0L3QuNC60LAg0KHQtdGA0LXQtNC10L3QutCwINCe0LvQtdC60YHQsNC90LTRgNCwLCDQtyDQtNGA0ZbQsdC90LjQvNC4INC80L7QtNC40YTRltC60LDRhtGW0Y/QvNC4fQoKdmFyIG06YXJyYXlbMC4uNDk5OSwgMC4uNDk5OV0gb2YgaW50ZWdlcjsgCiAgICBrLGksaix4LHkseDEseTEscixwOiBsb25naW50OwoKYmVnaW4KICByZWFkbG4ocCk7CiAgcmVhZGxuKHgseSk7CiAgcjo9MDsKICBmb3Igazo9MSB0byBwLTEgZG8gYmVnaW4KICAgIHJlYWRsbih4MSwgeTEpOwogICAgaWYgeDE+eCB0aGVuIGJlZ2luCiAgICAgIGZvciBpOj14IHRvICh4MS0xKSBkbyBtW2ksIHldOj0gbVtpLHldKzE7CiAgICBlbmQ7CiAgICBpZiB4MTx4IHRoZW4gYmVnaW4KICAgICAgZm9yIGk6PXggZG93bnRvICh4MSsxKSBkbyBtW2ksIHldOj0gbVtpLHldKzE7CiAgICBlbmQ7CiAgICBpZiB5MT55IHRoZW4gYmVnaW4KICAgICAgZm9yIGk6PXkgdG8gKHkxLTEpIGRvIG1beCxpXTo9bVt4LGldKzE7CiAgICBlbmQ7CiAgICBpZiB5MTx5IHRoZW4gYmVnaW4KICAgICAgZm9yIGk6PXkgZG93bnRvICh5MSsxKSBkbyBtW3gsaV06PW1beCxpXSsxOwogICAgZW5kOwogICAgeDo9eDE7CiAgICB5Oj15MTsKICBlbmQ7CiAgZm9yIGk6PTAgdG8gNDk5OSBkbyAKICAgIGZvciBqOj0wIHRvIDQ5OTkgZG8gCiAgICAgIGlmIG1baSxqXT4xIHRoZW4gCiAgICAgICAgIHI6PXIrMTsKICB3cml0ZWxuKHIpOwplbmQuCg==