program sx201601;
var sum,max,i:longlnt;
begin
readln(max);
sum:=0;
for i:=1 to max do
if i mod 2<>0 then
sum:=sum+i;
writeln(sum);
end.
输入：200
输出：10000