ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 13.06.2019

Просмотров: 94

Скачиваний: 1

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

F ЛАБОРАТОРНА РОБОТА 2

МЕТОДИ ЧИСЕЛЬНОГО РОЗВ’ЯЗКУ СИСТЕМ НЕЛІНІЙНИХ РІВНЯНЬ

Студента ИТ 14-1 Красовского Абхая

М ета роботи – здобути практичні навички розроблення алгоритмів і програм чисельних методів розв’язання систем нелінійних рівнянь Вариант №9

Б лок-схема метода простой итерации



Код:

double fx(double x, double y)

{

return (x*x + y*y - 0.1);

}

double fy(double x, double y)

{

return (2*x*y - 0.1);

}


private: System::Void Form1_Load(System::Object^ sender, System::EventArgs^ e)

{

}

private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e)

{

Application::Exit();

}

private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e)

{

x = Convert::ToDouble(textBox1->Text);

y = Convert::ToDouble(textBox2->Text);

eps = Convert::ToDouble(textBox3->Text);

int i = 0;

double c = 0.1;

xNext = fx(x,y); yNext = fy(x,y);

i++;

while(!(sqrt(pow(xNext - x,2) + pow(yNext - y,2)) < eps))

{

x = xNext;

y = yNext;

xNext += c*fx(x,y);

yNext += c*fy(x,y);

i++;

}

label10->Text = Convert::ToString(xNext);

label11->Text = Convert::ToString(yNext);

label12->Text = Convert::ToString(i);

}



Результат:






Смотрите также файлы