**Comment**

I am facing the same issue of empty plot. 

*"11.0.1 for Microsoft Windows (32-bit)"*

Another alternative is to use `DiscretePlot`,

    func[x_] := 365!/((365 - x)!* 365^x);

    DiscretePlot[func[x], {x, 0, 100}, Filling -> None, Joined -> True]

[![enter image description here][1]][1]


  [1]: https://i.sstatic.net/nxin8.jpg