function comprobar(){
	for (p=0;p<cuestiones.length;p++){
		for (s=0; s<2 ; s++){
			rsta = eval('document.test.r' + p + '[' + s + ']')
			if (rsta.checked){
				valor=eval('document.test.r' + p + '[' + s + '].value')
				respuestas[p] = valor
				contestadas ++
			}
		}
	}
resultado()
}
function resultado(){
	for(h=0; h<cuestiones.length; h++){
		prevalor="'" + cuestiones[h].resp + "'"
		resvalor="'" + respuestas[h] + "'"
		if ( prevalor == resvalor){
			aciertos ++
			cuestiones[h].aci=true
		}
		else{
			errores++
			cuestiones[h].aci=false
		}
	}
	porcentaje()
	escribeRes()
}