Vypocet velikosti vektoru magneticke intenzity na ose 
              kruhoveho zavitu o polomeru 50 mm protekaneho proudem I
               = 2 A.
 
Doporuceni :  
                  Vykreslit graf v mezich  - 0.15 az 0.15 m .

\(TraditionalForm\`hh = 2*a*a/\((2*\((a*a + z*z)\)^\((3/2)\))\); 
a =. ; 
    
a = 5*10^\(-2\); 
ii =. ; 
ii = 2; 

    Plot[hh, {z, \(-0.15\), 0.15}]\)

Zavislost vektoru mg .  intenzity na polomeru zavitu v 
            mezich od 5 do 12 cm

\(TraditionalForm\`\(
ii =. ; 
ii = 2; 

    Plot3D[ii*a*a/\((2*\((a*a + z*z)\)^\((3/2)\))\), {z, \(-0.15\), 0.15}, {
        a, 5*10^\(-2\), 12*10^\(-2\)}, PlotPoints -> 70]
\)\)

\(



        Zavislost\ vektoru\ mg . \ intenzity\ na\ velikosti\ protekajiciho\ 
          proudu\ v\ mezich\ od\ 2\ do\ 5\ A\)

\(TraditionalForm\`a =. ; 
a = 5*10^\(-2\); 

    Plot3D[ii*a*a/\((2*\((a*a + z*z)\)^\((3/2)\))\), {z, \(-0.15\), 0.15}, {
        ii, 2, 5}, PlotPoints -> 70]\)