Witam
Mam w tej chwili zajęcia i nauczyciel kazal napisać nam program który przy wpisaniu np.35 wypisze na ekranie liczby pierwsze do 35 ale nie wiem jak to zrobiś mogl by ktoś mi to napisać jak najszybciej!!!
Z góry dziekuje za pomoc
Witam
Mam w tej chwili zajęcia i nauczyciel kazal napisać nam program który przy wpisaniu np.35 wypisze na ekranie liczby pierwsze do 35 ale nie wiem jak to zrobiś mogl by ktoś mi to napisać jak najszybciej!!!
Z góry dziekuje za pomoc
uczyc sie a nie kombinowac :p
var i,j,L,z: Integer;
begin
write('podaj zakres: '); readln(z);
for i:=1 to z do begin
L:=0;
for j:=1 to i do
if (i mod j)=0 then L:=L+1;
if L:= 2 then writeln(i);
end;
end;
nie chce sie skompilować pisze: Boolem expression expected
var i,j,L,z: Integer;
begin
write('podaj zakres: '); readln(z);
for i:=1 to z do begin
L:=0;
for j:=1 to i do
if (i mod j)=0 then L:=L+1;
if L= 2 then writeln(i); <--- TU BYL NIEPOTRZEBNY DWUKROPEK
end;
end;
no to trzeba troche samemu pomyslec...
z drugiej strony dziewczyną jestes to i tak sobie w zyciu poradzisz...
a teraz pisze: "." expected
powiem Ci ze gdzies zamiast kropki ( . <-- to jest kropka) jest sredniczek ( ; <--- a to jest malutki sredniczek), poszukaj... jakies podstawy chyba z pascala znasz?? dla ulatwienia powiem Ci ze ten srednik jest bardzo daleko od poczatku programu
dzięki nie zauwazyłam, ale program chodzi nie tak bo na początku pokazuje 2 ze na lezy do przedziału
dzieki wielkie za pomoc juz sobie z tym poradziłam
prosze bardzo, a dwojka przypadkiem nie jest liczbą pierwszą???
no jest. troche sie spiesze bo ma to zaraz sparwdzać
sito Eratostenesa
magisterka Ci sie marzy... , coz moze kiedys pozbedziesz sie tej kropki i zostaniesz wymarzonym mgr, w kazdym badz razie powodzenia