<HTML>
<!-- This web page was created by uschei               -->
<!-- © 1998 by Urs W. Scheidegger                      -->
<!-- 1. URL: http://www.nmz.ch/BOZ/Noisy/index.html      -->
<!-- 2. URL: http://www.spectraweb.ch/~uschei          -->
<!-- 3. URL: http://194.148.35.10                    -->
<HEAD>
<META name="description" content="Primzahlen auflisten mittels Javascript, gecodet 1998  von Urs Scheidegger im Rahmen des Noisy98-Projekts, Knowledge Worker Vogt-Schild AG Solothurner Zeitung">
<META name="keywords" content="Primzahlen, auflisten, Javascript, programmierer, Datenbanken, Urs Scheidegger, Knowledge Worker, Noisy98, Vogt-Schild">
<META NAME=GENERATOR CONTENT="BBEdit 4.0.4">
<META NAME="ROBOTS" CONTENT="ALL">
<META NAME="Content-Language" CONTENT="de">
<TITLE>Primzahlen auflisten</TITLE>


<style type="text/css">
    body,td,th {
      font-family : Arial, Verdana, Geneva, Helvetica, sans-serif;
    }
  </style>

  <script language="JavaScript"><!-- Projekt neu starten

function openProjekt() {
  popupWin = window.open('primzahlen_listen.html', '_top', 'menubar=0,toolbar=0,location=0,directories=0,status=0,scrollbars=0,resizable')
}

// Fertig Neustart --></script>



<SCRIPT LANGUAGE="JavaScript" type="text/javascript"><!--
function Anzeige_löschen()
{
document.f.pz.value = "";
}
function refresh() {

    setTimeout(function () {
        location.reload()
    }, 100);
}
//-->
</script>


<SCRIPT LANGUAGE="JavaScript" type="text/javascript"><!--
function calcPz()
{
	var n0=parseInt(document.f.n0.value),n1=parseInt(document.f.n1.value);
	document.f.pz.value="";
	if((n0>n1)||(n0*n1==0)||(isNaN(n0*n1)))return;
	document.f.pz.value=primtab(n0,n1,", ",document.f.prot);
	var t=document.f.prot.value.split(" ");
	t[0]=(n_pz==1)?"Eine":getZahlwort(n_pz);t[0]=t[0].charAt(0).toUpperCase()+t[0].substring(1,t[0].length);
	document.f.prot.value=t.join(" ");
}
	
//--></script>

<script>

var abbrechen=1==2;
var n_pz=0;
var zpn=32;
var zp=new Array(zpn+1);zp[0]=1;
for(var i=1;i<zpn+1;i++)zp[i]=zp[i-1]*2;

// Berechnet die Primzahlen von n0 bis n1, 
// Rückgabe als String mit Trennzeichen sep oder als Array, wenn sep="" oder sep=null;
// Statusmeldungen im Textfeld T

function primtab(n0,n1,sep,T)
{
	abbrechen=false;
	var i,j,k=3,l,aa,t="",bb,cc,bb0=0,s,bi,bii,biii,st;
	if(n0<3)n0=1;
	if(n1<n0)n1=n0;
	
	aa=Math.floor(Math.sqrt(n1)+1);
	if(aa<5)aa=5;
	var aaa=Math.floor(aa/10)*10;
	var a=new Array(Math.floor(aaa*0.4)+1);
	var al=a.length;
	a[0]=3;a[1]=5;a[2]=7;k=3;
//(1)
	status="(1) Fülle Array A (mögliche Primteiler): {2,3,...,"+aaa+"})";
	if(T!=null)T.value=status;
	for(j=10;j<=aaa;j+=10)
	{
		a[k++]=j+1;
		a[k++]=j+3;
		a[k++]=j+7;
		a[k++]=j+9;
	}
	al=k;

//(2)
	status="(2) Reduziere Array A";if(T!=null)T.value=status;
	for(i=0;(i<al);i++)
	{
		if(a[i]!=0)
		{
			for(j=i+1;j<al;j++)
			{
					if(a[j]>0)
					{
						if((a[j]%a[i])==0)a[j]=0;
					}
			}
		}
	}
	k=j=0;
	status="(2) Reduziere Array A - erstelle reduziertes Array";if(T!=null)T.value=status;
	for(i=0;(i<al)&&(a[i]<=aa);i++)if(a[i]!=0)j++;
	var c=new Array(j);
	for(i=0;(i<al)&&(a[i]<=aa);i++)if(a[i]!=0){c[k++]=a[i];}
	a=null;
	cc=c.length;
	
/*	status="(3) Erstelle Array B (für mögliche Primzahlen)";
	if(T!=null)T.value=status;
	n0=Math.floor(n0/2)*2+1;
	var b=new Array(Math.floor((n1-n0)/2+1));
	//for(i=0;i<b.length;i++)b[i]=0;
	j=0;

	st=status="(4) Streiche Vielfache von A in B";
	if(T!=null)T.value=status;
	for(i=0;i<cc;i++)
	{
		s=c[i]+c[i];
		k=n0-(n0%c[i]);
		if(k<n0)k+=c[i];
		if((k%2)==0)k+=c[i];
		if(k==c[i])k=c[i]+s;
		for(j=k;j<=n1;j+=s)b[Math.floor((j-n0)/2)]=1;
	}	

	bb = b.length;
	var sepp=((sep=="")||(sep==null))?" ":sep;
	status="(5) Formatiere Ausgabe";if(T!=null)T.value=status;
	j=(i-n1)/2;
	j=k=0;
	if(n0<2){bb0=1;t="2"+sepp;j=k=1;}
	for(i=bb0;(i<bb)&&(i*2+n0<=n1);i++)if((b[i]==0)||(b[i]==null))j++;
	a=new Array(j);n_pz=j;if(k==1)a[0]=2;
	for(i=bb0;i<bb;i++)
	{
		j=i*2+n0;
		if(j>n1)break;
		if((b[i]==0)||(b[i]==null))a[k++]=j;
	}
*/

	status="(3) Erstelle Array B (für mögliche Primzahlen)";
	if(T!=null)T.value=status;
	n0=Math.floor(n0/2)*2+1;
	var b=new Array(Math.floor((n1-n0)/2/zpn+1));
	for(i=0;i<b.length;i++)b[i]=0;
	j=0;

	st=status="(4) Streiche Vielfache von A in B";
	if(T!=null)T.value=status;
	for(i=0;i<cc;i++)
	{
		status=st+" - Vielfache von "+c[i];
		s=c[i]+c[i];
		k=n0-(n0%c[i]);
		if(k<n0)k+=c[i];
		if((k%2)==0)k+=c[i];
		if(k==c[i])k=c[i]+s;
		for(j=k;j<=n1;j+=s)
		{
			bi=Math.floor((j-n0)/2);bii=Math.floor(bi/zpn);biii=bi%zpn;
			b[bii]=b[bii]|zp[biii];
		}
	}	
	//alert(b);
	bb = b.length;
	var sepp=((sep=="")||(sep==null))?" ":sep;
	status="(5) Formatiere Ausgabe";if(T!=null)T.value=status;
	j=(i-n1)/2;
	j=k=0;
	if(n0<2){bb0=1;t="2"+sepp;j=k=1;}
	var bb1=bb*zpn;
	for(i=bb0;(i<bb1)&&(i*2+n0<=n1);i++)
	{
		bii=Math.floor(i/zpn);biii=i%zpn;
		if((b[bii]&zp[biii])==0){j++;/*alert(i*2+n0+"\n"+ j);*/}
	}
	a=new Array(j);n_pz=j;if(k==1)a[0]=2;
	for(i=bb0;i<bb1;i++)
	{
		j=i*2+n0;
		if(j>n1)break;
		bii=Math.floor(i/zpn);biii=i%zpn;
		if((b[bii]&zp[biii])==0)a[k++]=j;
	}

	if(a[0]==1)a[0]=2;
	status=n_pz+" Primzahl"+((n_pz==1)?"":"en")+" gefunden";
	if(T!=null)T.value=status;
	if((sep!="")&&(sep!=null))return a.join(sep);
	return a;
}	



	
//--></script>


<SCRIPT LANGUAGE="JavaScript">



<!-- Begin

function Rangliste(page) {
OpenWin = this.open(page, "CtrlWindow", "toolbar=0,scrollbars=1,location=0,directories=0,status=0,menubar=0,resizable=0,copyhistory=0,width=300,height=450");
}

function Hilfe() {
myWindow = window.open("", "", "toolbar=0,scrollbars=1,location=0,directories=0,status=0,menubar=0,resizable=0,copyhistory=0,width=350,height=200");




 	myWindow.document.write("<html> <head> <title>Hilfe</title> <"
 +"meta http-equiv='Content-Type' content='text/html;"
 +" charset=iso-8859-1'> </head>  <body bgcolor='#FFF"
 +"FFF'> <table width='300' border='0'>   <tr>     <t"
 +"d>       <table width='90%' border='0' align='cent"
 +"er'>         <tr>           <td><font face='Verdan"
 +"a, Arial, Helvetica, sans-serif' size='1'>"
 +"Primzahlen mit JavaScript<p> "
 +"Das JavaScript auf dieser Seite wurde 1998 im Rahmen des noisy-Projektes des Duttweiler-Instituts neben vielen anderen von Urs Scheidegger programmiert. Mehr Details dazu gibts <a href='http://www.urs-scheidegger.ch/index.php?id=39' target='_blank'>hier </a> beim Tools-&Uuml;berblick. "
 +"Dieses Script erstellt eine Primzahlenliste mithilfe des Siebverfahrens von Eratosthenes."

 +" Viel Spass! <p> <a href='javascript:window.close(this)';>Schliessen</a></font>              <p></p>        "
 +"   </td>         </tr>       </table>     </td>   "
 +"</tr> </table>  </body> </html> ");

}


// End -->
</SCRIPT>



</head>
<body background="../BG/kariert.gif" bgcolor="#E5EDF4" text="#000000" link="#6633CC" vlink="#6699CC" alink="#9933CC"  onload="calcPz()">

<table width="500" align="center">
  <tbody><tr><td><div align="left">Bereich eingeben und Auflisten klicken <br>
  </div></td>
</tr></tbody></table>

<form name="f">
<p>&nbsp;</p>
<table align="center"><tbody>
<tr><td>Primzahlen von  
    <input name="n0" size="12" value="1" tabindex="1"> 
    </td>
</tr>
<tr><td>Primzahlen bis 
    <input name="n1" size="12" value="10000" tabindex="2"></td>
  </tr>
<tr><td><input type="button" class="button" onclick="calcPz()" value="Auflisten" tabindex="3">
<input name="projekt" type=button onClick="openProjekt();" value="Neu starten" align=CENTER>

<INPUT TYPE=button VALUE="Schliessen" onClick="window.close()"> 

  <input name="button" type="button" onClick="javascript:Anzeige_löschen()" value="alles löschen" />
<!--  <input name="button2" type="button" onClick="javascript:refresh()" value="refresh" /> -->



</td>
  </tr>
<tr><td><textarea rows="118" cols="70" name="pz" tabindex="4" wrap="virtual"></textarea></td>
  </tr>
<tr><td><input name="prot" size="70" style="background-color:#eeeeee; border-style:none;font-family:Verdana" value=" "></td>
  </tr>
</tbody></table>
</form>


<a style='cursor:pointer;color:#003399;' onclick='javascript:print();'>Hier ausdrucken</a><br />
<p align="center">Quelle<br />
<a href="../index.html" target="_top">Noisy98</a></p>

<hr>
<p align="center"><FONT SIZE="-2" FACE="verdana, arial, helvetica, sans-serif">© Urs Scheidegger, 17. 2. 1998<br>Version: 17. 11. 2003</p>


      <p>&nbsp;</p>
<!-- Start Aktualisierungsdatum by Urs Scheidegger, Luterbach -->
      <!-- <CENTER>
           <P><FONT SIZE="-2" FACE="verdana, arial, helvetica, sans-serif">
              <SCRIPT LANGUAGE=JavaScript>a=new Array('Jan','Feb','Mar','Apr','Mai','Jun','Jul','Aug','Sep','Okt','Nov','Dez');
	dat=new Date(document.lastModified);
	year=dat.getYear();
	if (year<1900) year=year+1900;
	document.writeln("zuletzt aktualisiert am " +dat.getDate() + ". "  + a[dat.getMonth()] + " " + year)</SCRIPT>
 </FONT>
</CENTER> -->
      <!-- Ende Aktualisierungsdatum by Urs Scheidegger, Luterbach -->
      <!-- Start Aktualisierungsdatum by Urs Scheidegger, Luterbach -->
      <CENTER>
<P><FONT SIZE="-2" FACE="verdana, arial, helvetica, sans-serif">
              <SCRIPT LANGUAGE=JavaScript>
	document.writeln("programmiert am 17. Februar 1998 - update 17. November 2003")

</SCRIPT>

<script type="text/javascript">

  var _gaq = _gaq || [];
  _gaq.push(['_setAccount', 'UA-23054282-1']);
  _gaq.push(['_trackPageview']);

  (function() {
    var ga = document.createElement('script'); ga.type = 'text/javascript'; ga.async = true;
    ga.src = ('https:' == document.location.protocol ? 'https://ssl' : 'http://www') + '.google-analytics.com/ga.js';
    var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s);
  })();

</script>

</BODY>
</HTML>