Algoritmo "03_02 Area_Circulo"
// Disciplina   :  Introdução à Computação 
Var
   area, r: real
   NPI : real
Inicio
      NPI <- 3.141593
      Leia (r)
      area <- (NPI * r * r)
      Escreva (area)
FimAlgoritmo