!set title=Tangente
!if $wims_read_parm!=$empty
 !goto $wims_read_parm
!endif
oef2wims_version=3.22
author=Marina, Cazzola
email=marina.cazzola@unimib.it
language=it
computeanswer=yes

ansorder=r
varcnt=28
prevarcnt=27
postvarcnt=0
replycnt=1
choicecnt=0
conditioncnt=0
feedbackcnt=1
format=html

val1=$imagedir
val2=$confparm1
val3=$confparm2
val4=$confparm3
val5=$confparm4

!if $testcondition=yes
 !goto test
!endif
!if $status=waiting
 !exit
!endif

val6=it
val7=\(\tan(a)=\frac{y}{x}\)
val8=25,17
val9=20
val10=1.1
val11=0.3
val12=($(val8[1])+2*$val10)*$val9,($(val8[2])+2*$val10)*$val9
tmp0=!values x for x in $val12

val12=$(tmp0)
val13=xrange -$val10,$(val8[1])+$val10	yrange -$val10,$(val8[2])+$val10	linewidth 2	parallel -1,-1,-1,$(val8[2])+1,1,0,$(val8[1])+3,grey	parallel -1,-1,$(val8[1])+1,-1,0,1,$(val8[2])+3,grey	
tmp0=!randint 2, 10

val14=$[rint($(tmp0))]
tmp0=!randint 2, 10

val15=$[rint($(tmp0))]
val16=$[$val15/$val14]

!ifval $val16<= 0.5 
val17=$[ 2 ]
!else
val17=$[ 1]
!endif

!ifval $val16< 0.4 
val17=$[ 3 ]
!else
val17=$[ $val17]
!endif

!ifval $val16>=1  
val17=$[ 0.7 ]
!else
val17=$[ $val17]
!endif

!ifval $val16>2  
val17=$[ 0.3 ]
!else
val17=$[ $val17]
!endif
val18=$[0.8]
val13=$val13	translate 10,7	poly black , 0,0 , $val14,0 , $val14,$val15	text black,$val17,$val18,medium,a	killtranslate	
!readproc oef/draw.phtml $val12 \
$val13 
tmp0=$ins_url
val19=$(tmp0)
val20=xrange -$val10,$val14+$val10	yrange -$val10,$val15+$val10	linewidth 2	poly black , 0,0 , $val14,0 , $val14,$val15	text black,$val17,$val18,medium,a	text black,$val14+0.2,$val15/2,medium,y	text black,$val14/2,-0.2,medium,x	
val21=($val14+2*$val10)*$val9,($val15+2*$val10)*$val9
tmp0=!values x for x in $val21

val21=$(tmp0)
!readproc oef/draw.phtml $val21 \
$val20 
tmp0=$ins_url
val22=$(tmp0)
val23=$[atan($val16)]
val24=$[($val23*180)/PI]
val24=$[(rint(100*$val24))/100]
val23=$[(rint(100*$val23))/100]
replyoption1=absolute 
replyname1=Valore della tangente di \(a\)
replygood1=$val16
question=__EXECUTED_1692754_EXERCISE__
hint=!nosubst <div>$val7</div><div class="wimscenter"><img src="$val22"/></div>


!goto stat

!exit

:question
$()	Quanto vale la tangente dell'angolo 
!insmath a
$()	<div class="wimscenter">	<img src="$val19" />	</div>	
$()
!exit

:hint
$()<div>$val7</div><div class="wimscenter"><img src="$val22"/></div>
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:latex
$()
$()
!exit

:feedback
!ifval $m_reply1=$val16
 <div class='oef_feedbacks'>L'informazione che abbiamo trovato (tan(a)=$m_reply1) ci permette di concludere che l'angolo 
!insmath a
$() misura circa $val24 gradi (pari a circa $val23 radianti).
$()</div>
!endif

!exit

:test

!exit

:stat
vsavelist=7,16,19,22,23,24
embedcnt=0
