\embed{definition}{&nbsp;}<pre class="fichier">
<div class="variable">
\title\lbrac Affixe et forme trigonométrique \rbrac
\language\lbrac fr \rbrac
\author\lbrac Bernadette Perrin-Riou \rbrac
\email\lbrac bpr@math.u-psud.fr \rbrac
\format\lbrac html \rbrac
\rational\lbrac a = \random(1/6,1/3,2/3,1/4,1/2,3/4,5/6,0/1) \rbrac
\integer\lbrac r = \randint(1<tt class="w">..</tt>3)*\random(1,-1) \rbrac
\integer\lbrac b = \random(-1<tt class="w">..</tt>1) \rbrac
\rational\lbrac a = \\a + \\b \rbrac
\text\lbrac c = \pari([numerator(\\a) , denominator(\\a)]) \rbrac
\function\lbrac api = \\c[1]*pi/\\c[2] \rbrac
\real\lbrac pointx = (\\r)*cos(\\a*pi) \rbrac
\real\lbrac pointy = (\\r)*sin(\\a*pi) \rbrac
\real\lbrac s = 3.1 \rbrac
\text\lbrac dessin = \rbrac
\for\lbrac i = 1 <tt class="w">to</tt> 5 \rbrac\lbrac  
  \text\lbrac dessin = \\dessin 
     <tt class="des">dline</tt> -2*\\s*cos(\\i*pi/12),-2*\\s*sin(\\i*pi/12),2*\\s*cos(\\i*pi/12),2*\\s*sin(\\i*pi/12),blue \rbrac  \rbrac <tt class=comm>\\for</tt>\lbrac i = 7 <tt class="w">to</tt> 11 \rbrac\lbrac
  \text\lbrac dessin = \\dessin 
     <tt class="des">dline</tt> -2*\\s*cos(\\i*pi/12),-2*\\s*sin(\\i*pi/12), 2*\\s*cos(\\i*pi/12),2*\\s*sin(\\i*pi/12),blue \rbrac  \rbrac
\real\lbrac taille = 200 \rbrac
\text\lbrac preparation=
    <tt class="des">xrange</tt> -\\s, \\s 
    <tt class="des">yrange</tt> -\\s, \\s 
    <tt class="des">hline</tt> 0,0,black 
    <tt class="des">arrow</tt> 0,0,1,0,6,black 
    <tt class="des">arrow</tt> 0,0,0,1,6,black 
    <tt class="des">vline</tt> 0,0,black 
    <tt class="des">trange</tt> 0,2*pi 
    <tt class="des">plot</tt> blue,cos(t),sin(t) 
    <tt class="des">plot</tt> blue,2*cos(t),2*sin(t) 
    <tt class="des">plot</tt> blue,3*cos(t),3*sin(t) \rbrac
\text\lbrac A = <tt class=fct>draw</tt>(\\taille,\\taille 
      \\preparation
      \\dessin
      ) \rbrac
\text\lbrac PP = \slib(draw/convpixel \\pointx,\\pointy,\\taille,\\taille,-\\s,\\s,-\\s,\\s,0,pixels) \rbrac
\real\lbrac Px = \\PP[1] \rbrac
\real\lbrac Py = \\PP[2] \rbrac </div><div class="statement">   
\statement\lbrac Cliquez sur le point d'affixe 
     &#92;(\\r*exp(i*\\api) = \\r*(cos(\\api) + i*sin(\\api))) :
    &lt;p>
     &lt;center>
       <tt class=comm>\\embed</tt>\lbrac <tt class=reply>reply1</tt> \rbrac &lt;/center>
    &lt;/p> \rbrac </div><div class="variable">
\answer\lbrac \rbrac\lbrac  \\A ; point,\\Px,\\Py \rbrac\lbrac <tt class="type">type  =  coord</tt> \rbrac </div><div class="statement"> 
\feedback\lbrac \\result1 = -1 \rbrac\lbrac Voici la réponse
    &lt;center>
     <tt class=comm>\\draw</tt>\lbrac \\taille,\\taille \rbrac\lbrac  
      \\preparation
      \\dessin
      <tt class="des">disk</tt> \\pointx,\\pointy,10,blue \rbrac &lt;/center>
\rbrac </div></pre>
