CDF[NormalDistribution[],0.8]

Integrate[Exp[-x^2/2]/Sqrt[2Pi],{x,-Infinity,0.8}]

Probability[x<=0.8,x\[Distributed]NormalDistribution[0,1]]

CDF[NormalDistribution[],1.5]-CDF[NormalDistribution[],-1.5]

Show[
DiscretePlot[PDF[BinomialDistribution[1000,1/6],x],{x,100,200},PlotRange->All],
Plot[PDF[NormalDistribution[1000/6,11.785],x],{x,100,200},PlotStyle->Orange]
]

Plot[PDF[NormalDistribution[1000/6,11.785],x],{x,100,200}]