var last_change = null;
var last_color = null;
function ChangeColor( element, color ){
   if( last_change != null ){
       last_change.style.backgroundColor = last_color;
   }
   last_change = element;
   last_color = element.style.backgroundColor;
   element.style.backgroundColor = color;
}
var pl =0;
function mark(m)
{pl=m;
}
function calctr()
{
	var de1 = document.equation1;
 
	var d=de1.factor11.value;
      d=d-0;
	var ts=de1.factor12.value;
      ts=ts-0;
	var dl=de1.factor13.value;
      dl=dl-0;
	var kl=de1.factor14.value;
      kl=kl-0;
	if (pl == 0) {alert("Выберете сплав")}
	if (d == 0 && dl == 0 && ts == 0 && kl == 0) {
		alert("Необходимо ввести данные");
	}
	y1=(3.14156*(d/10/2)*(d/10/2)-3.14156*(d-ts*2)/10/2*(d-ts*2)/10/2)*dl/10*kl*pl/1000;

	if (y1<=0) { alert("Введены неверные данные");
	}
	if (y1!=0) {document.result1.roots1.value =  y1; 
	}
}
function calclist()
{
	var de2 = document.equation2;
 
	var tl=de2.factor21.value;
      tl=tl-0;
	var shl=de2.factor22.value;
      shl=shl-0;
	var dll=de2.factor23.value;
      dll=dll-0;
	var kll=de2.factor24.value;
      kll=kll-0;
	if (pl == 0) {alert("Выберете сплав")}
	if (tl == 0 && shl == 0 && dll == 0 && kll == 0) {
		alert("Необходимо ввести данные");
	}
	y2=(pl*shl/10*kll*tl/10*dll/10)/1000;

	if (y2<=0) { alert("Введены неверные данные");
	}
	if (y2!=0) {document.result2.roots2.value =  y2; 
	}
}
function calcpr()
{
	var de3 = document.equation3;
 
	var di=de3.factor31.value;
      di=di-0;
	var dlp=de3.factor32.value;
      dlp=dlp-0;
	var klp=de3.factor33.value;
      klp=klp-0;
	if (pl == 0) {alert("Выберете сплав")}
	if (di == 0 && dlp == 0 && klp == 0) {
		alert("Необходимо ввести данные");
	}
	y3=3.14156*pl*klp*(di/10/2)*(di/10/2)*dlp/10/1000;

	if (y3<=0) { alert("Введены неверные данные");
	}
	if (y3!=0) {document.result3.roots3.value =  y3; 
	}
	
}
function calcshin()
{
	var de4 = document.equation4;
 
	var tlsh=de4.factor41.value;
      tlsh=tlsh-0;
	var shsh=de4.factor42.value;
      shsh=shsh-0;
	var dlsh=de4.factor43.value;
      dlsh=dlsh-0;
	var klsh=de4.factor44.value;
      klsh=klsh-0;
	  if (pl == 0) {alert("Выберете сплав")}
	if (tlsh == 0 && shsh == 0 && dlsh == 0 && klsh == 0) {
		alert("Необходимо ввести данные");
	}
	y4=tlsh/10*shsh/10*dlsh/10*klsh*pl/1000;

	if (y4<=0) { alert("Введены неверные данные");
	}
	if (y4!=0) {document.result4.roots4.value =  y4; 
	}
}
function clearv( num) {
pl = 0
last_change.style.backgroundColor = '#F4F4F4';
 document.forms['equation'+num].reset()
 document.forms['result'+num].reset();
}