\form{.}{expform}{n = <input size=6 name=parm1 value="\parm1">
<input type=hidden value=OK>} 
\def{integer value=\parm1}

\def{text h =wims(values x for x=1 to 50)}
\def{text test = \value isitemof \h ? 1:0} 
\def{integer  n=\test=0 ? randint(2..9):\value}
Voici les racines \(\n)-imes de l'unit   dans le plan complexe : avec
 \reload{<img src="gifs/doc/etoile.gif" alt="rechargez" 
width="20" height="20">}, vous pouvez changer la valeur alatoirement 
ou la choisir vous-mme en haut (infrieure  50). 

<ul>
<li>
Regarder  les diffrences entre \(n) pair et impair </li>
<li> 
Essayer successivement des valeurs multiples, par exemple 2, 4, 12 ou 3, 6, 12, 24</li>
</ul>
et interprter ce que vous remarquez.  
 \def{text dessin=}
\for{i=1 to \n}{
        \def{real a=cos(2*pi*\i/\n)}
        \def{real b=sin(2*pi*\i/\n)}
        \def{text dessin=\dessin
point \a,\b,red
        }
}
 <center>
\draw{150,150}
{xrange -1.5,1.5
yrange -1.5,1.5
hline  0,0,black
vline  0,0,black
trange 0,1
plot green, cos(2*pi*t),sin(2*pi*t)
linewidth 6
\dessin
}
<br> \(n = \n)
</center>