[pascal] liczby pierwsze

0

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

0

uczyc sie a nie kombinowac :p

0

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;

0

nie chce sie skompilować pisze: Boolem expression expected

0

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...

0

a teraz pisze: "." expected

0

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

0

dzięki nie zauwazyłam, ale program chodzi nie tak bo na początku pokazuje 2 ze na lezy do przedziału

0

dzieki wielkie za pomoc juz sobie z tym poradziłam

0

prosze bardzo, a dwojka przypadkiem nie jest liczbą pierwszą???

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0