main=do n<-getLine>>=return.(read::String->Integer) print$maximum[(d+1)*(n-d+1)-1|d<-[1..(div n 2)]]