Po pierwsze, to z tego co zrozumiałem, to potrzebujesz kod źródłowy, a nie plik wykonywalny, tak? Bo jeżeli tak, to jest to post w stylu: Napiszcie mi taki program, bo ja sam nie umiem. Pozatym nie wiem czy dobrze zrozumiałem problem... Potrzebujesz program, który uporządkuje zbiór liczb, np rosnąco bądź malejąco? Napisz dokładniej, o co chodzi w tym...
Drodzy koledzy. A po co utrudniacie sobie życie, kupując poszczególne pola, skoro można przepisać cały rekord. Poza tym, sprawdzanie tylko pierwszej litery przy sortowaniu, to "lekka bzdura". Czy powinienem przenieść nazwisko jaką pierwsze w strukturze danych? To nie ma żadnego znaczenia. Skoro odwołujemy się do konkretnego pola w rekordzie, to "miejsce"...
A wiec mam do zrobienia kilka zadan w TP, jestem poczatkujacym w tej dziedzinie dlatego prosiłbym o pomoc w napisaniu takich programów: 1) Wylosować 20 liczb i posortowac je metodą bąbelkową. 2) Na posortowanej wczesniej tablicy zastosowac wyszukiwanie binarne. 3) Napisz program zamieniający miejscami dwa wskazane wiersze tablicy dwuwymiarowej 4) Napisz...
Witam, Poniżej końcówka programu: // sortowanie repeat Pom:=False; for i:=1 to x-1 do if tablica[i+1].nip < Tablica[i].nip then begin Pom:=True; pomocnicza:=tablica[i+1]; tablica[i+1]:=tablica[i]; tablica[i]:=pomocnicza; end; until Pom=False; writeln ('posortowane wedlug nipa '); for i:=1 to x do writeln (tablica[i].nip); readln; end. Pozdrawiam
Witam, nie bardzo nadazam za twoim rozumowaniem: - masz tablice z praypadkowymi wartosciami - znajdujesz minimum w tej tablicy i co ? ->"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." - co chcesz z tym zrobic ? Czy minimum to najmniejsza...
Trzeba by zrobić listę lub tablice ze stringami. Sortowanie może polegać w taki sam sposób jak sortowanie liczb (można porównywać kody ASCII - ich ułożenie rośnie wraz z kolejnymi literami alfabetu). Trzeba by tylko rozważyć sortowanie wg kolejnych liter (pewnie za pomocą rekurencji jakiejś). Zadanie dość typowe na pewno coś znajdziesz Google "sortowanie...
Chciałem napisać program sortujacy lancuchy znakow na dlugosc i alfabetycznie. O ile z sortowaniem na dlugosc nie ma problemu to z alfabetycznym jest. Wszystko ladnie kompiluje, przy odpaleniu dziala normalnie i dopiero gdy porownuje ciagi znakow wywala errora. Kompilator: FPC 2.04 program sortowanie; var lan:array[1..151] of string[201];...
Przerobić ten kod( prawdopodobnie Pascal ) na C++
1. Tablica statyczna - po prostu array 2. Parzyste elementy - reszta z dzielenia (dzielenie modulo = mod ) = 0 3. Algorytm bąbelkowy - znajdziesz opis np w tej paczce: http://www.dzyszla.aplus.pl/download-32.... Nie przejmuj się, że to C. Po prostu przeczytaj punkt 2.3 z pliku sorts1.doc 4. pętla i dodawanie do zmiennej 5. kolejna tablica - P pkt....
Błąd mam w tej części kodu, chyba że macie inny pomysł na to sortowanie. [syntax=pascal] procedure sortuj(n:integer;var r:ksiegarnia); var i,j:integer; procedure zamien_dane(var a,b:ksiegarnia); var c:ksiegarnia; begin c:=a; a:=b; b:=c; end; begin for i:=1 to n-1 do for j:=1 to n-i do if r[j].tytul>r[j+1].tytul then zamien_dane(r[j],r[j+1]) end; [/syntax]
Witam! Mam za zadanie - Przygotować implementację sortowania przez łączenie z użyciem 3 kolejek. Napisałem taki programik i mam cały czas problemy z tym sortowaniem, nie daje rady tego napisać, próbowałem już kilka razy i nic z tego :( Prosiłbym o pomoc, jakieś wskazówki itp. Kod programu wygląda następująco: [syntax=pascal]program sortowanie; uses...
poszukaj na google o sortowaniu babelkowym itp, przeziez implementacja tych algorytmow jest banalna :)
Przy takim type (rekordowym) jak masz teraz, to sortowanie będzie olbrzymim problemem. Nie bardzo można posortować części rekordu. Teraz kwestia interpretacji tego zadania; czy za "typ rekordowy" uznamy: [syntax=pascal]type losowanie = record wyniki : array[1..6] of byte end; [/syntax] czy też nie. Jeżeli uznamy, ze to jest to o co chodziło nauczycielowi,...
Możesz przekazać funkcję porównującą do procedury sortującej przez parametr. To powinno częściowo rozwiązać twój problem, a nie są to jakieś nieudokumentowane cuda. Warumek: nagłówki przekazywanych procedur muszą być zadeklarowane i identyczne (zgodne z deklaracją). Robiłem to już w starszych wersjach Pascala (sortowanie jedną procedurą liczb i napisów),...
Można było też po prostu wyświetlić te już posortowane liczby, ale wkolejności od N do 1 [syntax=pascal] .......... {Koniec sortowania} for i := 1 to N do writeln (d[i] ); writeln; writeln(' liczby sortowane rosnaco: '); for i := N downto 1 do writeln (d[i] ); readln; end. [/syntax]
www.google.pl wpisz np algorytmy sortowania i dostaniesz odpowiedz na swoje pytanie
Problem polega na tym iż nie mam pomysłu jak zrobić to na tablicy dwuwymiarowej A co ma się znajdować w tym "drugim" wymiarze? I w jaki sposób te dane mają być posortowane?
Już wiem jaki miałem błąd - zjadłem jedno end; Dziękuję ;). Teraz tylko sortowanie. Na razie mi nie idzie, ale próbuję ;)
Prosta implementacja Bubble Sort dla twoich danych : procedure sortuj_wg_tytulu; var i,j : integer; f1,f2 : film; p : file of film; begin {procedura sortowania rekordow z zapisem kolejnosci do pliku} {bardzo prosta, ale bardzo wolna } assign(p,'filmy.dat'); {otwieramy plik} reset(p); {reset...
http://free.of.pl/t/tpdoodek/zrodla.htm Tam powinieneś znaleźć wszystko. Z ciekawości ściągnąłem sortowanie i jest wszystko ładnie opisane. Powodzenia
Zmodyfikowałem odrobinkę twój kod. Od teraz, proszę zamieszczać ten kod (jeżeli będzie taka potrzeba) w wersji spakowanej, bo jest on dość długi co poważnie utrudnia przeglądanie wątku. 1. Pozmieniałem "odrobinkę" nazwy zmiennych. 2. Dodałem definicję rekordu dla klienta wypożyczalni. 3. Usunąłem zbędne tablice, zmienne globalne itd. 4. Dodałem funkcję...
Witajcie, miałem do napisania program, który miał odczytać liczby z pliku dane.dat, następnie wybrać z nich tylko liczby pierwsze i zapisać wynik do pliku wynik1.txt, a na sam koniec posortować liczby pierwsze od największej do najmniejszej a wynik zapisać do pliku wynik2.txt. Kodzik mam, i działa on do momentu wybierania liczb pierwszych, niestety...
Właśnie histogram występowania liczb (czyli count sort) jest jednym z najszybszych algorytmow sortowania w niektórych zastosowaniach. Nawet qsort wysiada.
Faktem jest, że SCL jest językiem "wysokiego" poziomu przypominającym trochę Pascal i można w nim programować (a nawet trzeba 'skomplikowane' algorytmy numeryczne np. sortowanie ) ale pewnych rzeczy nie da się w nim zrobić, albo jest to niecelowe. No i wtedy przesiadamy sie na stary i wszystko mogący zrobić z PLC podobny do asemblera język STL.
A sortowanie najprościej to chyba z tablicy klepnąć ( i szybkie sprawdzenie czy już podana liczba była wprowadzona). Klepałem coś takiego na zaliczeniach z turbo... tablica[np 100 elementow] zapisana zerami-> <<PETLA>> wprowadz liczbe X -> jeżeli tablica [x]=1 wróć -> tablica[x]=1 <<KONIEC PETLI>> potem wyświetlenie...
Niestety nie mam czasu pisać gotowych algorytmów dla ciebie :( wielkosc - max ilosc ludzi wpisanych tu masz przykład sortowania bąbelkowego najprostrzego dla jednej tablicy musisz dodać pytanie wg czego chcesz sortować i wtedy zamiast tablica dajesz naprzykład Nazwisko i sortują nazwiska musisz odrazu sortować resztę czyli przestawić wartości w innych...
1. W tablice przed sortowaniem masz nie 10 rekordów zaś n rekordów 2. Nie umiesz "ze względu na wiek" a ze względu na co umiesz?
Witam. Proponuje odwiedzic strone: http://omklnx.il.pw.edu.pl/~rgajewski/pa... Pozdrawiam. Dodano po 20 (sorki, ale tagi mi sie troche pokopaly :))
Piszę program, który docelowo ma pokazywać sortowanie bąbelkowe, oto mój bardzo skromy szkielet programu: [syntax=pascal]uses graph,crt; const n=20; var ster,tryb,i,j,p,x,k: integer; d: array[1..n] of integer; begin ster:=VGA; tryb:=VGAHi; InitGraph(ster,tryb, 'C:\TP\BGI'); randomize; setcolor(white); for i:=1 to n do d[i]:= random(100); outtextxy(1,1,'przed...
Witam , mam problem ze sortowaniem . Program działał poprawnie dopóki nie dołączyłem sortowania . Program niby się uruchamia ale po naciśnięciu buttonu chwilkę łapie zawiasa i wywala jakieś dane od procesora . Nie wiem co jest grane . Dodam że samo sortowanie znalazłem w internecie i je tutaj chciałem wykorzystać . [syntax=pascal] unit sortowanie1;...
A przed sortowaniem ci się nie powtarzają :) ?? Musisz zastosować troszkę lepszą procedurę losowania liczb wypelniających tablicę, jeżeli ograniczysz się tylko do zakresu 0-21 to dosyć prawdopodobne jest że będą sie powtarzać...
Nie znam się na PLC ale z tego co sie domyślam jest tam jakiś uproszczony język programowania na zasadzie składania klocków, więc masz do dyspozycji tylko te klocki co są w pudełku i możesz tylko mieć nadzieję że są to dobre klocki i nadają sie do tego do czego chcesz ich użyć. Języki programowania PLC to temat rzeka. Norma IEC 61131 wyróżnia generalnie...
mam książkę "Software Tools in Pascal" by Brian W. Kernighan (był chyba jeszcze jakiś współautor) kupiłem w antykwariacie już bez dyskietki, skaner mi zdechł, ale kiedyś widziałem gdzieś w sieci komplet źródeł z tej książki, mam polskie wydanie "Narzędzia programistyczne w języku pascal" oczywiście w księgarniach jest "The art of computer programming"...
Witam ! Mam program w pascalu : program noclegi; uses crt; type THotel = record nazwa : string; pokoi : integer; miejscowosc : string; klasa : 1..5; end; const HOTELI = 20; var Hotele : array[1..HOTELI] of THotel; Baza : text; i : integer; begin ClrScr; Assign(Baza, 'HOTELE.TXT'); Reset(Baza); for...
Pierwsze z brzegu zapytanie do [url=wiki]http://pl.wikipedia.org/wiki/S... [syntax=pascal] procedure bubbleSort( A : lista elementów do posortowania ) n = liczba_elementów(A) do for (i = 0; i < n-1; i++) do: if A[i] > A[i+1] then swap(A[i], A[i+1]) end if end for n = n-1 while n > 1 end procedure [/syntax]
[PASCAL] Witam od razu na wstępie chciałbym przeprosić gdyż nie jestem pewien czy dobrze wstawiłem posta. W ramach dosalania piszę sobie w Pascalu bazę danych. Napisałem już dodawanie wpisów i w nich wierszy i stron zapis zapis ustawień języka i opcji i zatrzymałem się na czymś co uważałem za najprostsze a co na razie okazało się moja zmorą. O tuż chciałem...
Ponadto w mojej propozycji jest mniej porównań. W takim razie proszę napisz nam sortowanie bąbelkowe w pascalu na takim przykładzie co ja dałem i policzymy ile u ciebie będzie porównań. Bo przestaw(a sama zamiana tytułów (wg kol. lanky) zrobi ci tylko zamieszanie w bazie Rozumiem ,że powinienem od razu całego gotowca tu wstawić ?
A po co tak kombinować ? Nie lepiej wczytywać po kolei zmienne i wtedy porównywać ? [syntax=pascal]writeln('Podaj kolejny element: '); readln(x[i]); if (x[i] > max ) max:= x[i]; if (x[i] < min ) min:= x[i];[/syntax] Warto pamiętać, aby na początku max i min miały wartość pierwszego elementu wczytanego do tablicy. A po co grupowanie na jakieś 2...
Witam i proszę o pomoc w rozwiązaniu tych zadań. Mam dokonać analizy problemu, narysować schemat blokowy zastosowanego algorytmu a następnie napisać program w języku Pascal, który: *Będzie obliczał wartość wielomianu stopnia n (n nie większe niż 5) o współczynnikach podanych przez użytkownika dla podanego x a następnie rysował wykres tego wielomianu...
Eh, no widzicie. Dalej nie mogę się odzwyczaić od Pascala :) Poprawię błędy w weekendzie i jak coś jeszcze będzie trzeba to dam znać :)
Dodano po 9 No zgadzam się, chociaż te 14 linii brzmi jak wyzwanie :D Aż prosi się wsadzić po kilka instrukcji do jednej linii, ale bez sensu. Wracając do wydajności kodu, pewnie na tym poziomie jest to nieistotne. Jednak biorąc pod uwagę to, że program może być jakoś modyfikowany to nie byłbym zwolennikiem porównań (które są kosztowne) dla znacznie...
.identyfikator2); read(oceny,ucz Proszę pamiętać o używaniu znaczników . Opcja Listing kodu . Ostatni raz zwracam uwagę, kolejny post wyląduje w koszu. - arnoldziq
Proszę pamiętać o używaniu znaczników code . - arnoldziq
Powiedz mi... Czy w jakimś kursie jest napisane jak usuwać, filtrować i sortować elementy w tablicach ? Raczej wątpię. Sortowanie to może coś by się znalazło. I tak nawiasem tu nie chodzi o wiek. Po prostu ja się zabiję jeżeli nie będę miał tego programu do piątku. Za brak czekają mnie dwie 1, a to się równa NDST na półrocze i to tylko z tego jednego...
Tą pracę robię na zaliczenie, a co do tematu pracy to nie wiem o co chodzi gdyż nie przerabiałem na zajęciach o tablicach i w tym jest problem.I nie wiem od czego zacząć? Mam programik w C++ w końcu coś jest i algorytm,tylko jest problem:kod się kompiluje dobrze, program uruchamia się i czarne oko system zgłasza błąd. To jest kod źródówy: #include <cstdlib>...
Jak zacząć? :) Sciagnij kompilator i napisz prosty hello world :P A potem poznaj jak działa if, pętla for, naucz się korzystać ze zmiennych, z tablic... z miesiąc albo dwa poćwicz takie elementarne rzeczy, a potem poprobuj sobie jakieś algorytmy implementować np. sortowania...następny miesiąc ćwieczenia :) A potem już możesz sie zabrać za nauke zaawansowanych...
Mam napisać "prosty" programik jako pracę zaliczniową (1 z 3). Problem polega na tym, że niwząb nie pamiętam już Pascala. Może ktoś pisał kiedyś coś podobnego i mógły sie podzielić... Treści: 1) Napisz program realizujący następujące zadania: -Zdefiniuj rekord, na który składają się dane o samochodach: marka, kolor, rok produkcji, uwagi - Wczytuje dane...
arnoldziq. Ten minutnik ma liczyć minuty i sekundy. Alarm nie może włączać się na określoną godzinę. Minutnik mogę ustawić i cofnąć kodem. To jeszcze nie wszystko. Tam jeszcze trzeba dołożyć kilka rzeczy. Ale to na później. Wszystko musi działać jako tekst. Ten minutnik jest wyświetlany tekstem oraz ten kod sterujący. Czyli prościej tłumacząc, można...
„ ...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;...
Hej potrzebuję pomocy z bazą danych w Pascalu. Potrzebuję aby program szukał osób po nazwisku i wieku i je wyświetlał(w osobnych procedurach), miał możliwość modyfikowania dane osoby, wypisywanie wybranego elementu i sortowanie względem wieku. Z góry dzięki za pomoc. [syntax=pascal]program baza_danych_osob; const MaxOsob = 100; Plik_Bazy_Danych = 'osoby.txt';...
wielkie dzięki ;) tylko mam problem z tym sortowaniem bo myślę że napisałem wszystko dobrze jednakże nie sortuje ... mógł by ktoś pomóc ?? i mam pytanie czy jest jakaś procedura/funkcja do zatrzymywania wyświetlanego tekstu ??(chodzi o to żeby np. wyświetliło 1 osobę po kliknięciu następną itd. a nie od razu wszystkie i widać tylko ostatnie) Dodano...
Witaj. Jeśli jest to możliwe to może podasz jakiś przykład. Nie mam pojęcia jak to deklarować w VB.6 cos takiego robiłem w Pascalu. Tu nie mam pojęcia jak zacząć. Może dasz jakiś przykład, jakiekolwiek sortowanie. Dzieki i pozdrawiam.
Witam, mam problem: napisałem program w turbo pascalu. Tworzy katalog plyt dvd. Problem jest taki, że nie działa i nie wiem, co może być nie tak(pewnie jest problem z ostatnimi linikami: menu). Proszę o pomoc. To mój program: Program Katalog_Plyt; uses Crt; type string30=string[30]; string25=string[25]; Plyta=record Tytul:string[30]; Rezyser:string[25];...
Z ciekawości są jakieś funkcje sortujące w Delphi ? Bo np w C quick sort działa dobrze ale trzeba mu wzorową funkcję za wzorzec
W pętli repeat na końcu dopisz wyrzucenie danych z tablicy na ekran typu printf / writeln czy jak to się robi w języku w którym piszesz. czyli: repeat ...(jeden krok sortowania babelkowego) writeln(wypisz tutaj dane z tablicy) until ... Jeżeli ma to być robione wolno krok po kroku, to dodatkowo w repeat dodaj jeszcze jakąś przerwę funkcja sleep/delay...
Poprawiony program: program quiz; type pytanie=record pytanie,a,b,c,d:string[150]; prawidlowa:string[15]; oznaczono:boolean; end; var pytania:array[1..50] of pytanie; wybrane:array[1..10] of pytanie; i,j,pom,prawidlowo:integer; wybrano:string; begin pytania[1].pytanie:='Polecen...
O wcięciach to kolega pewnie nie słyszał, przez co kod jest zupełnie nie czytelny. Szymon naprowadził jak trzeba a Ty zamiast wędki dałeś rybę. Jaki efekt z tego - osoba która pisała post niczego się nie nauczy a zadanie nie było specjalnie skomplikowane.
a czy moglby ktos zamiescic lub wyslac mi krzysiek400(at)op.pl taki program do sortowania. na stronie praktycznego elektronika jest ale z tego co widze to w wersji niskompilowanej a ja nie mam kompilatora pascala
tak :] http://www.google.pl/search?hl=pl&q=algo... a na pierwszej pozycji jest http://mpuszek.republika.pl/sortowanie.h... i nawet przyklady w pascalu :] pozdrawiam
Dzięki dr bones, Ale przyznasz, że jest to poważne pominięcie funkcji z Basica, Pascala, czy C. VBA powinien sobie radzić bezpośrednio z takim problemem. Punkt 2. Zapisać wynik tego makra w podanej komórce. Np.: W komórce X jest łańcuch: warszawa. Po sortowaniu otrzymam: aaarswwz lub zwwsraaa i chcę to zapisać do komórki Y, nie koniecznie w okolicy...
Ja myślałem to mniej więcej tak: Główny program z menu całym , dodawanie, kasowanie, sortowanie itd 1 plik- sprzedaż- przechowuje jak pisałels; ID towaru, ilosc jego id-dostawy itd 2 plik - kupno -inwentaryzacje produktów, ilsoc aktualnie składowana itd. Teraz, wybieram opcje sprzedazy towaru np 2 książki, po akceptacji ilosc w pliku kupno sie zmniejsza?...
Jesli nie bylo napisane, ze ma nie byc powtorzen to nie ma co przkombinowywac na sile i doszukiwac sie tego czego nie ma. Zawsze mozna powiedziec, iz robilo sie zgodnie z instrukcja. Jesli autor nie pisal o tym, iz liczby nie maja sie powtarzac, to byc moze chcial utrudnic samo sortowanie, bo wtedy trzeba rozpatrywac rowniez przypadek taki kiedy liczby...
Witam wszystkich. Mam mały problem z napisaniem programu w Turbo Pascalu, program ma zawierać tablicę jednowymiarową do 1000, użytkownik decyduje czy chce wprowadzić następną liczbę czy też skończyć wprowadzanie, na końcu program bąbelkowo sortuje te liczby. Udało mi się napisać program który ma wszystko poza sortowaniem liczb. Szukałem w internecie...
Trochę dziwne, to 32 wydaje się nie być konfliktowe... Ludzie co wy tak do tego 32 pijecie? ;) Dali tam punkt za każdą odpowiedź, bo na tej samej stronie zamieścili błędny kod programu w C++ (zad. 29), w którym jako przypisania użyli znaku ":=" zamiast "=". Ja się tym zasugerowałem, bo dokładnie nie pamiętałem przypisania i zaznaczyłem ten znak, którego...
rozwiazanie problemu jest troche inne (zeszlo mi troche ale w koncu zalapalem o co chodzi) aczkolwiek jest w nim uwzglednione to co napisales. n to dlugos tablicy, rzeczywiscie porownan jest n-1 ale petla for zaczyna sie od 2 wiec jest juz uwzglednione n-1 porownan. petle zazwyczaj koncza sie gdy spelnione sa ich warunki a sprawdzenie tych warunkow...
Moim zdaniem naukę programowania dobrze zacząć od C# lub Javy. J Taaaak. Najlepiej jeszcze przy pomocy edytora który 90 % uzupełnia sam :). Wot prosta droga do programu który działa tak jak opisałeś. trochę wymądrzania : Dom musi mieć solidne fundamenty. Tak więc najpierw podstawy. Co do tematu. Na dzień dobry należy i wypada przejść przez proste zmienne...
Już dawno nie bawiłem się w Delphi ale jak dobrze pamietam używa sie tam Pascala. 1. Więc jeśli się nie myle pliki powinno otwierać cię tak jak w Pascalu. var pliki:array[1..16] of string; i:integer; p:text; liczba:integer; begin {tu sie powinno znaleść wypełnienie tablicy ścierzkami dostępu} for i:=1 to 16 do begin...
Zasady pisania postów : Jakie posty nie będą akceptowane w tym dziale : • Tematy nie dotyczące pisania programów. • Jeżeli to możliwe, proszę, w tytule postu umieszczać nazwę języka programowania, którego post dotyczy; JAVA,Pascal,C++ itd. • Wszystkie kody źródłowe, zamieszczone w postach, muszą znajdować się w znacznikach syntax...
Najczęściej zadawane pytania : Jaki język programowania wybrać? Wszystkich, których interesuje to pytanie, kieruję do wyszukiwarki forum, lub do dokładnego przejrzenia tego wątku : - Jaki język programowania wybrać ? Obsługa Portu LPT : - LPT FAQ - VisualBasic6 i INNE RS232 pod Linux : - Serial-Programming-HOWTO.pdf Visual Basic : - 0-255 ASCII Przez...
sortować pascal dekoder sortować sortować komórka
katalizator wydech z18xe wymiana silnika drżeć silnik
apple watch wyłączniki dotykowe
Opel Vectra C DIRECT - Dopuszczalne zużycie oleju Jak podłączyć magnetowid Panasonic NV-HD635 do telewizora?