tablica pascal liczby pierwsze

[PASCAL] Jak napisać funkcję zwracającą liczby pierwsze w tablicy?

a po co record? wystarczy typ. Ponadto - widzę niezgodność typów tablicy z n i for n:=z to n do - zagrożenie pętlą nieskończoną! uzywasz tej samej zmiennej po obu stronach. nie ja uzywam tylko przerobilem ten program co byl, autor powinien sam popracowac - ja podpowiadam....

Pascal: Wczytywanie trójek liczb o sumie będącej liczbą pierwszą

A czy kolega rozumie w ogóle zadanie? Masz znaleźć takie trójki liczb, których suma... czyli sprawdzamy 1+1+1 = 3 - OK 1+1+2 = 4 - :( 1+1+3 = 5 - OK 1+1+... 1+1+19 = 21 - :( 1+2+1 = 4 - :( czyli masz stworzyć de facto tablicę (jesli już chcesz takową) o szerokości 3 i długości wynikającej z kombinacji liczb, a następnie wyznaczać sumę i sprawdzać, czy...

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

PASCAL - zadanie z tablicami - jak się za nie zabrać?

i ja się dołączam: program tablice; var x,y: byte; //współrzędne kom. w tabeli min, max: integer; //wartości max i min tab: array[1..4,1..4] of integer; //tablica suma: array[1..4] of integer; //tablica sum kolumn suma2: integer; //na potrzeby średniej sr: real; //średnia begin randomize; //dzięki temu losowane...

[Turbo Pascal] Jak w Turbo Pascalu dodać lub odjąć liczby w tablicy dwuwymiarowej?

Witam Proszę o pomoc w zadaniu: Muszę w Pascalu napisać program, w którym na początku program pyta o wielkość tablicy ... liczby:(array[1..x, 1..y] of integer; ... a następnie wprowadzam dane do tablicy. I ostatni krok to liczby te muszę do siebie dodać lub odjąć. koniec zadanie pierwszego. Następne zadanie już sobie poradzę analizując to pierwsze....

Pascal / Delphi - Algorytmy znajdujący takie samy liczby

Zastosuj pętlę w pętli, pierwsza pobiera kolejne wartości z pierwszej tablicy, druga "przelatuje" po tablicy drugiej i porównuje wartość. W pierwszej możesz użyć "for" a w drugiej "while".

Jak napisać program wypełniający tablicę N unikalnymi losowymi liczbami?

Po pierwsze jaki język c++, delphi, pascal, asm co my wróżki!!!! Jak w c++ poszukaj info o funkcji random, rand, randomize

[Pascal] Jak uniknąć duplikatów przy losowaniu drużyn w Pascalu?

Ale jak to sprawdzić? :( Wylosowane liczba jest to nr komórki tablicy. Mam sobie taką tablice: [1][2][3][4][5] 1: nr1 2: nr2 3: nr3 4: nr4 5: nr5 Losuję teraz liczby i przypisuje tą pierwsza tablice przypisuje do wylosowanych liczb [1] - zmieniam na [los1] [2] - na [los2] Tylko jak sprawdzić czy już taka liczba się wylosowała ? :(

[Dev-Pascal] Jak dodać sumę i iloczyn do tablic w Dev-Pascalu?

[syntax=pascal] tablica[25]:=0; for l1 := 1 to 24 do begin write('Podaj liczbe nr ',l1,': '); readln(tablica[l1]); tablica[25]:=tablica[25]+tablica[l1]; end; [/syntax] to dla pierwszego przypadku, z drugim już chyba sam se poradzisz ;] Zwróć uwagę jeszcze na to, że w tablicach masz elementy typu byte, jeżeli podasz 24 liczby większe od 10 to wynik "nie...

Ocena programu w Pascalu: rekordy i losowanie liczb 1-49 bez powtórzeń

Przy takim type (rekordowym) jak masz teraz, to sortowanie będzie olbrzymim problemem. Nie bardzo można posortować części rekordu. Nie bardzo rozumiem czemu ? własnie do kodu dopisałem Teraz kwestia interpretacji tego zadania; czy za "typ rekordowy" uznamy: Nie wiem o co chodziło nauczycielowi :/ profesor na to zionie żywym ogniem jak zobaczy. :p Kiedy...

[Pascal] Dwie tablice, wyszukiwanie minimum i sortowanie "kopiowaniem"

Witam, otóż posiadam dwie tablice liczb całkowitych. Potrzebuję jakieś nakierowanie, gdyż do jednej losuję z pewnego zakresu liczby, znajduję minimum... Teraz potrzebuję te minimum wpisać do drugiej tablicy(wskaźników) tyle razy(bez powtarzania sie wartosci), aby ona była posortowana od najmniejszego do największego. [syntax=delphi]for j:=1 to 10 do...

Turbo pascal - Jak ugryźć początek programu tablica z funkcja randomize?

Dzięki za pierwszą część programu trochę ją przerobiłem bo chodziło mi bardziej o coś takiego [syntax=pascal] program ja; USES CRT; VAR tab:array[1..20] of integer; n,m,i:integer; BEGIN clrscr; randomize; m := 20; n := 59; for i:=1 to 20 do tab[i] := Random(n-m+1)+m; for i:=1 to 20 do writeln(tab[i]); readln; END. [/syntax] a jak teraz wstawić wybieranie...

[Pascal] Liczenie liczb dodatnich i ujemnych oraz analiza macierzy 3x4

Witam, w szkole na zaliczenie mam zadanko z Pascala. Nie byłem na wszystkich zajęciach stąd wiedza jest troche ograniczona (niestety taka praca). Zadanie mam takie : program ma przeczytać 10 liczb, policzyć liczby ujemne i dodatnie, a nastepnie wypisać te których jest więcej. Drugie zadanie (nieobowiązkowe) mam takie: macierz dwuwymiarowa 3x4, program...

[Turbo Pascal] Błąd w kodzie szukającym liczb pierwszych w Turbo Pascalu - jak go znaleźć?

Jeszcze jedno proste spostrzeżenie, longint czyli 2^31, pierwiastek z tego to 46344, potencjalne podzielniki nie będą większe niż ta liczba i co ważne same będą liczbami pierwszymi, jest ich nie wiele, około trzech czterech tysięcy, może warto zebrać taką tablicę (przyśpieszenie kilkukrotne)

[PASCAL] Jak zsumować i posortować liczby z tablicy w programie?

Witam. Potrzebuję programu, a oto jego parametry: - musi zsumować liczby z 5 tablic (pierwsze musi poprosić o wpisanie 5 dowolnych liczb, dopiero potem je zsumuje) - musi "segregować" rosnąco liczby (od najmniejszej do największej) - wynik wygląda następująco: "Suma liczb to: #, a ich kolejność w porządku rosnącym to #" Na razie wymęczyłem tyle: Proszę...

[Pascal] Jak uniknąć powtórzeń pytań w teście w Pascalu?

Opcja pierwsza, najprostsza: do każdego pytania posiadasz flagę czy zostało już wylosowane. Losujesz numer pytania i jeśli zostało ono już wylosowane, to ponawiasz losowanie. Złożoność jest zależna od generatora liczb losowych - w najgorszym przypadku może on zwracać cały czas jedną liczbę. Opcja druga, preferowana: robisz sobie tablicę, w której umieszczasz...

[Pascal] Jak w Pascalu przypisać tablicy unikalne losowe liczby?

ale ja zrzęda jestem, do wszystkiego muszę się przyczepić (szczególnie kiedy na czymś się znam) O!!!! jest pierwszy (w dwu wątkach o tym samym) kawałek kodu który robi to co ma robić, choćiaż ;) to -1 "magiczna liczba" a co jeśli chcemy losować także ujemne liczby? lepiej już BREAK (szkoda że nie zadziała - przy tak napisanych pętelkach dam rozgrzeszenie...

[Pascal] Jak napisać program do przeglądania plików tekstowych?

zrobic tablice stringow i do niej wpisac tekst z pliku na poczatku wyswietlic pierwsze 24 linie zrobic zmienne przechowujace od ktorej linii do ktorej linii wyswietlac, po nacisnieciu np. strzalki w dol zwiekszyc obie zmienne i wyswietlic ponownie tekst, po nacisnieciu strzalki w gore zmniejszyc obie zmienne i wyswietlic ponownie tekst, mozna tez obsluzyc...

Delphi - zawieszanie się programu przy sortowaniu liczb po kliknięciu buttonu

Skleiłeś jakieś 3 fragmenty kodu i w ogóle nie wiesz, co one robią. Skoro wkleiłeś:[syntax=pascal] for i:=0 to 4 do memo1.lines.add(IntToStr(t[i]));[/syntax... to ile liczb ma się wyświetlać, jak nie 5? Jak podajesz w edicie 4, to tylko 4 pierwsze liczby są losowane od 0 do 99 (a nie 100) - czemu piąta miałaby też być wylosowana? Na piątym miejscu w...

[Turbo Pascal] - Jak wyświetlić parzyste i nieparzyste liczby w tablicy?

bez randomize jest ,żebym miał te same liczby dzięki za pomoc z przekątnymi w końcu skumałem zrobiłem z nieparzystymi - luknij program tablice; uses CRT; var T :array niby ok tylko czemu sprawdza mi tylko 3 wiersz a te 2 pierwsze nie ?? jak dam np. for j:=1 to 3 do if (i mod 2)=0 then T to mi sprawdza 2 wiersz i ewent. zamienia na 0 tak jak powinno...

[Pascal] Wyszukiwanie ostatniej liczby w pliku tekstowym?

uses crt,dos; var fSource:file; bufor:array[0..1023] of char; i,o,p:word; read:integer; liczba:longint; cyfr:byte; znal_liczby:array[0..1023] of longint; ind_znal_liczb:integer; procedure SwapLI(var a,b:longint); var tmp:longint; begin tmp := a; a := b; b := tmp; end; begin...

Pascal - Tablice, znajdownie liczby doskonałej, potęgowanie

Nic nie jest na tyle doskonałe, aby nie można było tego ulepszyć ;) Mnie się zdaje, czy tu powinny być dwie pętle - znajdowanie czynnika i porównanie go ze wszystkimi elementami tablicy? Ty porównujesz pierwszy czynnik z pierwszym elementem tablicy, drugi z drugiem itd... Raczej pozbawione sensu...

Algorytm FFT. Dla większej liczby próbek pojawia się błąd.

„ ...mniejsza o to... ” no pięknie. ;-) Zobacz np. 12 rozdział w www.dspguide.com. Albo Próbki umieść w tablicy X w następującej kolejności: 0,2,4,...,n-2,1,3,...n-1 (parzyste w części RE procedure oddsort(ncap:integer; var y:longvector); //w miejscu sortuje ciąg, tab by uzyskać 0,2,4,...,n-2,1,3,...n-1 var tcap, t, j, k:integer;...

Jak obliczyć sumę liczb na przekątnej w tablicy 5x5 w Pascalu?

czyli jesli ponumerowana tablica od 1 do 5 to pole 2,2 ; 2,4 ;4,2;4,4 przekatne juz wyliczone teraz zostalo mi do wybrania minimalnej liczby w nieparzystych wierszach i maksymalnej w parzystych kod to <code> program Project2; {$APPTYPE CONSOLE} uses SysUtils; var tab : array [1..20,1..20] of integer; stosunek,suma1,suma2,i,j,w : integer ; Begin...

pascal - proszę o sprawdzenie programu

program sortowanie; uses crt; var tab:array po pierwsze primo to kod pisz w znacznikach CODE. po drugie primo to strasznie pogmatwany ten twój kod. domyślam się, że chcesz zrobić sortowanie w kolejności rosnącej. Program Sortowanie; uses crt; var T:array[1..20] of integer; //wyswietlanie zawartosci tablicy na ekranie Procedure PokazTab;...

Pascal - Kalkulator Logiczny na bramkach and, nand, nor, or, xor

Witam serdecznie, potrzebuję zrobić program w pascalu, który będzie liczył wartości tylko zero-jedynkowe w dodatku LOGICZNIE. Wiem jak funkcjonują poszczególne bramki etc. Ale nie wiem jak zdefiniować by program np liczył and z dwóch liczb binarnych. Czyli po dodaniu dla przykładu 0001 and 0110 poda wynik. Na tej samej zasadzie nand, nor, or i xor....

Sterowanie windą na PLC w Quick II – jak zaimplementować funkcję IF i licznik pięter

Dzięki za zainteresowanie się tematem andy1955. Właśnie wczoraj się dowiedziałem, że do mojego sterownika można po konwersji wgrywać programy napisane w C++ (lub jakimś C). Dzięki temu wiem o co Ci chodzi. Chcę również powiedzieć, że problem rozwiązałem podobnie do Ciebie, tylko że używając jedynie zasobów sterownika. Nie jest to takie straszne obszerne(przy...

Turbo Pascal - wybieranie liczb podzielnych przez 2 z tablicy

program tablica; uses crt; var t:array[1..10] of integer; i:integer; begin clrscr; writeln ('Wpisz 10 liczb'); for i:=1 to 10 do readln (t[i]); writeln('liczby podzielne przez 2 to '); for i:=1 to 10 do begin if t[i] mod 2 =0 then writeln(t[i]); end; readln; end; tak wygląda...

Jak znaleźć indeks największej wartości w tablicy w C++?

Koleżanka poradziła użycie conio , ale z tego co przeczytałam jest to już trochę przestarzała biblioteka, właśnie nie wiem jaką funkcję użyć , może while , bo chyba for jest złym pomysłem ?? Ale jeżeli while nie wiem wtedy jak napisać funkcje i żeby ona działała poprawnie razem z funkcją max. Najpierw pierwsza funkcja wypełniająca tabele , czyli używam...