Exercício cap.2.15

15. Escreva umalgoritmo que leia o valor do raio e calcule o área do circulo correspondente.

Resposta:

1.  algoritmo "Cálculo da área de um circulo"

2.  var

3.    r,area:real

4.  inicio

5.    escreval("Cálculo da área de um circulo")

6.    escreva("Digite o valor do raio do circulo ")

7.     leia(r)

8.    area < 3.14*r^2

9.    escreval("A area desse circulo é igual a ",area,".")

10.   escreval("*** F I M ***")

11. fimalgoritmo