Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Звіт.doc
Скачиваний:
19
Добавлен:
14.02.2016
Размер:
455.17 Кб
Скачать

Список використаної літератури

  1. С. А. Немнюгин. С++. Учебник

  2. Ю. А. Шпак. С++ на примерах

  3. С.Немнюгин, Л.Перколаб, "Изучаем С++l"

  4. Касаткин А.И., Вальвачев А.Н. Профессиональное программирование на языке С++. Мн., 1992. 240 С.

  5. Бруно Бабэ. Просто и ясно о Borland C++. М., 1996. 400 С.

  6. Справочник по классам Borland C++ 6.0. К., 1994. 256 С.

  7. ObjectWindows для C++. К., 1993, 208 С.

  8. Никита Культин. C++ Builder, BHV 2012. 464 С.

  9. Архангельский. Компоненты C++Builder. Справочное и методическое пособие. Бином-Пресс 2008, 960 С.

  10. Програмированние на C++Builder. 7-ой издание. А.К., Бином 2010, 1364 С.

  11. Кнут Д. Искусство программирования для ЭВМ. Т.1,Основные алгоритмы. Пер. с англ. М: Мир,1976

  12. Кнут Д. Искусство программирования для ЭВМ. Т.2,Получисленные алгоритмы. Пер. с англ. М: Мир,1977

  13. Смелов А.А. Методические указания по оформлению дипломных и курсовых проектов (работ). – Мелитополь: ТГАТА, 1999. – 31с.: ил.

  14. Буч Г. Объектно-ориентированный анализ и проектирование с примерами приложений на С++, 2-е изд./Пер. с англ. - М.: ”Издательство БИНОМ”, СПб: ”Невский проект”,1998-560с.

  15. Страуструп Б. Язык программирования С++,3-е изд./Пер. с англ. - СПб.: ”Невский Диалект” - ”Издательство БИНОМ”,1999г.-991с

Додаток 1. Лістинг програми

//---------------------------------------------------------------------------

#include <vcl.h>

#pragma hdrstop

#include <math.h>

#include <string.h>

#include "Unit1.h"

#include "Unit3.h"

#include "Unit4.h"

#include "Unit5.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

double a[100];

int i=1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

/*char * c = Edit1->Text.c_str();

String b=Edit1->Text;

char str[] = c;

char delims[] = "#";

char *result = NULL;

result = strtok( str, delims );

while( result != NULL ) {

// printf( "result is \"%s\"\n", result );

result = strtok( NULL, delims );

Memo1->Lines->Add(result);

}

*/

/* Edit1->Text+=" ";

int string_len = Edit1->Text.Length();

char *string = new char[string_len];

memset(string, 0, string_len);

string = Edit1->Text.c_str();

Memo1->Lines->Add( AnsiString(string));

Memo1->Lines->Add(string); */

int string_len = Edit1->Text.Length();

String b=Edit1->Text;

char *str = new char[string_len];

memset(str, 0, string_len);

str = Edit1->Text.c_str();

char delims[] = "+";

char *result = NULL;

result = strtok( str, delims );

while( result != NULL ) {

// printf( "result is \"%s\"\n", result );

result = strtok( NULL, delims );

Memo1->Lines->Add(result);

}

}

//---------------------------------------------------------------------------

/*double insertSort(double t[], size_t length) {

int k, l, value;

for(k = 1; k < length; k++) {

value = a[i];

for (l = k - 1; l >= 0 && t[l] > value; l--) {

t[l + 1] = t[l];

}

t[l + 1] = value;

}

} */

void __fastcall TForm1::Button2Click(TObject *Sender)

{

Edit3->Text=Edit3->Text+Edit2->Text+" | ";

a[i]=StrToFloat(Edit2->Text);

i++;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button3Click(TObject *Sender)

{

if (CheckBox1->Checked==true){ double summ=0;

int h=1;

while(h<i-1){

summ=summ+a[h];

h=h+1;

}

summ=summ/i;

Memo1->Lines->Add(CheckBox1->Caption+" - "+ FloatToStr(summ));

}

if (CheckBox2->Checked==true){

double min=a[1];

int h=1;

while(h<i){

if (a[h]<min){min=a[h];}

h=h+1;

}

Memo1->Lines->Add(CheckBox2->Caption+" - "+ FloatToStr(min));

}

if (CheckBox3->Checked==true){

double max=a[1];

int h=1;

while(h<i){

if (a[h]>max){max=a[h];}

h=h+1;

}

Memo1->Lines->Add(CheckBox3->Caption+" - "+ FloatToStr(max));

}

if (CheckBox4->Checked==true){

int h,y; bool check=false;

while(h<i){

check=false;

for (int t=2; t==a[h]-1; t++){

y = static_cast<int>(a[h]);

if (y%t==0){check=true; break;}

}

if (check==false){Memo1->Lines->Add(FloatToStr(a[h]));}

h++;

}

}

if (CheckBox5->Checked==true){

double fel=i/2;

int y = static_cast<int>(fel);

Memo1->Lines->Add(CheckBox5->Caption+" - "+ FloatToStr(a[y]));

}

if (CheckBox8->Checked==true){ int h=1;int y;

Memo1->Lines->Add(CheckBox8->Caption+" : ");

while(h<i){

y = static_cast<int>(a[h]);

if (y%2==0){Memo1->Text=Memo1->Text+FloatToStr(a[h])+"; ";}

h=h+1;

}

}

if (CheckBox9->Checked==true){ int h=1;int y;

Memo1->Lines->Add(CheckBox9->Caption+" : ");

while(h<i){

y = static_cast<int>(a[h]);

if (y%2!=0){Memo1->Text=Memo1->Text+FloatToStr(a[h])+"; ";}

h=h+1;

}

}

if (CheckBox10->Checked==true){

int h=1; int summ=0;

while(h<i){

summ=summ+a[h];

h=h+1;

}

Memo1->Lines->Add(CheckBox10->Caption+" - "+ FloatToStr(summ));}

if (CheckBox11->Checked==true){int h=1; int summ=1;

while(h<i){

summ=summ*a[h];

h=h+1;

}

Memo1->Lines->Add(CheckBox11->Caption+" - "+ FloatToStr(summ));}

if (CheckBox14->Checked==true){ Memo1->Lines->Add(CheckBox14->Caption+" : ");

int h=i-1; int summ=0;

while(h!=0){

Memo1->Text=Memo1->Text+FloatToStr(a[h])+"; ";

h=h-1;

}

}

}

//---------------------------------------------------------------------------

void __fastcall TForm1::N1Click(TObject *Sender)

{

if (CheckBox1->Checked==true){ double summ=0;

int h=1;

while(h<i-1){

summ=summ+a[h];

h=h+1;

}

summ=summ/i;

Memo1->Lines->Add(CheckBox1->Caption+" - "+ FloatToStr(summ));

}

if (CheckBox2->Checked==true){

double min=a[1];

int h=1;

while(h<i){

if (a[h]<min){min=a[h];}

h=h+1;

}

Memo1->Lines->Add(CheckBox2->Caption+" - "+ FloatToStr(min));

}

if (CheckBox3->Checked==true){

double max=a[1];

int h=1;

while(h<i){

if (a[h]>max){max=a[h];}

h=h+1;

}

Memo1->Lines->Add(CheckBox3->Caption+" - "+ FloatToStr(max));

}

if (CheckBox4->Checked==true){

int h,y; bool check=false;

while(h<i){

check=false;

for (int t=2; t==a[h]-1; t++){

y = static_cast<int>(a[h]);

if (y%t==0){check=true; break;}

}

if (check==false){Memo1->Lines->Add(FloatToStr(a[h]));}

h++;

}

}

if (CheckBox5->Checked==true){

double fel=i/2;

int y = static_cast<int>(fel);

Memo1->Lines->Add(CheckBox5->Caption+" - "+ FloatToStr(a[y]));

}

if (CheckBox8->Checked==true){ int h=1;int y;

Memo1->Lines->Add(CheckBox8->Caption+" : ");

while(h<i){

y = static_cast<int>(a[h]);

if (y%2==0){Memo1->Text=Memo1->Text+FloatToStr(a[h])+"; ";}

h=h+1;

}

}

if (CheckBox9->Checked==true){ int h=1;int y;

Memo1->Lines->Add(CheckBox9->Caption+" : ");

while(h<i){

y = static_cast<int>(a[h]);

if (y%2!=0){Memo1->Text=Memo1->Text+FloatToStr(a[h])+"; ";}

h=h+1;

}

}

if (CheckBox10->Checked==true){

int h=1; int summ=0;

while(h<i){

summ=summ+a[h];

h=h+1;

}

Memo1->Lines->Add(CheckBox10->Caption+" - "+ FloatToStr(summ));}

if (CheckBox11->Checked==true){int h=1; int summ=1;

while(h<i){

summ=summ*a[h];

h=h+1;

}

Memo1->Lines->Add(CheckBox11->Caption+" - "+ FloatToStr(summ));}

if (CheckBox14->Checked==true){ Memo1->Lines->Add(CheckBox14->Caption+" : ");

int h=i-1; int summ=0;

while(h!=0){

Memo1->Text=Memo1->Text+FloatToStr(a[h])+"; ";

h=h-1;

}

}

}

//---------------------------------------------------------------------------

void __fastcall TForm1::N2Click(TObject *Sender)

{

Memo1->Clear();

Edit1->Clear();

Edit2->Clear();

Edit3->Clear();

}

//---------------------------------------------------------------------------

void __fastcall TForm1::sl1Click(TObject *Sender)

{

Form1->Close();

}

//---------------------------------------------------------------------------

void __fastcall TForm1::r1Click(TObject *Sender)

{

AboutBox->Show();

}

//---------------------------------------------------------------------------

void __fastcall TForm1::N4Click(TObject *Sender)

{

PagesDlg->Show();

}

//---------------------------------------------------------------------------

26

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]