Написать программу для оценки математического ожидания и дисперсии в паскаль

спасибо,но это я и сама написала,мне нужна была оценка,а это другое

Тогда формулы для оценки прошу, как говорится, в студию!

Программы - это именно программы, а не гадание и поиск формул для расчетов.

И не забывайте, что оценки достоверны лишь при известном характере распределения случайной величины.

PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018Внимание! Если программа не работает, обновите версию!begin  var x:=new real[] (-3.0,-7.0,0.0);  var p:=new real[] (0.1,0.2,0.7);  var Mx:=x.Zip(p,(a,b)->a*b).Sum;  var Mx2:=x.Zip(p,(a,b)->a*a*b).Sum;  var Dx:=Mx2-Sqr(Mx);  Writeln('Математическое ожидание ',Mx,', дисперсия ',Dx)end.РезультатМатематическое ожидание -1.7, дисперсия 7.81