Taki mam pomysl choc w T pascalu dawno juz nie pisalem : Co do poruszania sie to mozesz zrobic case'a i zwiekszac lub zmniejszac numer indeksu tablicy Tab[indeks] wcisniecie klawisza strzalka w gore indeks+1 i ponownie wyswietlac analogicznie dla strzalki w dol Pamietaj zeby zabezpieczyc sie przed wyjsciem poza zakres tablicy :!: Co do przeszukiwania...
Hmm.... No tutaj, to mnie trochę zaskoczyłeś :P Posortowanie całej tablicy będzie dość skomplikowane :P Można co prawda potraktować dwuwymiarową tablicę jako tablice jednowymiarową, ale za taki trick, to Ci nauczyciel "łapki poprzetrąca" :P Zobacz kod poniżej, który sortuje każą kolumnę tablicy osobno: [syntax=delphi]program Project1; uses SysUtils;...
Kiedyś sporo pisałem w Pascalu i z tego co pamiętam nie ma tam możliwości deklarowania tablic o dynamicznie zmieniających się wymiarach. Pojęcie zmiennej/ tablicy dynamicznej w Pascalu istnieje, ale odnosi się do dynamicznego przydzielania/zwalniania pamięci dla zmiennych, realizowane przez parę procedur new i dispose.
Pozdrawiam chemik143. Kiedyś mieszkałem w Cieszynie. A oto program: Uwaga: w linii write('podaj wartosc tablicy [',i,' ',j,']= '); musisz podawać wartości w postaci np 32 12 i enter czyli 32 spacja 12 ENTER uses crt; var tablica:array[1..100,1..100]of integer; i,j,n,k,w,wynik:integer; op:char; begin clrscr; writeln('program wypelnia tablice dwuwymiarowa...
1. jak przykladamy maske to pole X jest niewazne, moze to byc 0 lub 1 2. if(maska[0][0] == obraz[aktualnex-1][aktualney-1] && maska[1][0] == obraz[aktualnex][aktualney-1] && maska[2][0] == obraz[aktualnex+1][aktualney-1]... { obraz[aktualnex][aktualney] = 1; } to jest w C++, w Pascalu trzeba zmienic == na =, && na AND, no i jeszcze chyba tablice sa...
http://turbopascal.skryptoteka.pl/11.htm... http://www.pascal.yoyo.pl/?section=tutor...
Witam. Ma ktoś moze jakieś informacje zwiazane z tablicami Pascala i C++???
eh, masz i nie mecz juz :P PS. oczywiscie da sie w jednej podwojnej petli, ale napisalem lopatologicznie, moze kolega cos postara sie zrozumiec :P program czarna_magia; var i,j :byte; min, max :byte; t :array[1..4,1..4] of byte; suma_kolumn :array[1..4] of integer; srednia :real; begin // inicjalizacja generatora...
d to tablica liczb, a do wyświetlenia potrzebny jest tekst. Błąd polega na niezgodności typów - musisz dokonać konwersji liczby na tekst (inttostr).
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?
Jezeli to jest pascal pod dosa to tablice dla n i x sa za duze. Pod dosem masz dostep normalnie do 64kB danych. PS.Podawaj kod bledu jaki wyrzuca kompilator i w ktorej dokladnie linijce...
http://turbopascal.helion.pl/r-14.htm minuta w Googlach
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....
Niezupełnie, to jest przecież stary dobry nieużywany już Pascal. Tablicą dynamiczną nazywano tablicę utworzoną poprzez New. Jej rozmiar teoretycznie może się zmieniać, ale jeżeli jest użyta stała to zmienia się tylko na etapie kompilacji. Czyli zwykła tablica wskaźnikowa o rozmiarze N elementów (moim zdaniem). W Pascalu Borlanda miało to nawet pewien...
Mam takie zadanie napisac w pascalu ale ja niewiem jak jestem początlującyi niezabardzo jeszcze znam sie w tym weście mi ludzie pomórzcie proszę : 1. Napisz program z elementami typu znakowego dla tablicy jednowymiarowej złożonej z 4 wlementów. 2.Oblicz częstość występowania wybranej litery w tekscie.
Cześć Wszystkim :) Potrzebuje pomocy w zadaniu na studia. Od dłuższego czasu próbuje je rozgryźć, ale za dużo na razie nie napisałem. Za pomocą pól a,b oraz c obliczam delte i x1,x2 dla funkcji kwadratowej. Następnie w pętli dodaje wyniki do tabeli, lecz nie jestem pewny czy robię to prawidłowe. Kolejnym punktem jest narysowanie wykresu z danych pobranych...
Witam, mam do napisania program w Pascalu na strukturach dynamicznych. Potrzebna mi będzie tablica rekordów. Zatem tworzę Tablica : array of Rekord; I tutaj pojawia się problem, gdyż wyszukałem w Internecie, że rozmiar tablicy ustalamy procedurą SetLength(Tablica, n). Tworze bazę, do której w trakcie działania programu dodaję nowe pozycje. Przykład:...
Spróbuj w ten sposób : var druzyna:array[1..8] of string; a,b:byte; tmp_zmienna : string; begin for i:=0 to 255 do begin a:=random(8)+1; b:=random(8)+1; tmp_zmienna:=druzyna[a]; druzyna[a]:=druzyna[b ... druzyna[b]:=tmp_zmienna; end; end;
Witam Mam olbrzymią prośbe dla ludzi, ktorzy mają wieksze pojecie o Turbo Pascalu niż ja - jest ich tu zapewne dużo :D Mam 6 zadanań, właśnie z Pascala przez, ktore nie potrafie przebrnać. Prosze w zwiazku z tym o pomoc kogoś kto zna sie na tym. Oto one: Zad.1 Napisz program w Pascalu, który a) stworzy tablice 10 x 10 liczb b) wypełnij ją losowymi wartościami...
Niestety te dynamiczne tablice na FREE PASCALU nie działają przynajmniej nie u mnie. Po przemyśleniach doszedłem do wniosku ze najprościej będzie jak liczby wyplenią np 20 elementową tablice i teraz mam takie pytanie. Na początku deklaruje 20 elementową tablice potem mam funkcje która daje wartość prawda i fałsz a potem najlepiej by było wartość tej...
Dokładnie tak samo, tylko trzeba podać index do tablicy oceny. [syntax=pascal]readln(dziennik[x].oceny[...
[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...
Co to jest 2i może 2*i?
1. Robisz tablice typu booleanz wszystkimi możliwymi do wylosowania elementami (tb:array[1..N] of boolean) i na początek wpisujesz do niej "false" (for i:=1 to N do tb[i]:=False) Nastepnie losujesz liczbę i sprawdzasz jaka wartość tablicy jej odpowiada: k:=random(N+1); if tb[k] then //losujesz jeszcze raz else .... tb[k]:=True .... // dalej robisz co...
Nie trzeba drugiego wymiaru tablicy. Powpisuj w tablice odpowiedzniki słowne JEDNOŚCI, DZIESIĄTEK, SETEK, TYSIĘCY ...: 'zdefiniowanie tablic zawierających wartości słowne odpowiadające 'elementom wartości varSETKI = Array("", "sto ", "dwieście ", "trzysta ", "czterysta ", _ "pięćset ", "sześćset ", "siedemset ", "osiemset ", "dziewięćset ") varDZIESIATKI...
Witam Powiem tak... Jestem uczniem ZSP na profilu Technik Informatyk. Z programowaniem miałem po raz pierwszy w życiu styczność. Do pewnego momentu mi szło, ale kiedy weszły tablice to całkiem się pogubiłem. A teraz do sedna. Mam zrobić, chyba baza danych się to nazywa, która będzie mi dodawać, wyświetlać, usuwać,filtrować oraz sortować elementy. Do...
Jeśli chodzi o zmienną typu integer to są problemy z jej dzieleniem spróbuj użyć np. zmiennej "double;" , można też rozbić liczbę i wpisać w tablicę .Radzę tak jak mówiłem kupić książkę i uczyć się od podstaw - niestety tablice do dla początkującego trudna rzecz - ale do przejścia tyle że wszystko trzeba sobie w głowie wyobrażać i po prostu pojąć co...
Witam Program pisze od ręki (moga być błędy) program quiz; type pytanie=record pytanie,a,b,c,d:string; prawidlowa:byte; oznaczono:boolean; end; var pytania:array [1..50] of pytanie; wtvrane:array[1..10] of pytanie; i,j,pom:integer; begin {Tutaj uzupełnić tablice z pytaniami} for i:=1 to 50 do pytania[i].oznaczono:=False;...
Ogólnie przyznam się, że jak przeczytałem w Wikipedii artykuł to o ile rozwiązanie iteracyjne wydaje się dla mnie jasne i raczej dałoby radę to zaimplementować na PLC to wklejonego przez Ciebie rozwiązania rekurencyjnego nie mogę zaczaić. Jeśli chodzi o to iteracyjne to ja bym podszedł do tego w taki sposób że: Stworzył 3 tablice od wzorujące poszczególne...
kolega olekewaagata na samym poczatku napisal jak to zrobic. musisz miec tabele, w ktorej bedziesz zapisywal pary liczb, teraz jesli podczas losowania taka para juz jest losujemy jeszcze raz, jak nie ma dodajemy pare pseudokod losuj(a) <--+ losuj(b) | jesli a>b to zamien a i b miejscami | sprawdz_tablice(a,b) | jesli jest...
Ma wartość 0 (sprawdź!) i to jest źródło twoich kłopotów: Tablicę zadeklarowałeś jako: każdego kolejnego pytania: [syntax=pascal] a := a + 1; if (pytanie_no1='b') then tablica[a].pytanie1:='1' else tablica[a].pytanie1:='0' ; [/syntax] 2. W ogóle odpuścić sobie tę zmienną i indeksować tablicę ręcznie: [syntax=pascal] if (pytanie_no1='b') then tablica[1].pytanie1:='1'...
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...
A zatem ja bym to widział tak (rozwiązanie może i wolne, ale czytelne): Tworzysz sobie tablicę dwuwymiarową statyczna (['a'..'z','a'..'z'] of char). Wypełniasz ją w taki sposób, że idąc w każdym wierszu po kolumnach zaczynasz od Chr(Ord('a')+nr_wiersza), jednocześnie sprawdzając przekroczenie zakresu (wartość litery 'z'). Jeśli nastąpi - wracasz do...
zmienilam na: [syntax=fortran]integer, DIMENSION (1:27,1:3) :: bezwsp[/syntax] ale dalej jest nie tak. nie zglasza zadnych bledow, ladnie sie kompiluje, nie wiesza sie ani nie wywala, ale zamiast generowac wariacje (wersja Pascalaowa robi to jak nalezy) wpisuje mi w tablice podane liczby ale zupelnie bez sensu, wywala mi cos takiego: 111 111 111 222...
tJanusz C nielogiczne? Wiesz jeśli wszyscy myślą inaczej niż ja, to zastanawiam się czego nie rozumiem. rTom -co do begin i end w Pascalu, nie trzeba zmieniać przyzwyczajeń z Pascala, preprocesor to strasznie silne narzędzie -poważniejsza sprawa to inne priorytety operatorów -w C nie pisze się i=i+1 ;) tylko i += 1, ta konstrukcja jest ogólniejsza,...
Na drugi rzut to chyba nie chciałem zamykać tej wewnętrznej pętli po dwóch linijkach. Popraw trochę [url=http://www.dzyszla.aplus.pl/porada-... to od razu łatwiej bedzie zauważyć, gdzie się powinny zaczynać i kończyć poszczególne bloki.
Witam mam do napisania grę pacman w pascalu w trybie tekstowym, która ma wczytywać plansze z pliku tekstowego. Plansza ma mieć 50 wersów i 80 kolumn. Postanowiłem ze dobrym rozwiązaniem bedzie wczytanie planszy w tablice 2 wymiarową i od razu na początku pojawiły sie schody bo po wyświetleniu tablicy brakuje w ostatnim wersie paru znaków. Oto kod programu...
Ależ to jest wręcz liniowy program wyłącznie z pętlami. http://www.algorytm.org/kurs-algorytmiki... - na dole strony.
Dżyszla dziękuje Ci ślicznie za podany link. Program działa świetnie lecz jest pisany w Pascalu a ja potrzebuje programik działający w C++ lub Visual Studio.Ale mimo to dzięki. Sevare to nie ma być z czytanie obrazka tylko np mamy na dysku obrazek monochromatyczny i nasza procedura ma wczytać do tablicy piksele tego obrazka....następnie programik ma...
'Jak już dużo poćwiczysz w programowaniu to pojmiesz że wszystko jest takie same i uniwersalne dla kazdego języka: (są pętle,skoki,warunki, wskażniki, tablice itd. itp).' Podobne, ale jednak nie to samo.. Jak juz pisac to w w miare podobnym jezyku. Zaczalem od Basic pozniej Visual Basic, Delphi pozniej dowiedzialem sie heh ze to wlasciwie Pascal bo...
Więc schemat postępowania: 0) Przygotowujemy 4 tablice: - dla tysięcy ('tysiąc', 'dwa tysiące', ... , 'dziewięć tysięcy') - dla setek ('sto', 'dwieście', ... , 'dziewięćset') - dla dziesiątek ('dwadziescia', 'trzydziesci', ... , 'dziewięćdziesiąt') - dla jedności ('jeden', 'dwa', ... , 'osiemnaście', 'dziewiętnaście') UWAGA - tablice dla dziesiątek...
(at)Dżyszla To jest przyklad edukacyjny dla mnie, bez konkretniego zastosowania. Chce zeby chodzilo jak zolt, i chce zeby to sie wyswietlalo. Jak w petli jest polecenie wyswietl to sie ma wyswietlac, tak jak to jest w Pascalu c qbasicu itp. (at)wrych Rozumiem pojecie MHz/GHz i rozumiem to ze kazdy rozkaz zajmuje iles tam cykli zegarowych, wiec smialo...
W każdym poście na temat kompresji/dekompresji mp3 widzę linki do jakichś stronek dla laików. Wiem na czym polega odchudzanie dzwięku przed kompresją Huffmana i wiem na czym polega sama kompresja ale nigdzie nie widzę żadnych konkretów jak to wygląda w mp3. Najbardziej interesuje mnie dekompresja. Może jakieś konkrety? Gdzie w pliku mp3 znajdę drzewo...
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...
Kolega z Łodzi to coś słyszał ale nie do końca pamięta. Nie zaśmiecam sobie pamięci tego typu szrotem. Algorytm na poczekaniu wyczytałem z sufitu. Ponieważ jest "bardzo szybki" może być użyteczny przy wszelkiego rodzaju konwersjach liczba/łańcuch zwłaszcza w układach wyświetlania wielkości fizycznych, gdzie w procesie kalibracji możemy wyliczyć i wpisać...
Jeszcze jedno... Ma ktos jakies przykladowe menu w bascomie? obsluge guziczkow sobie zrobie - nie problem,... problemem bardziej czy to robic na ifach wszystko? Czy sa jakies typowe aplikacje z takimi menusami?moze jakis link znacie? Pozdro Dodano po 1 I jeszcze jedno pytanko mam :D Czy da się coś zapisać (z poziomu uruchomionego układu) do tej megi?...
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...
Tablica dynamiczna rekordów, tak samo jak to się robi z listami w pascalu.
Zdefiniuj ten typ tablicowy potem go używaj. program rekord; uses crt; type Ttab=array[0..2]of char; var plik2:file of ttab; o:ttab; begin clrscr; assign(plik2,'d:\osoby.txt')... rewrite(plik2); write(plik2,o); close(plik2); readln; end.
Ten fragment Twojego kodu assign(imi,'d:\imiona.dat'); rewrite(imi); for a:=1 to 10 do begin writeln('Podaj ',a,'. imie:'); readln(tim[a]); end; write('Imiona: '); for a:=1 to 10 do write(' ',tim[a]); readln; close(imi); pobiera dane (imiona) z klawiatury do...
Ze zmiennymi chyba rzeczywiście tak się nie da (nie mam kompilatora pascala żeby sprawdzić), ale spróbuj zadeklarować tablicę stałych: const tab : array [0..13] of Real = (0.01, ..., 200.0); PS. No tak, w trakcie pisania ktoś już odpowiedział ;) Pozdrawiam, Dr.Vee
Nie jest powiedziane, że w tablicy występują tylko cyfry 0..9, ale nie ma to znaczenia. Przedstawiam krótki kod. Aby nie wpisywać na ekran tablicy 100 elementowej ale pokazać działanie kodu, ograniczyłem wielkość tablicy.[syntax=pascal] uses CRT; const num=15; var t:array[1..num]of integer; p:array[0..9]of integer; i,pp:integer; begin clrscr; writeln;writeln;writeln('zawartosc...
turbo pascalu programowanie pascalu programy pascalu
lodówki bosch opinie skype spowalnia spalić radio alpine
frytkownica beztłuszczowa samsung wf70f5e0w2w
Jak wprowadzić +48 na telefonie Philips D260? Wpływ popękanego kabla antenowego na sygnał DVB-T2
