Forum Apl Inf
Would you like to react to this message? Create an account in a few clicks or log in to continue.

Eratosthenovo sito

Goto down

Eratosthenovo sito Empty Eratosthenovo sito

Příspěvek pro Roman Luňák 16/11/2014, 11:05

Tady je Eratosthenovo síto

kód:

#include <stdio.h>
#include <stdlib.h>

int main()
{
int i,limit,k;

printf("zadejte limit : ");
scanf("%d", &limit);

int pole[1000];
//-------------------------------------------Naplnění pole
for (i = 0; i < limit; i++)                              
   {
    pole[i] = i+1;
   }
//--------------------------------------------Odstranění násobků
for (i = 1; i < limit; i++)                                
{
   if(pole[i] == 0) continue;

   for(k = i+1;k < limit; k++)
   {
      if (pole[k] == 0) continue;
      if ((pole[k] % pole[i])==0) pole[k]=0;
   }
}
//--------------------------------------------Tisk
printf ("Prvocisla jsou : ");                            
printf("%\n");

for (i = 0; i < limit; i++)
   if(pole[i]>0)
   {
     printf("%i,",pole[i]);
   }
printf("\n");

//--------------------------------------------

system("pause");
   return 0;
}

Roman Luňák
Admin

Poèet pøíspìvkù : 7
Join date : 15. 11. 14

https://forum-apl-inf.forumczech.com

Návrat nahoru Goto down

Návrat nahoru


 
Povolení tohoto fóra:
Nemůžete odpovídat na témata v tomto fóru