/*  KVADRATICKA ROVNICE */

#include <iostream>          /* hlavickovy soubor vstupy a vystupy */

#include <math.h>            /* hlavickovy soubor matematicky */

using namespace std;

float a,b,c,D,x,x1,x2,x1r,x2r,x1i,x2i;  /* deklarace globalnich promnenych typu float   */

void dvoj();              /*  Prototyp funkce dvoj()  */

void real(); 	         /*  Prototyp funkce real()  */

void komp();              /*  Prototyp funkce komp()  */



int main(int argc, char** argv)    /* hlavni cast programu    */

{        /* pocatek hlavniho bloku  */

    /*clrscr();    */             /* mazani obrazovky        */

    cout<<("\n");

    cout<<(" KVADRATICKA ROVNICE ")<<endl<<endl;

    cout<<("zadejte kvadraticky soucinitel a= ");/* tisk na obrazovku */

    cin>>a;          /* zadani promnene "a" z klavesnice */

     cout<<("\n");

    cout<<("zadejte linearni soucinitel  b= ");  /* tisk na obrazovku */

    cin>>b;          /* zadani promnene "b" z klavesnice */

     cout<<("\n");

    cout<<("zadejte absolutni soucinitel  c= "); /* tisk na obrazovku */

    cin>>c;          /* zadani promnene "c" z klavesnice */

     cout<<("\n");

    if (a!=0)

    {   D=b*b-4*a*c;                      /* pocatek bloku if (a!=0) */

        cout<<("Diskriminant D = ")<<D<<endl;

     if (D==0)

     { dvoj();

     }

      else if (D>0)

       { real();

	  }

	    else komp();

    }                         /*  konec bloku  if (a!=0) */

	else

	{                                   /* zacatek bloku else  a=0  */

	        if (b!=0)

			{                    /* pocatek bloku if (b!=0) */

			x = -c/b;

			cout<<(" Reseni linearni rovnice je x = ")<<x;

			}                    /* konec bloku if (b!=0)   */

			else

			     if (c!=0)

				 cout<<("Linearni rovnice nema reseni!!!");

				 else

				 cout<<("Linearni rovnice ma nekonecne mnoho reseni!!!");

	}                                  /* konec bloku   else  a=0  */

return 0;

}        /* konec hlavniho bloku  */



void dvoj()  /* definice funkce dvoj() - hlavicka funkce dvoj()    */

  {                           /* Pocatek bloku tela funkce dvoj()  */

  x=-b/(2*a);

  cout<<("Dvojnasobny koren x = ")<<x <<endl;

  }                      /* Konec bloku tela   funkce dvoj()  */



void real()      /* definice funkce real() - hlavicka funkce real()    */

       {                      /* Pocatek bloku tela funkce real()  */

       x1=(-b+sqrt(D))/(2*a);

       cout<<(" Koren x1 = ")<< x1<<endl;

       x2=(-b-sqrt(D))/(2*a);

       cout<<(" Koren x2 = ") <<x2;

	 }                      /* Konec bloku tela   funkce real()  */



void komp()      /* definice funkce komp() - hlavicka funkce komp()    */

            {                 /* Pocatek bloku tela funkce komp()  */

            x1r=-b/(2*a);

            x1i=sqrt(-D)/(2*a);

            cout<<("Komplexni koren x1 = ")<<"( "<<x1r<< ",  "<< x1i<<" i )" <<endl;

			cout<<("Komplexni koren x2 = ")<<"( "<<x1r<< ",  "<<-x1i<<" i )" ;

			cout<<("\nDruhy komplexni koren je k vypoctenemu sdruzeny.")<<endl;

		}                  /* Konec bloku tela funkce komp()  */