|
|
DataMuseum.dkPresents historical artifacts from the history of: Bogika Butler |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Bogika Butler Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1024 (0x400)
Types: TextFile
Names: »SAMP3.C«
└─⟦d3d1d07f5⟧ Bits:30009789/_.ft.Ibm2.50006621.imd Mogens Pelles Zilog 80,000 / EOS projekt
└─⟦this⟧ »SAMP3.C«
/*Eratosthenes Sieve Prime Number Program in C*/
#define true 1
#define false 0
#define size 8190
#define sizepl 8191
#include "auxfn.h"
char flagsÆsizeplÅ;
main() æ
register int i;
int prime,k,count,iter;
puts("ØnØnSample Program #3 : A prime number sieveØn");
puts("10 iterationsØn");
for(iter = 1;iter <= 10;iter ++) æ
count=0;
for(i = 0;i <= size;i ++)
flagsÆiÅ = true;
for(i = 0;i <= size;i ++) æ
if(flagsÆiÅ) æ
prime = i + i + 3;
k = i + prime;
while(k <= size) æ
flagsÆkÅ = false;
k += prime;
å
count = count + 1;
å
å
å
puts("Øn"); putdec(count); puts(" primes");
å
«eof»