!set titb=Ejemplo
!set keyw=
!set datm=20030325
!set prev=
!set next=
!set upbl=propadd
!set dat1=19000101
!set dat2=24000101


!if $wims_read_parm!=$empty
 !goto $wims_read_parm
!endif
!exit

:content

!set tmp0=!randint 1, 5

!set tmp1=!randitem 1,-1

!set m_a=$[rint($(tmp0)*$(tmp1))]


!set tmp0=!randint 1, 11

!set tmp1=!randitem 1,-1

!set m_b=$[rint($(tmp0)*$(tmp1))]


!set tmp0=!randint  3, 15

!set tmp1=!randitem 1,-1

!set m_c=$[rint($(tmp0)*$(tmp1))]


!set tmp0=!randint  3, 5

!set tmp1=!randitem 1,-1

!set m_d=$[rint($(tmp0)*$(tmp1))]


!set m_ab=$[rint($m_a+$m_b)]


!set m_ac=$[rint($m_a+$m_c)]


!set m_bd=$[rint($m_d+$m_b)]


!set m_abc=$[rint($m_ab+$m_c)]


!set m_s=$[rint($m_abc+$m_d)]


!ifval $m_a>0 
!set m_a= +$m_a 
!endif


!ifval $m_b>0 
!set m_b= +$m_b 
!endif


!ifval $m_c>0 
!set m_c= +$m_c 
!endif


!ifval $m_d>0 
!set m_d= +$m_d 
!endif


!ifval $m_ab>0 
!set m_ab= +$m_ab 
!endif


!ifval $m_ac>0 
!set m_ac= +$m_ac 
!endif


!ifval $m_abc>0 
!set m_abc= +$m_abc 
!endif

<div class="exemple"><center>

!insmath \begin{array}{ccl}         A  &=&(\a)+(\b)+(\c)+(\d) \\         A  &=&(\ab)+(\c)+(\d)  \\         A  &= & (\abc)+(\d) \\         A  &=& \s\\ \\         B & = & ((\a)+(\c))+((\b)+(\d))  \\         B & = & (\ac)+(\bd)  \\         B & = & \s     \end{array}

</center>
</div>

