Algoritmo detarea
	Definir n Como Entero
	Definir a,b Como Real
	Escribir "Ingresa una opcion"
	Escribir "1 = area del cuadrado"
	Escribir "2 = area del rectangulo"
	Escribir "3 = area del triangulo"
	Escribir "4 = area del circulo"
	leer n
	si n > 0 y n < 5 Entonces
		si n == 1 Entonces
			Escribir "Ingresa el lado del cuadrado"
			leer a
			Escribir "El area del cuadrado es: ",a*a
		SiNo
			si n == 2 Entonces
				Escribir "Ingresa la base"
				leer a
				Escribir "Ingresa la altura"
				leer b
				Escribir "El área del rectangulo es: ",a*b
			SiNo
				si n == 3 Entonces
					Escribir "Ingresa la base"
					leer a
					Escribir "Ingresa la altura"
					leer b
					Escribir "EL area del triangulo es: ",(a*b)/2
				SiNo
					Escribir "Ingresa el radio"
					leer r
					Escribir "El area del circulo es: ",3.1416 * r * r
				FinSi
			FinSi
		FinSi
	SiNo
		Escribir "Ingresa una opcion correcta"
	FinSi
FinAlgoritmo