ChiSquared

dist=ChiSquareDistribution[k]

PDF[dist,z]

CDF[dist,z]

Manipulate[Plot[PDF[ChiSquareDistribution[k],x],{x,0,6},Filling->Axis],{k,0.5,5}]

Plot[Table[PDF[ChiSquareDistribution[ν],x],{ν,{0.5,3,5}}]//Evaluate,{x,0,6},Filling->Axis]

Mean[dist]

Median[dist]

Variance[dist]

StandardDeviation[dist]

Skewness[dist]

Kurtosis[dist]

CharacteristicFunction[dist,t]

Random[ChiSquareDistribution[1]]