Alg - Lista 2 - Escreva um algoritmo que leia o valor do raio e calcule a área do circulo correspondente.

algoritmo "Area Circulo"


var
   raio,area: real

inicio 

  escreval("Entre com o raio do círculo")
   leia(raio)
   area<-(raio^2)*3,14
   escreva("O valor da área é de aproximadamente: ",area)
 
fimalgoritmo