Главная База знаний "Allbest" Программирование, компьютеры и кибернетика Анализ статистической модели оценки качества проектируемой технической системы

Анализ статистической модели оценки качества проектируемой технической системы

Содержание термина "планирование эксперимента". Сущность метода наименьших квадратов. Разработка программы анализа статистической оценки качества проектируемой системы: составление и графическое представление алгоритма решения, листинг программы.

Рубрика Программирование, компьютеры и кибернетика
Вид курсовая работа
Язык русский
Дата добавления 16.09.2011
Размер файла 4,1 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Страница:

begin

if messagedlg('Сохранить лог рассчетов перед выходом?', mtcustom, [mbYes, mbNo], 0) = mrYes then

N10Click(Form1);

close;

end;

procedure TForm1.Button4Click(Sender: TObject);

begin

memo1.Text := '';

end;

procedure TForm1.N10Click(Sender: TObject);

begin

with savehtml do begin

defaultext := 'txt';

FileName := '.\SIT_StatRank_log.txt';

Filter := 'Текстовые файлы|*.txt';

end;

if savehtml.Execute then memo1.Lines.SaveToFile(savehtml.FileName);

end;

procedure TForm1.Button7Click(Sender: TObject);

var fx : integer;

begin

fx := 1;

with Form3 do begin

Show;

lb0.Caption := floattostr(sregr[1]); lb1.Caption := floattostr(sregr[2]);

lb2.Caption := floattostr(sregr[3]); lb3.Caption := floattostr(sregr[4]);

//for n := 1 to 4 do (('lb'+inttostr(n)) as TLabel).Caption := floattostr(sregr[n]);

//lb0.Text := floattostr();

end;

end;

procedure TForm1.N8Click(Sender: TObject);

var h : hwnd;

begin

// Showmessage('В данной версии развернутая справка недоступна.'+#10#13+'Обратитесь к автору программы или технической документации по СИТ.');

ShellExecute(h, 'open', pansichar('help.txt'), '', '.', sw_shownormal);

end;

end.

6.2 about.pas Form 2:

unit about;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, jpeg, ExtCtrls, xpman;

type

TForm2 = class(TForm)

Panel1: TPanel;

Memo1: TMemo;

Button1: TButton;

Button2: TButton;

Image1: TImage;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form2: TForm2;

implementation

uses main;

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);

begin

MessageBeep(mb_ok);

Form2.Hide;

end;

procedure TForm2.Button2Click(Sender: TObject);

begin

Form1.N8Click(Sender);

end;

end.

6.3 Скриншоты программы:

планирование эксперимент статистический программа алгоритм

Заключение

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

Полученная математическая модель может быть использована для последующих решений: для исследования точности и надежности устройства, выбора оптимальных параметров и т.п. Если цель оптимизации устройства, то используется линейное уравнение регрессии, по которому определяется направление градиента и организуется движение к оптимуму.

Список использованной литературы

1. Кринецкий И.И. "Основы научных исследований". Киев -- Одесса, Высш. шк., 1981. -- 208 с.

2. ГОСТ 19.701-90 "Схемы алгоритмов, программы, данных и систем"

3. http://ru.wikipedia.org/wiki/Блок-схема

4. Гмурман В.Е. "Теория вероятностей и математическая статистика". М.: Высш. шк., 2003.-- 479 с.

5. Радченко С.Г. "Устойчивые методы оценивания статистических моделей": Монография - К.: ПП "Санспарель", 2005. - 504 с.

6. Хомоненко А. Д. "Разработка приложений в Delphi 7". М.: BHV, 2010. -- 1136 с.

7. Белов В. В., Чистякова В. И. "Программирование в Delphi: процедурное, объектно-ориентированное, визуальное". М.: Горячая Линия-Телеком, 2009. -- 734 с.

Размещено на Allbest.ru

Страница:


Подобные документы

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.

© 2000 — 2023, ООО «Олбест» Все права защищены