Advertisement
Guest User

Untitled

a guest
Oct 16th, 2019
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.85 KB | None | 0 0
  1. using System;
  2. using System.Collections.Generic;
  3. using System.ComponentModel;
  4. using System.Data;
  5. using System.Drawing;
  6. using System.Linq;
  7. using System.Text;
  8. using System.Threading.Tasks;
  9. using System.Windows.Forms;
  10.  
  11. namespace Równanie_kwadratowe_2
  12. {
  13. public partial class Form1 : Form
  14. {
  15. public Form1()
  16. {
  17. InitializeComponent();
  18. }
  19.  
  20. private void label4_Click(object sender, EventArgs e)
  21. {
  22.  
  23. }
  24.  
  25. private void button2_Click(object sender, EventArgs e)
  26. {
  27. int a,b,c,p;
  28. double x,x1,x2;
  29. string znak_a, znak_b, znak_c;
  30.  
  31.  
  32.  
  33. if (int.TryParse(textBox1.Text, out p)) a = p;
  34. else a = 0;
  35. if (int.TryParse(textBox2.Text, out p)) b = p;
  36. else b = 0;
  37. if (int.TryParse(textBox3.Text, out p)) c = p;
  38. else c = 0;
  39.  
  40. if (a < 0) znak_a = "-"; else znak_a = "+";
  41. if (b < 0) znak_b = "-"; else znak_b = "+";
  42. if (c < 0) znak_c = "-"; else znak_c = "+";
  43.  
  44. double delta = (b*b) - (4*a*c);
  45.  
  46. if (a == 0 && b == 0) label5.Text = "To nie jest równanie kwadratowe.";
  47. else if (a == 0 && b != 0) { c = c * (-1); x = c / b; label5.Text = "Wynik równania = " + x.ToString(); }
  48. else if (delta > 0) { b = b * (-1); x1 = (b - Math.Sqrt(delta)) / (2 * a); x2 = (b + Math.Sqrt(delta)) / (2 * a); label5.Text = "Wynik równania = "+ x1.ToString() + " " + x2.ToString(); }
  49. else if (delta == 0) { b = b * (-1); x = b / (2 * a); label5.Text = "Wynik równania = " + x.ToString(); }
  50. else label5.Text = "Brak rozwiązań";
  51.  
  52.  
  53. label4.Text = znak_a + textBox1.Text + "x^2 " + znak_b + textBox2.Text + "x " + znak_c + textBox3.Text + " =0";
  54. }
  55. }
  56. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement