Нахождение корней кубического уравнения - C#
Формулировка задачи:
Всем, привет. Столкнулся с проблемой написания формулы решения кубического уравнения, а точнее нахождения их корней. Ниже есть код, который я писал. Как оказалось, формула, которую я писал по видимому не находит корней. Ссылка на сайт с формулой. Это глупый вопрос, но формула указанная на сайте находить корни?
Если не составит труда, не могли бы вы оставить готовый код, для нахождения корней в кубическом уравнении, если он у вас есть!))
Сам код, который я писал(читайте комментарии):
Листинг программы
- // Эта формула взята с сайта "http://planetcalc.ru/1122/" В плане конвертирования математического вида теоремы в программный, вроде все нормально написал, но есть проблемки!
- Console.Write("Введите А ");
- int a = Int32.Parse(Console.ReadLine());
- Console.Write("Введите В ");
- int b = Int32.Parse(Console.ReadLine());
- Console.Write("Введите C ");
- int c = Int32.Parse(Console.ReadLine());
- double Q = (Math.Pow(a, 2) - 3 * b) / 9;
- double R = (2 * Math.Pow(a, 3) - 9 * a * b + 27 * c) / 54;
- double S = Math.Pow(Q, 3) - Math.Pow(R, 2);
- double fi = 1 / 3 * Math.Acos(R / Math.Sqrt(Math.Pow(Q, 3)));
- double x1;
- double x2;
- double x3;
- double x23;
- double i; // С этой переменной возникают проблемы. У нее нету значения, но по формуле ее нужно писать.
- {if (S > 0)
- {
- x1 = -2 * Math.Sqrt(Q) * Math.Cos(fi) - a / 3;
- x2 = -2 * Math.Sqrt(Q) * Math.Cos(fi + 2 / 3 * Math.PI) - a / 3;
- x3 = -2 * Math.Sqrt(Q) * Math.Cos(fi - 2 / 3 * Math.PI) - a / 3;
- }
- else
- {
- if (Q > 0)
- {
- fi = 1 / 3 * Math.Log(Math.Abs(R) / Math.Sqrt(Math.Pow(Q, 3))) + Math.Sqrt(Math.Pow(Math.Abs(R) / Math.Sqrt(Math.Pow(Q, 3)), 2) - 1);
- x1 = -2 * Math.Sign(R) * Math.Sqrt(Q) * 2 / (Math.Exp(fi) - Math.Exp(-fi)) - a / 3;
- x23 = Math.Sign(R) * Math.Sqrt(Q) * 2 / (Math.Exp(fi) - Math.Exp(-fi)) - a / 3 +- i * Math.Sqrt(3) * Math.Sqrt(Q) * 2 / (Math.Exp(fi) + Math.Exp(-fi));
- }
- else
- {
- fi = 1 / 3 * Math.Log(Math.Abs(R) / Math.Sqrt(Math.Abs(Q)), 3);
- x1 = -2 * Math.Sign(R) * Math.Sqrt(Math.Abs(Q)) * ((Math.Exp(fi) - Math.Exp(-fi)) / 2) - a / 3;
- x23 = Math.Sign(R) * Math.Sqrt(Math.Abs(Q)) * ((Math.Exp(fi) - Math.Exp(-fi)) / 2) - a / 3 +- i * Math.Sqrt(3) * Math.Sqrt(Math.Abs(Q)) * 2 / (Math.Exp(fi) - Math.Exp(-fi);
- }
- }
- }
- if (S == 0)
- {
- x1 = (-2 * Math.Sign(R) * Math.Sqrt(Q) - a / 3) = (-2 * Math.Sqrt(R) - a / 3); // Возникла проблема в написании самого вырожения. Я код не правильно написал?(Взгляните на сайт. Вроде все правильно написал)
- }
- // Я код не закончил, т.к. возникли вышеперечисленные проблемы
Решение задачи: «Нахождение корней кубического уравнения»
textual
Листинг программы
- x23 = Math.Sign(R) * Math.Sqrt(Q) * 2 / (Math.Exp(fi) - Math.Exp(-fi)) - a / 3 - i * Math.Sqrt(3) * Math.Sqrt(Q) * 2 / (Math.Exp(fi) + Math.Exp(-fi)); // x2 = x3: -
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д