// Связь биологического количества dNTP’s с радиоактивностью

var chkA;
var nA=0; 
var q=0; 
var m=0; 
An=new Array("mol", "mmol", "mkmol", "nmol", "pmol", "fmol", "amol");
function resA()
{
nA=0; 
chkA=true;
q=0; 
m=0; 
}
function conv()
{
A = parseFloat(document.bio.A.value.replace(/,/g,".")); 
if(isNaN(A)||A==0){alert(alt09_01); document.bio.A.focus(); return true;};
A = Math.abs(A);
document.bio.A.value=A+"kCi/mmol"
act=parseFloat(document.bio.act.value.replace(/,/g,".")); 
if(isNaN(act)){alert(alt09_02); document.bio.act.focus(); return true;};
act = Math.abs(act);
q=act/A/Math.pow(10,12);
m=324.5*q;
n1=0;
	while(n1<6&&q<1) {n1++; q = q*1000};
	r1=Math.round(q*100)/100;
	if(r1>0){q=r1};
	document.bio.q.value=q+An[n1];
n2=0;
	while(n2<6&&m<1) {n2++; m = m*1000};
	nA=n2
	r2=Math.round(m*100)/100;
	if(r2>0){m=r2};
	document.bio.m.value=m;
	document.bio.DA.selectedIndex=nA;
	document.bio.act.value=act;
	chkA=false;
}
function rclc()
{
if(chkA){alert(alt09_03); return true};
document.bio.m.value = m*Math.pow(10,3*document.bio.DA.selectedIndex)/Math.pow(10,3*nA);
}