Курсовая работа: Расчетная методика проектирования программного комплекса

dX: Real; //ширина интервала

MasInt: array [TParam, IndexEl] of Real;

dXmax: IndexEl;

M: integer;

N: integer; //фактрическое кол-во чисел

CountInterv: Integer; //фактическое кол-во интервалов

i: IndexEl;

s: integer;

sa: real;

buf: Real;

imin: IndexEl;

j: IndexEl;

Me: Real;

x: Real;

Mmin: Real;

Mmax: Real;

Xc : Real;//оценка центра

SredInt: Integer;

Max, Min : real;

function fMmin(N: Integer): Integer;

function fMmax(N: Integer): Integer;

function fdX(M: TM; N: Integer; Xc: Real; NInt: Integer): Real;

procedure ChastotaGist;

implementation

uses Math;

function fMmin(N: Integer): Integer;

var

x: Real;

begin