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. 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....
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.
Co to jest 2i może 2*i?
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;...
http://turbopascal.helion.pl/r-14.htm minuta w Googlach
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;
[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...
Dokładnie tak samo, tylko trzeba podać index do tablicy oceny. [syntax=pascal]readln(dziennik[x].oceny[...
Rozmawiamy teraz o Turbo Pascalu czy o Delphi/Free Pascal/Lazarus? Pascal (Turbo Pascal/Borland Pascal) nie ma możliwości deklarowania tablic bez podania rozmiaru (tablic dynamicznych). Natomiast Delphi, jak najbardziej. [syntax=delphi]program Project1; {$APPTYPE CONSOLE} uses SysUtils; type rekord = record dana1 : integer; dana2 : real; end; var tablica...
Tablica dynamiczna rekordów, tak samo jak to się robi z listami w pascalu.
Proszę wszystkich o pomoc nie wiem jak napisać program na tablicach aby wypisywał nazwy od najkrótszej do najdłuższej ?? czy ktos moze mi go napisać z góry dziękuje ...
Witam Mam rozwiązanie twojego problemu ale w osobnych plikach. Jest tam dodawanie, odejmowanie, mnożenie i dzilenie we wszystkich kodach (NKB, U1, U2, BDC). Musisz przejrzeć te programy i wybrać odpowiednie procedury.
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
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.
Spróbuj w ten sposób: [syntax=pascal]program zliczanie; const NUM = 100; {Rozmiar tablicy z liczbami} var tablica: array[1..NUM] of integer; {Tablica z liczbami} licz: array[0..9] of integer; {Tablica licznikow} i, n: integer; begin randomize; for n:=1 to NUM do begin tablica[n]:=random(10); end; for i:=0 to 9 do licz[i] := 0; {Zerowanie licznikow}...
Nie znam składni pascalowej, więc napiszę w pseudokodzie: a = 10000011; b = 10000000; for (i=0;i<8;i++) { if ((a and b) == 0) then tablica[i] = false; else tablica[i] = true; przesuń "b" bitowo w prawo; }
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...
Napisałem takie coś: [syntax=pascal]program losowanie; uses crt; const N=5; var tablica:array[1..5]of integer; minimum,i:integer; begin clrscr; randomize; writeln('Wylosowane liczby to:'); for i:=1 to N do begin tablica[i] := random(100); write(tablica[i]:4); end; writeln; writeln; minimum:=tablica[1]; For i:=1 to N do begin if tablica[i] < minimum...
Witam. Jak to zapisać w Pascalu? (przykład z C) int tablicaInt[5]={1,2,3,4,5}; Chodzi mi o nadanie wartości początkowej.
Wstaw do programu taką pętlę: write('W wylosowanych liczbach ',x,' znajduje sie na miejscu: '); for i:=1 to 10 do if liczby[i]=x then write(i,' ');
program osi; var t:array[1..10] of integer; n:array[3..100000] of longint; x:array[-100000000..100000000 ... of integer; begin end. co tu jest nie tak ?
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'...
Ad. 1. Po prostu Write(g) (możesz też w jednej procedurze podawać kilka parametrów oddzielonych przecinkami i mogą to być zarówno teksty jak i liczby w postaci stałych lub zmiennych. Ad 2. Każde odwołanie do tablicy zapisuje się poprzez nawias kwadratowy ( tablica ), gdzie tablica to zmienna typu array, a numer to wartość z zakresu indeksu (nie koniecznie...
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...
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...
Witam. Ma ktoś moze jakieś informacje zwiazane z tablicami Pascala i C++???
Witam otóż mam problem z napisaniem programu w pascalu jego treść brzmi: Napisz program, który pobiera od użytkownika określoną przez niego liczbę rekordów danych osobowych (typu rekordowego) i umieszcza w pamięci (typ tablicowy). Następnie dane te powinny zostać posortowane wg jakiegoś klucza (np. wiek) i wyświetlić z tablicy całą, już posortowaną,...
...obslugujacej proste operacje (*, /, +, -) na duzych liczbach przechowywanych w tablicy znakow? Kiedys taka widzialem ale nie moge odszukac, najlepiej gdyby byla w c/c++ lub pascalu. W javie jest typ BigInteger i za pomocą niego można prosto robić operacje na dużych liczbach stałoprzecinkowych. A co do c++ to może sprawdź tutaj: http://www.koders.com/cpp/fid6BFB93B68C0...
Dzięki Integers ale mam jeszcze jedno pytanie czy dało by sie żeby wypisywal tylko dla 1 kolumny ? a nie dla wszystkich jakie zrobilem ?
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...
napisalem program ktory rozwiazuje problem dla tablic do 8 x 8 a jak zrobic dla tablic wiekszych w gre wchodza wielokrotnosci 5 tzn chcialem rozbic np tablice 15 x 15 na 9 tablic po 5 x5 bo 5x5 liczy szybko tyle ze w tablicy 5x5 miejsca startowe skoczka nie moga byc w na bialych polach bo wtedy algorytm sie nie wykona http://obrazki.elektroda.pl/8157295000_1...
randseed=X; for I=low(tablica) to high(tablica) do taclica[I]=Random(zakres);
writeln('podaj liczbe', j); {wyswietli podaj liczbe _numer_} readln(tablica Dodano po 20 Mam nadzieje, ze teraz i kolega tzok i kolega mckmi beda zadowoleni. Oto kod: uses crt; type tab=array[1..10] of real; var tablica:tab; i:byte; procedure wczytaj(j:byte; var t_:tab); begin write('podaj liczbe rzeczywista numer...
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
Nie rozumiem w ogóle juz tego... Dalej to nie działa cały kod [syntax=pascal] type urodz=record dzien:integer; miesiac:integer; rok:integer; end; type Dane=record imie:string[50]; nazwisko:string[50]; id:integer; data_ur:urodz; kierunek: string[60]; adres:string[100]; ocena:array[1..10] of byte; end; var plik:file of dane; student: array [1..100] of...
Potrzebuję napisać sobie takiego programa, który zamieniłąby wyrażenia wpisane z klawki na odwrotną notację polską, mają tam być same stałe, bez x'ów i innych (np, 2,4). Ma być to roboione na tablicach, a nie na listach. Potrzebuję tego programa do piątku, a ja się na pascalu nie znam. Dokładniej to potrzebuje tego kolega do szkoły. Ja tam nawet nie...
schemat blokowy juz mam , brakuje mi poprawenej tablicy wartosciowej
Jeśli dzielniki mają trafiać do tablicy, to trzeba przygotować tablicę (możesz dla prostoty założyć np. tablicę na 1000 elementów, czyli tablica: array ) i prostą zmienną, która będzie licznikiem. Teraz zamiast wyswietlania pod warunkiem dzielenia (x mod i = 0) wystarczy przypisanie: tablica . Pamiętaj, aby na początku zainicjować zmienną ti wartością...
W Pascalu funkcja Random(x) losuje liczby całkowite z przedziału Zepsułeś całą niespodziankę :)
Wektor = tablica jednowymiarowa zmienny wymiar = tablica dynamiczna
Rekord powiniej być tablicą sześciu liczb całkowitych, wtedy posortujesz normalnie jak tablicę. Losowań masz wykonać 1000 a nie 49 jak to robisz. Losowanie bez powtórzeń możesz ułatwić sobie nieco korzystając z tablicy haszującej - poczytaj sobie o tym wynalazku. :)
Ależ to jest wręcz liniowy program wyłącznie z pętlami. http://www.algorytm.org/kurs-algorytmiki... - na dole strony.
czemu w funkcji suman nie inicjujesz wartosci zmiennej sn? nie pamietam jak to wygladalo w Pascalu, ale podejrzewam, ze na poczatku w niej znajduja sie jakies smieci do ktorych dodajesz komorki tablicy i dlatego wynik masz nieprawidlowy nie wspominajac, ze fukcje maxi i suman powinny zwracac jakas wartosc
W przypadku Borland Pascala można użyć tablicy Port [$100]. W Open Pascalu jest to bardziej złożony problem.
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...
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.
Treść zadania brzmiała: Szukanie minimum 1. Nalezy stworzyc tablice o 10 losowych elementach i wyswietlic ja na ekranie 2. Nalezy wyswietlic zawartosc tablicy 3. Nalezy znalezc najmiejsza liczbe i ja wyswietlic ja ma coś takiego: program minimum; uses crt; const N = 10; var t: array[1..N] of integer; var tmp: integer; var i, j: byte;...
k jest tablicą, nie możesz sobie ot tak pomnożyć całej tablicy przez coś, musisz mnożyć każdą skłądową, ogólnie w wielu miejscach masz operacje na tablicy dziwnie zrobione :P
Witam. Właśnie mam egzamin i mam napisać program który będzie wyznaczał sumę liczb od 1 do 100 w Pascalu, bardzo proszę o szybką pomoc:)
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...
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...
no ok a podpowiesz gdzie wstawić ten fragment kodu (teraz moje zadanie zdecydowałam się rozwiązać przy pomocy tablicy jednowymiarowej)
No za link to wielkie dzięki, ale tu właśnie chodzi o to żeby tego nie robic tzn. nie przeglądac wykładów choć to by pewnie mi na duzy plus wyszło, ale mi chodzi o te tablice w nich są zawarte wszystkie operatory, typy, znaki ASCII itp. rzeczy potrzebne do kodowania w pascalu. W tych tablicach informatycznych z Heliona są zawarte wszystkie rzeczy w...
W zasadzie w PHP to nie ma stricte pojęcia tablic wielowymiarowych, jak np w Pascalu, lecz tablicy tablic - jak w C. Stąd takie podejście, że tworzy się tablicę, w tablicy, czyli dla 2x2 będzie tak:[syntax=php]$tablica = array(array(1,2),array(3,4));[/syntax]Mi... trochę przesadził z kodem chyba - nie wiem, czy przypadkiem taki zapis, jakiego użył,...
Pytanie czy ten "kernel" ma dzialac w trybie rzeczywistym czy chronionym ? Jesli w chronionym to bedzie to wymagalo od ciebie poustawiania wszystkich struktur od obslugi pamieci (tablice stron,segmenty) i odpowiednie zainicjalizowanie procesora. Programy skompilowane w Pascalu sa skompilowane tak aby dzialac w trybie chronionym pod opieka systemu operacyjnego,...
Mam napisać program turbo pascalu w którym użytkownicy podają nazwe 2 produktów; jak zrobić żeby nazwy te wyświetlały się pod wykresem(należy do tego użyć tablic)?
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...
W Pascalowym helpie jest gotowy Quick Sort. Oczywiście myślę tu o Turbo Pascalu z Borlanda.
Witam, Potrzebuje pomocy w Pascalu. A mianowicie za dużo doczynienia z Tym programem nigdy nie miałem, a wiec potrzebuje najprostszy program w Statki. Tablica dwuwymiarowa 10x10 mam mieć 5 pojedynczych statków i 10 strzałów. Bardzo proszę o pomoc. :)
C# posiada sporo metod przydatnych przy sortowaniu. Na upartego możesz też zrobić w pętli for porównywanie elementów z maxem tak: [syntax=csharp]max = t [0]; // Pierwszy element tablicy for (int i = 0; i < t.Length; i++) { if (t[i] > max) max = t[i]; } Console.WriteLine("MAX: " + max); [/syntax] Ale tak to się robiło np. w Pascalu tu możesz bezpośrednio...
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...
Witam Mam problem z programem w pascalu chodzi dokładnie o zapis do tablicy. Program ma obliczać odsetki w systemie rocznym i po każdym roku zapisywać odsetki do tablicy. Poniżej zamieszczam program, gdyby ktoś mógł pomóc był bum wdzięczny. program procent; uses crt; var rocz: array[1..4] of integer; a,b,c,d,e:integer; f:integer; begin clrscr; writeln('podaj...
w C to ma być czy w Turbo Pascalu? ...musisz użyć struktur **tablica :P napisz w jakim języku to ma byc to może zrobie to.
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...
Zastanawiam się, w jaki sposób program może Ci cokolwiek wyświetlać, skoro nie można go skompilować? Zauważ, że deklarujesz typ kostka jako tablicę sześcioelementową o indeksach od 1 do 6, która może zawierać tylko liczby 1, 2, 3, 4, 5, 6. W kodzie w dwóch miejscach próbujesz podstawić do tej tablicy wartości 7 i 11 [syntax=pascal]4: t2[2]:=7; 8: t2[3]:=11[/syntax]...
ale ty przypadkiem nie zrobiłeś tego za pomocą tablic?
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...
Witam, wie może ktoś z was czy jest w pascalu jakaś funkcja lub procedura zawarta w standardowych modułach do zmiany znaków z klawiatury na kod ASCII, lub zmiany liczb dziesiętnych na liczby binarne i czy można zdeklarować tablicę którą program by rozpoznawał jako tablicę liczb binarnych ?
Tablica jednowymiarowa? Użyj random() aby losował pozycje liczb z tej tablicy.
a gdzie zaczyna się wczytywanie pliku do tablicy?
Jeśli mogę coś podpowiedzieć to operacje na tablicach na pewno prościej przeprowadzić w C lub C++ niż w Pascalu. proszę zacząć od deklaracji tablic jedno lub dwuwymiarowych w zależności od zadania. W jednym zadaniu sprawa jest uproszczona bo na samym etapie deklaracji możemy wpisać wartości do tablicy i zadeklarować jej rozmiar. No ale na początek proszę...
Jest tablica port czy ports, do ktorej mozesz pisac jak i z niej czytac. np port[$80] := 10; A jesli nie odpowiada CI taka opcja, to uzyj wstawe asemblerowych i instrukcji out i in.
czemu w rekordzie masz tablice stringów ?
jak mam porownac te liczby? if wylMML[i]=wylMML[i] then wylMML[i]:=1+random(42); jak zrobie tak, to zawsze bedzie warunek spelniony bo sprawdza np wylMML[1] i wylMML[1], zawsze bedzie tak samo... a jeszcze przychodzi mi do glowy takie cos: zrobic IF w petli i cos takiego: if wylMML[i]=wylMML[i] then wylMML[i+1]:=1+random(42); tylko, ze chyba cos nie...
Mam pytanie Obliczam w pascalu funkcję: sin(30) i wynik wychodzi -0.99 natomiast w tablicah matematycznych sin30 to 0.5 Wiem że pascal podaje wynik w radianach, ale pytanie jak zrobić żeby po zastosowaniu powyższej funkcji podawał wynik taki jaki jest w tablicach matematycznych????
witam, jak w pascalu policzyc ile jest roznych elementow w tablicy jednowymiarowej (wektorze)? np tab Temat zamykam. - arnoldziq
Witam próbuję napisać program we free pascalu przy użyciu tablic Program ma zapamiętać konkretną ilość imion, wyświetlić je oraz wyświetlić w odwrotnej kolejności. Napisałem fragment ale kompilator nie chce tego uznać co więcej nie pokazuje błędu. Czy może ktoś określić co jest nie tak? Poprawiłem wszystko i działa. Manu zrobię w swoim czasie i pętle...
prostym Ifem... if ((date2.miesiac) > (date1.miesiac)) then writeln('data2 jest wieksza') else writeln('data 1 jest wieksza); powinno być sprawdzenie ifem czy miesiace nie sa rowne, jesli sa to if porownujacy dni -->if jak wyzej. i masz juz gotowy program. Date najlepiej bedzie ci jako rekord napisac o polach dzien i miesiac. rozwiazanie dla miesiecy...
Kurcze, w excelu nie mogę, musi to być koniecznie w pascalu. A co do zastosowania jakiejś funkcji i tablicy dwuwymiarowej to nie bardzo chyba wiem jak to zrobić ;/ Nie dało by rady jakimś małym kodem pomóc?
Podejrzewam, że wyświetla się wszystko, tylko w terminalu mieści Ci się tylko 300 ostatnich wierszy. Zwiększ rozmiar bufora ekranu(Prawym na belkę terminala, właściwości i tam znajdziesz).
Zamykam bo Elektroda się dopomina
Witam serdecznie wszystkich użytkowników ;) Mam takowy problem... muszę napisać program, ale nie wiem jak... wiem jak napisać początek, niestety drugiej części napisać już nie potrafię :( oto zadanie: Napisać program o następujących założeniach: 1. Wczytać dane do tablicy dwumiarowej "d1" o rozmiarze ║ program liczby; ║ uses crt; ║...
Dodaj jeszcze deklaracje tych tablic to będzie łatwiej zrozumieć o co chodzi. Jeżeli ma być dynamiczne to w Pascalu raczej wskaźniki a nie jakieś indeksy. I co to za Pascal, kolega pisze o SetLength i TList, ale to tylko domysły?
jak wiesz jak sie zamienia liczby binarne na dziesietne to nie powinno byc problemu, wejscie wczytujesz do tablicy 1-wymiarowej, znak po znaku, potem w petli lecisz od konca (lub od poczatku jak kto woli), i jak w komorce jest 0 to do zmiennej wynik dodajesz 0 (czyli nic nie robisz), jak 1 to 2^n (gdzie n to odpowiednia potega wynikajaca z indeksu tablicy)
Co do WinAPI to zalezało mi aby z poziomu pascala napisac taki program no to chyba nie napiszesz bo pascal jest pod dos`a :| chyba, że się mylę ;) Co do funkcji to nie wiem w ogóle dlaczego chcesz mieć funkcję, skoro nie ma Ci nic zwracać. Użyj procedury: procedure Pamiec(N:integer); var T:array of variant; //tutaj typ tablicy jaką...
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.
Polecam użycia tablicy obiektów.
Zapętliłem się na dobre, nie wiem jak "dołożyć" do tablicy drugi wymiar czyli zapis słowny jedności do następnej tablicy dziesiątek itd. W załączeniu kawałek tego programu
Tablica jest z utworzonego pliku w ktorym normalnie są zapisane liczby jedna obok drugiej odzielone spacjami, w czterech rzędach. nie musi byc to opcja blockread, po prostu chce jakimkolwiek sposobem wczytac tablice z pliku. To czytaj zwykłym readln a potem potnij stringa w miejscu spacji (jakaś pętla i funkcja pos powinna wystarczyć) i przetwórz na...
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 ja odpalam to w pascalu to wyskakuje mi błąd :Invalid for control variable
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)
Ten program nawet się nie skompiluje - przyrównujesz znak do ciągu tekstowego. To nie zadziała. Musisz albo użyć konstrukcji z in , albo drugą pętlą (funkcją) porównywać znak z góry założonym zestawem - tablicą.
Zrób tablicę n x 2 elementy i po każdym wylosowaniu pary cyfr sprawdzaj czy są już takie w tablicy i jeśli są losuj ponownie.
Mam zapisane wartości funkcji w tablicy np. tab Umiesz rysować linie? Ja trochę nie pamiętam jak się to robiło... ale chyba były to funkcję na Canvas typu MoveTo(x, y); oraz LineTo(x,y); Więc musisz stworzyć pętle typu: for x:=1 to 199 do begin Obiekt.Canvas.MoveTo(x, tab[x]); Obiekt.Canvas.LineTo(x+1, tab[x+1]);...
Tak się nie pisze programów. Poczytaj o typach 'array' i 'record' w Pascalu. Zamiast robić miliony skoków umieść odejmowane wartości w tablicach (array). Na n-tym miejscu w każdej tablicy wartości odpowiadające n-temu levelowi. Będzie to bardziej czytelne i łatwiejsze w rozbudowie a error powinien zniknąć.
Zmienna globalna, inicjujesz na początku programu.
Jeżeli chodziło o wypisanie losowego stringa z tablicy to spróbuj jakoś w ten deseń: writeln(sentencje[random(96&...
a moze troche jasniej... no i przydaly by sie te tablice
tablice pascalu kalkulator pascalu programy pascalu
myszki logitech dźwiękowy sygnalizacja wykrywac metali
schemat podłączenia connects2 citroen xsara pompa
Bezpiecznik rozrusznika Skoda Octavia 2 1.6 MPI 2004 - lokalizacja i numer Siemens Siwamat XS 423 - Migająca kontrolka końca programu