Практическая часть
- Результаты работ
> #Расчет моментов экспериментального распределения.
> restart;
> #Обращение к библиотеке
> with(stats);
> #Ввод исходной статистической информации по варианту
> X:=[0.2618,0.5236,0.7854,1.0472,1.3090,1.5708,1.8326,2.0944,2.3562,2.6180,2.8798,3.1416,3.4034,3.6652,3.9270,4.1888,4.4506,4.7124, 4.9742,5.2360,5.4978,5.7596,6.0214,6.2832];
> Y:=[5.60,8.47,11.00,13.53,16.40,19.70,23.17,26.47,29.42,32.13,34.83,37.70,40.75,43.87,47.00,50.13,53.25,56.30,59.17,61.87,64.58,67.53,70.83,74.30];
> #Ввод объема выборки
> n:=24;
> #Расчет математического ожидания
> Mx:=describe[moment[1]](X);
> My:=describe[moment[1]](Y);
> #Расчет дисперсии
> Dx:=describe[moment[2,Mx]](X);
> Dy:=describe[moment[2,My]](Y);
> #Расчет среднего квадратического отклонения
> Sx:=(Dx*n/(n-1))^0.5;
> Sy:=(Dy*n/(n-1))^0.5;
> #Расчет третьего центрального момента
> M3x:=describe[moment[3,Mx]](X);