<!--
// (C) 2001 Benn&ouml;hr D25791 Linden
function loesg(){
  var xqltext = document.xql.k.value;
  var xltext = document.xl.p.value;
  var altext = document.al.q.value;
  var xqrtext = document.xqr.k.value;
  var xrtext = document.xr.p.value;
  var artext = document.ar.q.value;

 xq=eval(xqltext)-eval(xqrtext);
 x=eval(xltext)-eval(xrtext);
 a=eval(altext)-eval(artext);
 p=x/xq; q=a/xq; r=p*p/4-q; 

 var ptext=p; var qtext=q;
  if (p==0) ptext=" "
  if (p>0) {ptext=" +"+ptext+"x ";};
  if (p<0) ptext=" "+ptext+"x "
  if (q==0) qtext=" "
  if (q>0) {qtext=" +"+qtext;};
  if (q<0) qtext=" "+qtext

  if (r==0) var ltext=(-p/2)
  if (r<0) var ltext=" "
  if (r>0) {var l1=(-p/2-Math.sqrt(r)); 
	     var l2=(-p/2+Math.sqrt(r)); 
	var ltext=l1+" ; "+l2;      };

  
  document.nform.nf.value="x²  "+ptext+"  "+qtext+"  =  0" ;
  document.radi.r.value=r;
  document.loesung.loe.value=ltext;}
-->