program d20829

implicit none
integer(16) :: n, max, ans, i
integer(16), allocatable :: p(:)

read *, n
allocate(p(1:n))

max = 0
ans = 0

do i = 1, n
 read *, p(i)
 if(p(i) > max) then
  max = p(i)
 end if
 ans = ans + p(i)
end do


ans = ans - int(max / 2)

print *, ans

end program d20829