\title	{Potencias de una matriz 3x3}
\language{en}
\author	{XIAO Gang}
\email	{xiao@unice.fr}
\format	{html}
\range  {-5..5}
\precision{10000}

\integer{range=4}
\integer{half=\range/2}
\matrix{A=2*randint(-\half..\half)+1,randint(-\range..\range),randint(-\range..\range)
2*randint(-\half..\half),2*randint(-\half..\half)+1,randint(-\range..\range)
2*randint(-\half..\half),2*randint(-\half..\half),2*randint(-\half..\half)+1
}
\text{shuf1=shuffle(3)}
\text{shuf2=shuffle(3)}
\matrix{A=pari(print(vecextract([\A],[\shuf1],[\shuf2])))}
\matrix{powers=
2,5
3,5
2,7
3,7
4,7
}
\text{powers=shuffle(randomrow(\powers))}
\integer{p1=item(1,\powers)}
\integer{p2=item(2,\powers)}
\matrix{P1=pari(print([\A]^\p1))}
\matrix{P2=pari(print([\A]^\p2))}

\statement{Tenemos una matriz \(A), con
<p><center>
 \(A^\p1 = [\P1]) , 
 \(A^\p2 = [\P2]) .
</center> <p>
¿Quién es \(A) ?
}

\answer{A}{\A}{type=matrix}
