
title=1. ϼӷ
sol=2
sign=!randitem +,-
prompt=$m_g(x)

!ifval abs($z0)=1
 sh_=2
!else
 sh_=1
!endif

flist=1/(x+$sh_),1/(x-$sh_),sin(x),cos(x),exp(x),log(x+$sh_)
!ifval $z0=0
 Flist=$flist
!else
 Flist=1/(x+$[$sh_-$z0]),1/(x-$[$sh_+$z0]),sin(x-$z0),cos(x-$z0),\
	exp(x-$z0),log(x+$[$sh_-$z0])
!endif
n_=!itemcnt $flist
n_=!randint 1,$n_
exp=!item $n_ of $flist
Exp=!item $n_ of $Flist
explicite=!htmlmath $Exp

parisrc=ser3=Ser($exp,x); ser2=ser1 $sign ser3; poly2=Pol(ser2);

given=ser1
calcname=<p><center>$m_g(x) = $m_f(x) $sign $explicite&nbsp;</center> <p>

