Реферат Розробка програми для розв'язання систем лінійних рівнянь

-------

// вікно help

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

void help ()

{

char ans;

int h_num = 1;

do

{

menu ();// отрисовка меню

window (3,4,12,5);

textbackground (BLACK);

clrscr ();

window (2,3,11,4);

textbackground (LIGHTGRAY);

clrscr ();

textcolor (RED);

cprintf ("% s", "A");

textcolor (BLACK);

cprintf ("% s", "bout");

textcolor (RED);

cprintf ("% s", " n r T");

textcolor (BLACK);

cprintf ("% s", "ask");

cursor (h_num +5);

ans = (char) getch ();

if (ans == 80) {if (h_num! = 2) h_num + +;}// якщо натиснули "стрілку вниз "

if (ans == 72) {if (h_num! = 1) h_num -;}// якщо натиснули "стрілку вгору "

}

if ((ans == 't') | | (ans == 'T') | | ((h_num == 2) && (ans == 13)))

{

window (2,3,14,6);

textbackground (BLACK);

clrscr ();

task ();// вікно виводу тексту завдання

}

if ((ans == 'a') | | (ans == 'A') | | ((h_num == 1) && (ans == 13)))

{

window (2,3,14,6);

textbackground (BLACK);

clrscr ();

about ();// вікно виводу інформації про розробника

}

}

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

// функція введення даних

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

void input (double ** & A, double * & B, int & n)

{

char ch;

window (8,3,20,6);

textbackground (BLACK);

clrscr ();

window (15,6,64,18);

textbackground (LIGHTGRAY);

clrscr ();

textcolor (BLACK);

cprintf ("% s", " n n r , РЋҐ В¤ Е⥠ЗЕБ «® га Сћ-Г-Е В© (1 .. 10) ");

window (48,8,51,8);

textbackground (BLACK);

textcolor (LIGHTGRAY);

clrscr ();

bool fl = false;

do// Захист від введення числа рівнянь більше 10

{

n = n_input (2);// функція введення двозначного числа

if ((n <= 10) && (n> = 1)) fl = true;

else clrscr ();

}

while (fl! = true);

A = (double **) malloc (n * n * sizeof (double));// Виділення пам'яті для масиву

B = (double *) malloc (n * sizeof (double));

window (15,10,64,10);

textbackground (LIGHTGRAY);

clrscr ();

textcolor (BLACK);

cprintf ("% s", " r , РЋҐ В¤ Е⥠н «à ¬ Г-вл В¬ ваЕжл Є В® нддЕжЕҐ-в В® Сћ ");

window (15,11,64,11);

textbackground (LIGHTGRAY);

clrscr ();

for (int i = 0; i

{

A [i] = (double *) malloc (n * sizeof (double));

for (int j = 0; j

{

clrscr ();

cprintf (" r A [% d] [% d] = ", i +1, j +1);

A [i] [j] = float_input ();// Введення дійсного числа

}

}

window (15,13,64,13);

textbackground (LIGHTGRAY);

clrscr ();

cprintf ("% s", " n n r , РЋҐ В¤ Е⥠н «à ¬ Ґвл СћҐЄв В® а бСћ В® РЋ В® В¤ ле зВ« Г В® Сћ ");

window (15,14,64,14);

textbackground (LIGHTGRAY);

clrscr ();

for (int i = 0; i

{

clrscr ();

cprintf (" r B [% d] = ", i +1);

B [i] = float_input ();// Введення дійсного числа

}

window (15,17,64,17);

textbackground (LIGHTGRAY);

clrscr ();

cprintf ("% s", " r "В« П Їа В® В¤ В® В«| Г-Еп - | В¬ Е⥠"); br/>

do

{ch = (char) getch ();}

while (ch! = 13);// Поки не натиснутий ENTER

}

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

// функція рішення

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

void decision (double ** & A, double * & B, double * & X, int & n, int & s)

{

char ch, ans;

int k;

double * Z;// допоміжний вектор

X = (double *) malloc (n * sizeof (double));// Вектор рішень

Z = (double *) malloc (n * sizeof (double));// Вектор початкових наближень

for (int i = 0; i

window (23,7,57,16);

textbackground (LIGHTGRAY);

textcolor (BLACK);

clrscr ();

cprintf (" n r, лРЋЕаЕ⥠¬ Ґв В® В¤ ॳҐЕп: "); p> cprintf (" n r 1-РЉҐв В® В¤ Їа В® бвле ЕвҐа ж В© ");

cprintf (" n r 2-РЉҐв В® В¤ ‡ Г В© В¤ ГВ« п ");

do

{ans = (char) getch ();}

while ((ans! = '1 ') && (ans! = '2'));...