ÁREA DE UN CIRCULO

Saludos, el día de hoy realizare un ejercicio que permita saber el área de un circulo, conociendo su radio
Algoritmo area_circulo
Definir area, radio, pii Como Real;
Escribir "ingrese radio del circulo";
Leer radio;
pii <- 3.1415;
area <- pii*radio^2;
Imprimir "el area del circulo es; ", area;
FinAlgoritmo