```{r echo=FALSE}
v <- sample (c(10,12,15,20,25), size=1)
r1 <- sample (c(2,3,4,5,6), size=1)
r2 <- sample (c(2,3,4,5,6), size=1)
re <- (r1*r2)/(r1+r2)
req <- round(re, 2)
i <- round(v/re, 2)
```
6. Calcula a resistencia equivalente do seguinte circuíto e seguidamente a intensidade que o percorre.

\begin{center}
  \begin{circuitikz}[european]
    \draw (0,0) to[battery1, l=`r v` V] (0,3) -- (2,3) to[R=$`r r1` \Omega$] (2,0) -- (0,0);
    \draw (2,3) -- (4,3) to[R, l=$`r r2` \Omega$] (4,0) -- (2,0); 
  \end{circuitikz}
  Sol: Rt=`r req` $\Omega$ -- I=`r i` A 
\end{center}