Proceso sin_titulo
	escribir "ingrese el numero:"
	Leer num
	Si num > 0 Entonces
		escribir "numero positivo"
	Sino
		escribir "numero negativo"
	FinSi
FinProceso