ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 13.06.2019
Просмотров: 98
Скачиваний: 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);
}
Результат: