Tp Liczby Pierwsze

[Wero]

Witam

 

Jestem nowym użytkownikiem na forum:) i głupio że z pierwszym postem proszę o pomoc ale naprawdę probowałem tego na wszelkie sposoby i mi nie wychodzi.

Otóż pisze program który wypisuje liczby pierwsze z przedziału od 1000 do 10000, i nie wiem jak zrobic z tymi liczbami pierwszymi, obecnie program wyglada tak:

 

{Program wypisuje wszystkie liczby pierwsze z przedzialu 1000-10000}

program liczby;

uses crt;

var i:integer;

 

begin

clrscr;

writeln('Program wypisuje liczby pierwsze od 1000 do 10000');

 

for i:=1000 to 10000 do

if (i mod 1<>0) then

if (i mod i<>i) then write (i,' ,');

readln

end.

Nie wiem jak zapisać to że dana liczba nie może sie dzielić np:przez 2 bo musi być liczba pierwsza która dzieli sie przez 1 i przez sama siebie, myślałem tez o zastosowaniu dwóch zmiennych ale nie wiem jak miałbym ta drugą zastosować. Jestem laikiem w programowaniu. Proszę o pomoc :)

[bilas]

Zainteresuj sie czyms takim jak sito Eratostenesa.

 

A zeby sprawdzic czy liczba jest podzielna przez inna uzyj MOD (modulo).

 

np

 

if (x MOD 2 <> 0) then LICZBA_NIE_JEST_PODZIELNA_PRZEZ_2

Edytowane 30 Stycznia 2009 przez bilas

[kfgz]

Poniżej masz gotowy algorytm zapisany w C

 

Sito: http://forum.purepc.pl/index.php?s=&sh...t&p=2537435

 

Bez sita: http://forum.purepc.pl/Programowanie-f35/Java-t232711.html