E1.30 Notas de alumnos

Actividad 1.30: Calcular las calificaciones de un grupo de alumnos. La nota final de cada alumno se calcula según el siguiente criterio: la parte práctica vale el 10%; la parte de problemas vale el 50% y la parte teórica el 40%. El algoritmo leerá el nombre del alumno, las tres notas, escribirá el resultado y volverá a pedir los datos del siguiente alumno hasta que el nombre sea una cadena vacía. Las notas deben estar entre 0 y 10, si no lo están, no imprimirá las notas, mostrará un mensaje de error y volverá a pedir otro alumno.

Algoritmo sin_titulo
	//Actividad 1.30: Calcular las calificaciones de un grupo de alumnos. 
	//La nota final de cada alumno se calcula según el siguiente criterio: 
	//la parte práctica vale el 10%; 
	//la parte de problemas vale el 50% y la parte teórica el 40%. 
	//El algoritmo leerá el nombre del alumno, las tres notas, 
	//escribirá el resultado y volverá a pedir los datos del siguiente alumno 
	//hasta que el nombre sea una cadena vacía. Las notas deben estar entre 0 y 10, 
	//si no lo están, no imprimirá las notas, mostrará un mensaje de error y 
	//volverá a pedir otro alumno.
	
	Escribir "Dime el nombre del alumno: "
	leer nombre
	
	mientras nombre<>""
		Repetir
			Escribir "N. Practicas:"
			leer pract
		Hasta Que pract>=0 y pract<=10
		Repetir
			Escribir "N. Teoria:"
			leer teo
		Hasta Que teo>=0 y teo<=10
		Repetir
			Escribir "N. Problemas:"
			leer prob
		Hasta Que prob>=0 y prob<=10
		
		Escribir pract*.10 + teo*.40 + prob*.50
		
		
		Escribir "Dime el nombre del alumno: "
		leer nombre
	FinMientras

FinAlgoritmo

Funcion nota <- introNota (texto)
	Repetir
		Escribir texto
		leer nota
		si nota<0 o nota>10
			Escribir "Nota incorrecta"
		FinSi
	Hasta Que nota>=0 y nota<=10
FinFuncion


Algoritmo sin_titulo
	Escribir "Dime el nombre del alumno: "
	leer nombre
	
	mientras nombre<>""
		pract=introNota("N. Practicas:")
		teo=introNota("N. Teoria:")
		prob=introNota("N. Problemas:")

		Escribir pract*.10 + teo*.40 + prob*.50
		
		
		Escribir "Dime el nombre del alumno: "
		leer nombre
	FinMientras
FinAlgoritmo