macrofish

prokusaka

Feb 10th, 2013
53
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.11 KB | None | 0 0
  1. /*
  2. * Název programu:
  3. * Autor:
  4. * Studijní skupina:
  5. * Email autora:
  6. * Datum vypracování:
  7. * Zadání:
  8. * Stručný popis řešení:
  9. */
  10. #include <stdio.h>
  11. #include <MATH.H>
  12.  
  13. int main()
  14. {
  15. int a, b, c;
  16. printf("Zadej kvadraticky clen: ");
  17. scanf(" %d",&a);
  18.  
  19. printf("Zadej linearni clen:");
  20. scanf(" %d",&b);
  21.  
  22. printf("Zadej absolutni clen:");
  23. scanf(" %d",&c);
  24.  
  25. double dis, x1, x2, v, n, k ;
  26.  
  27. dis=b*b-4*a*c;
  28.  
  29.  
  30. if (a==0)
  31. { printf("Rovnice neni kvadraticka");
  32. }
  33.  
  34. else if (dis>0)
  35. {
  36.  
  37. x1=(-b+sqrt(dis))/(2*a);
  38. x2=(-b-sqrt(dis))/(2*a);
  39.  
  40. printf("Koreny kvadraticke rovnice jsou dva a to: %f a %f \n", x1, x2);
  41. }
  42. else if (dis==0)
  43. {
  44.  
  45. x1=(-b+sqrt(dis))/(2*a);
  46. x2=(-b-sqrt(dis))/(2*a);
  47.  
  48. printf("Rovnice ma jeden dvojnasobny koren: %f \n", x1);
  49. }
  50.  
  51. else if (dis<0)
  52. {
  53. double p;
  54. double o;
  55. p=double(b);
  56. o=double(a);
  57. x1=((-p)/(2*o));
  58. x2=((-p)/(2*o));
  59. k=-dis;
  60.  
  61. v=sqrt(k)/(2*a);
  62. n=-sqrt(k)/(2*a);
  63.  
  64. printf("Koreny kvadraticke rovnice jsou dva komplexne sdruzene a to: %f+(%f)*i a %f+(%f)*i\n", x1, v,x2, n);
  65. }
  66.  
  67. return 0;
  68. }
Advertisement
Add Comment
Please, Sign In to add comment