PseInt_Practica04_PorcentajeHombresMujeres

Proceso practica04
	// Un maestro desea saber que porcentaje de hombres y que porcentaje
	// de mujeres hay en un grupo de estudiantes.

	hombres <-0;
	mujeres <-0;
	cant_mujeres<-0;
	alumnos <-0;
	Escribir "Cuantos alumnos hay en total en el grupo";
	Leer alumnos;
	Escribir "En el grupo de Algoritmos, cuantas mujeres hay?";
	Leer cant_mujeres;

	mujeres <- (cant_mujeres * 100) / alumnos
	hombres <- ((alumnos- cant_mujeres) * 100) / alumnos

	Escribir "El porcentaje de mujeres en el grupo es: ", mujeres, "%"
	Escribir "El porcentaje de hombres en el grupo es: ", hombres, "%"

FinProceso