/>
Коефіцієнти ймовірності смертей можна змінити в меню «редагування коефіцієнтів» (Рис.3).
Рис3. Редагування коефіцієнтів
Висновок
У курсовій роботі були розглянуті і розраховані основні моделі розрахунку схем короткострокового і довгострокового страхування життя:
) - Вирахували премії групи короткострокового і довгострокового страхування зі страховою сумою рівної S рублів.
) - Визначили загальні премії, достатні, щоб забезпечити ймовірність неразоренние компанії, при певній кількості застрахованих осіб різних вікових категорій.
) - Розробили програму, які обчислює премії для всіх груп договорів при заданій страховій сумі і ймовірності неразоренние компанії.
Список використаних джерел
1. Фалін, Г.І. Математичний основи теорії страхування життя та пенсійних схем / Г.І. Фалін - М.: Изд мех.-мат. Факультету МДУ, 1996. - 221 с.
. Фалін, Г.І. Математичний аналіз ризиків у страхуванні / Фалін, Г.І.- М.: Рос.юр.ізд.дом, 1994 - 130 с.
. Бауерс, Н. Актуарна математика / Н. Бауерс та ін - М.: Янус-К., 2001 - 656 с.
. Орлов, В.П. Основи страхування / В.П. Орлов - Воронеж, 2004. - 43 с.
. Ширяєв, А.Н. Імовірність / О.М. Ширяєв.- М., 1980. - 576 с.
. Севастьянов, Б.А. Курс теорії ймовірностей і математичний статистики / Б.А. Севастьянов.- М.: Наука, 1980. - 256 с.
Додаток А
Unit1;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, ExtCtrls, StdCtrls, Menus, XPMan;=class (TForm): TButton; Edit1: TEdit; Label1: TLabel;: TMainMenu; N1: TMenuItem;: TMenuItem; Panel1: TPanel; Label2: TLabel;: TComboBox; Label4: TLabel;: TLabel; Label6: TLabel; Label7: TLabel;: TLabel; Panel2: TPanel; Edit4: TEdit; Label11: TLabel;: TEdit; Label12: TLabel; XPManifest1: TXPManifest; Panel3: TPanel;: TEdit; Label13: TLabel; Edit8: TEdit; Edit9: TEdit; Label17: TLabel;: TLabel; Label19: TLabel; Button1Click (Sender: TObject); ComboBox1Change (Sender: TObject); N3Click (Sender: TObject);;: TForm1; TForm1.Button1Click (Sender: TObject);, pns1, pep1, pdrp1, vozr2, pns2, pep2 , pdrp2,, vse, vsdr, A, A1, k1, k2, m1, m2, d1, d2, summ, sumd,, L, osn, St1, St2:real;not(Edit1.Text=«»)then:=strtofloat(Edit1.Text);:=strtofloat(edit3.text);:=strtofloat(edit7.text);:=strtofloat(edit8.text);:=strtofloat(edit9.text);:=strtofloat(edit2.text);:=strtofloat(edit10.text);:=strtofloat(edit11.text);:=strtofloat(edit4.text);:=strtofloat(edit5.text);:=strtofloat(edit6.text);.caption:=combobox1.text;(ComboBox1.Text=«95%») then:=1.645;:=vsn/vse;:=vsn/vsdr;:=pep1+(k1*pns1)+(k2*pdrp1);:=pep2+(k1*pns1)+(k2*pdrp1);:=pep1+(k1*k1*pns1)+(k2*k2*pdrp1)-m1*m1;:=pep2+(k1*k1*pns1)+(k2*k2*pdrp1)-m2*m2;:=0.1397;:=0.8695;:=0.15;:=((1-ve^90)/90*delta)*vozr3;:=((1-ve^60)/60*delta)*vozr4;:=(1-ve^90)/180*delta;:= (1-ve ^ 60) / 120 * delta;:=vozr1 * m1 + vozr2 * m2;:=vozr1 * d1 + vozr2 * d2;:=ComboBox * (sqrt (sumd));:=L / summ;: =m1 * (1 + osn) * vse;:=m2 * (1 + osn) * vse;:=A1 * (1 + Var1) * 1000000;:=A2 * (1 + Var2) * 1000000;. Caption: =intto...
