El todas las notas de astronomía y astrofotografía se pasaron al sitio http://www.sigmaoctantis.com.ar

function validarcuit($S) {
/*
 determina si el dígito verificador es correcto
 Retorna true si es correcto y false si es incorrecto
*/
$v2 = (substr($S,0,1) * 5 +
         substr($S,1,1)  * 4 +
         substr($S,2,1)  * 3 +
         substr($S,3,1)  * 2 +
         substr($S,4,1)  * 7 +
         substr($S,5,1)  * 6 +
         substr($S,6,1)  * 5 +
         substr($S,7,1)  * 4 +
         substr($S,8,1)  * 3 +
         substr($S,9,1) * 2) % 11;
     $v3 = 11 - $v2;
     switch ($v3) {
     case 11 : $v3 = 0; break;
     Case 10 : $v3 = 9; break;
     }
     
     return substr($S,10,1) == $v3;

}

function validarcuit(S) {
/*
 determina si el dígito verificador es correcto
 Retorna true si es correcto y false si es incorrecto
*/
var v2 = 0;
var v3 = 0;

if (isNaN(S)) {
   v2 = (Number(S.substr(0,1)) * 5 +
         Number(S.substr(1,1)) * 4 +
         Number(S.substr(2,1)) * 3 +
         Number(S.substr(3,1)) * 2 +
         Number(S.substr(4,1)) * 7 +
         Number(S.substr(5,1)) * 6 +
         Number(S.substr(6,1)) * 5 +
         Number(S.substr(7,1)) * 4 +
         Number(S.substr(8,1)) * 3 +
         Number(S.substr(9,1)) * 2) % 11;
     v3 = 11 - v2;
     switch (v3) {
     case 11 : v3 = 0; break;
     case 10 : v3 = 9; break;
     }
     
     return S.substr(10,1).Number == v3;
}
else
{
	return false;
}