prosze o napisanie programu w pascalu

Wszelkie problemy komputerowe, których nie można jednoznacznie sklasyfikować do wybranego działu
Mat410

Użytkownik
Posty: 1
Rejestracja: 05 mar 2013, 15:21

prosze o napisanie programu w pascalu

Post05 mar 2013, 15:22

napisz funkcje wyznaczania liczb pierwszych zgodnie z algorytmem Sita Eratostenesta.
Wejście n małę określa ogórny koniec przedziału zamknietęgo (2,n) w którym poszukujemi libcz pierwszych
dane pomocnicze:
T[]- tablica o liczbach logicznych w których indeksy obejmują przedział zamnięty od 2 do n.
i-kolejne liczby, których wielokrotności usuwamy.
w-wielokrotności liczby i.
krok 1: ustaw wszystkie elementy tablicy T na TRUE
krok 2: za i podsaw 2
krok 3: jeśli i jest wieksze lub równe n to idź do kroku 11
krok 4: w<-- i+1
krok 5: jeśli w>n to idź do kroku 9
krok 6: tablica T[w]- FALSE
krok 7: za w podstaw w+i
krok 8: idź do kroku 5
krok 9: za i podstaw i+1
krok 10: idź do kroku 3
krok 11: za i podstaw 2
krok 12: jeśli i jest większe od n to zakończ.
krok 13: jeśli tablica od i jest równa TRUE to pisz i
krok 14: i+1
krok 15: idź do kroku 12
bardzo prosze o napisaniu go w pascalu nie mogę sobie kompletnie z tym poradzić ;)

Awatar użytkownika
kominekl

Ekspert
Posty: 5855
Rejestracja: 27 lis 2011, 14:25
Kontaktowanie:

prosze o napisanie programu w pascalu

Post06 mar 2013, 12:39

Mat410 pisze:napisz funkcje wyznaczania liczb pierwszych zgodnie z algorytmem Sita Eratostenesta.
Wejście n małę określa ogórny koniec przedziału zamknietęgo (2,n) w którym poszukujemi libcz pierwszych
dane pomocnicze:
T[]- tablica o liczbach logicznych w których indeksy obejmują przedział zamnięty od 2 do n.
i-kolejne liczby, których wielokrotności usuwamy.
w-wielokrotności liczby i.
krok 1: ustaw wszystkie elementy tablicy T na TRUE
krok 2: za i podsaw 2
krok 3: jeśli i jest wieksze lub równe n to idź do kroku 11
krok 4: w<-- i+1
krok 5: jeśli w>n to idź do kroku 9
krok 6: tablica T[w]- FALSE
krok 7: za w podstaw w+i
krok 8: idź do kroku 5
krok 9: za i podstaw i+1
krok 10: idź do kroku 3
krok 11: za i podstaw 2
krok 12: jeśli i jest większe od n to zakończ.
krok 13: jeśli tablica od i jest równa TRUE to pisz i
krok 14: i+1
krok 15: idź do kroku 12
bardzo prosze o napisaniu go w pascalu nie mogę sobie kompletnie z tym poradzić ;)


Sugeruję Ci podanie kodu źródłowego, który posiadasz, a postaramy się pomóc ;) . Skorygujemy coś, jeśli będzie trzeba ;) .
Kiedy komputery staną się twoim jedynym życiem, jedynym totemem odstraszającym klątwę nudy, wtedy prędzej czy później granica między tymi dwoma wymiarami zniknie i postacie z Błękitnej Pustki zaczną pojawiać się w Realu. Czasem są twoimi przyjaciółmi. A czasem nie.



  • Reklama

Wróć do „Problemy”



Kto jest online

Użytkownicy przeglądający to forum: Obecnie na forum nie ma żadnego zarejestrowanego użytkownika i 227 gości