Algoritmo detarea
	Definir x,a,b,c,total Como Entero
	a = 0
	b = 0
	c = 0
	total = 0
	Repetir
		Escribir "Cuál es tu opinión acerca del Tratado de libre comercio"
		Escribir "1 = a favor"
		Escribir "2 = en contra"
		Escribir "3 = Se abstiene de opinar"
		leer n
		si n > 0 y n < 4 Entonces
			si n == 1 Entonces
				a = a + 1
			SiNo
				si n == 2 Entonces
					b = b + 1
				SiNo
					c = c + 1
				FinSi
			FinSi
			total = total + 1
			Escribir "el total:", total
		SiNo
			Escribir "Ingresa un numero correcto"
		FinSi
		Escribir "Deseas continuar con otra encuesta"
		Escribir "1 = Si"
		Escribir "Otro numero para finalizar"
		leer x
	Hasta Que x <> 1

	Escribir (a/total)*100,"% esta a favor"
	Escribir (b/total)*100,"% esta en contra"
	Escribir (c/total)*100,"% se abstiene de opinar"
FinAlgoritmo