Proceso sin_titulo
	escribir "ingrese la edad"
	leer a
	escribir "ingrese el precio del boleto"
	leer b
	Si a > 3 y 6 Entonces
		escribir "el precio de 3 y 6 es"
		escribir b/2
	Sino
		escribir "usted debe pagar"
		escribir b
	FinSi
	Si a > 7 y 12 Entonces
		escribir "el precio de 7 y 12 es"
		escribir b*25/100
	Sino
		escribir "usted debe pagar"
		escribir b
	FinSi
FinProceso