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...
Maksymalny rozmiar jednej zmiennej przechowywanej w pamięci to 2^16 = 65536 bajtów. W rzeczywistości (TP 7.0) możesz ustawić maksymalny "Stack Size" na 65520 bajtów. Trik polega na tym, że Turbo Pascal nie przewiduje więcej miejsca w pamięci niż te 65536 bajtów na przechowywanie zmiennych. Jak zajmiesz całość jedną zmienną, to nie będzie "miejsca" na...
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.
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).
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...
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...
W Pascalu funkcja Random(x) losuje liczby całkowite z przedziału [0..x-1] (0 <= Random(x) < x). Stąd trzeba szerokość zakresu wynikającego z ograniczeń zwiększyć o 1. Edycja: Sorry wytknąłem Arnoldziqowi błąd, a on jednak to zapisał tylko w innym miejscu ;) (at)Marcin2992 Praktycznie przykłady znajdziesz m.in. we wszystkich kompilatorach Borlanda...
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...
[syntax=pascal] program tabi; var tab:array[1..600] of integer; a:integer; begin for a:= 1 to 600 do tab[a]:= a; for a:= 1 to 600 do writeln ('element tablicy o indeksie : ',a,' ma wartosc: ',tab[a]); readln; end. [/syntax] Program ma za zadanie przyporządkować np tab[1] := 1 i tab[2]:=2 i tak dalej do 600 i wyświetlać komunikat "element tablicy o indeksie...
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...
Mając trochę wolnego czasu napisałem parę funkcji do obsługi układu PCF8583. Funkcja która ustawia godzinę i datę zapisuje też dane potrzebne do obliczenia pełnego roku, dzień tygodnia jest obliczany automatycznie na podstawie daty. Funkcje Pcf8583_write i Pcf8583_read można wykorzystać do zapisywania/odczytywania danych z wolnej pamięci ram. Dostępne...
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....
Witam Mozna też tak ale zadeklarowana tablica jest stała czyli nie można jej zawartości zmienić.
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...
W pascalu możemy zakres tablicy okresiic dowolnie np: tab[-3..40]; w c++ tablica musi się zaczynać od 0, czyli tab[10] zawiera wartości tab[i] od 0 do 9.
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...
[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...
Witam mam problem z napisaniem programu: Napisz program, który będzie zliczał ile razy dany element (mniejszy od 10) pojawił się w tablicy n-elementowej (n<100), np. tablica 4,1,5,1,1,6,7,1,7,6,4,8,3,1,3 spowoduje zwrócenie nastepującego komunikatu: liczba 4 wystąpiła 2 razy liczba 1 wystąpiła 5 razy liczba 5 wystąpiła 1 razy liczba 6 wystąpiła 2...
Bardzo prosto. Tablica reprezentuje kolejne wagi bitowe w systemie dwójkowym, więc : liczba = tab Gdyby nawet w tablicy były inty zamiast boolean, to powinno iść odwrotnie, tj: liczba = tablica Adamm0 - też dałeś wagi na odwrót.
Dokładnie tak samo, tylko trzeba podać index do tablicy oceny. [syntax=pascal]readln(dziennik[x].oceny[...
Witam. Wiem że są podobne problemy opisane w postach na forum, ale ciężko idzie mi zrozumienie programu napisanego przez inną osobę. Proszę o pomoc w przeanalizowaniu mojego programu. Jest to baza danych w Pascalu na pracę semestralną. Chodzi o, to że prawdopodobnie program nie zapisuje rekordu do tablicy i nie zgadzają się typy zapisywanych rekordów....
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'...
Co to jest 2i może 2*i?
Witam Mam problem z tablica w pascalu. Wszystko dziala az do funkcji "suman", gdzie nie liczy prawidlowo sumy liczb w tablicy, prosze o pomoc :) program faktury; uses crt; const N=10; type tab=array[1..N] of integer; var liczbaa,i,sumana,sumaba,sumapa,maxa:... a:tab; procedure czytaj(var t:tab; var liczba:integer);...
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;...
To poświęć z 3-4 godzinki na poczytanie jakiegoś kursu Pascala dla początkujących. BTW - studiując matmę dobrze znać takie pojęcia z programowania, jak tablica (macierz w matematyce). Podejrzewam, że MatLab też będzie, a tam się przyda taka wiedza z podstaw programowania. Tak samo jak zależności rekurencyjne (tak samo w programowaniu) czy ciągi skończone...
Tak, tak i tak :) const - oznacza że deklarujesz stałe. Max_poziom_budynku = 5; - Tu ustawieasz maksymalny poziom budynków. Ilosc_typow_surowcow = 3; - Tu ustawiasz ilość rodzajów surowców. Ilosc_budynkow = 16; - To jest chyba oczywiste. :) Tabela_budynkow : array - tablica z (w tym przypadku) 16 elementów, tyle ile ma być budynków. array - tablica...
Zadeklaruj wobec tego tablicę stringów z określonym limitem, np. var e24=array[1..169] of string [4]; 4-y znaki wystarczą na te kody, cała tablica zajmie 845 bajtów. Dawno nie pisałem w TP7, ale, czy nie da się tam zadeklarować: const e24:array[1..169]of string = ('1R0','1R1'....) Da sie tak zadeklarowac w Pascalu...
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...
Maksymalna czyli 255? wiem że musi być większa od 99.No to tak randomize(256) powinno wylosować liczby w przedziale od 255 do 0 Co za bzdury wypisujesz! Nawet nie chce Ci się zajrzeć do tablicy kodów. http://pl.wikipedia.org/wiki/ASCII Gdybyś przyjrzał się dokładniej przedstawionemu kodowi to byś zobaczył że do tablicy wpisywane są liczby, a nie kody....
Witam Czy ktoś potrafi napisać w Turbo Pascalu taki program Dana jest tablica ocen n-osob (n<=10) z 5 przedmiotów Oceny wpisujemy losowo ;całkowite 1,2,3,4,5,6 1.oblicz średnią z ostatniego przedmiotu 2.średnią pierwszego ucznia 3.średnią całej klasy 4.ile ocen jest większych od policzonej średniej klasy Jest potrzebny pilnie na jutro Za pomoc wielkie...
Ja bym proponował od początku zacząć :-) A poważnie, to zapoznaj się z ONP. Na wikipedii masz nawet opisany algorytm - wersja pierwsza (ze stosem) jest bardzo prosta do zrobienia. Najwygodniej właśnie zrobić to na takiej strukturze jak stos, ale jeśli dopiero zaczynasz programować i nie przerabiałeś struktur dynamicznych, to spokojnie możesz oprzeć...
Panowie, panowie!! jak działają wasze pomysły kiedy chcę wylosować cztery liczby longint? albo co też czasem bywa potrzebują liczb rzeczywistych? jakieś pomysły ;) ? no jak to zrobić? , czy któryś z was potrafi to uruchomić na swoim komputerze? przepraczam, ale moja propozycja jest najprostrza, najlepsza i jedyna!! -poprawka do programiku, tablica t...
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. Oczywiście że są dynamiczne tablice. Były już w Pascalu ;) Szybkość - gdyby chodziło o samo wczytanie to szkoda by było. Ale z pewnością będziesz chciał mieć na bieżąco wartości punktów i móc je przeglądać - wówczas dynamiczna tablica to najszybsze rozwiązanie. 2. Memo służy do wyświetlania na ekranie. Jeśli potrzebujesz samego ładowania z pliku,...
hmmm.... no faktycznie. nadal ni w zab nie rozumiem czemu inaczej wydana instrukcje wyswietlenia tablicy daje cos innego (inna kolejnosc tych liczb) mimo ze przypisywanie wartosci elementom wygladalo tak samo. myslalam ze Dodano po 33 dobra, chyba mnie olsnilo i chwycilam wreszcie :D [syntax=fortran] do i=1,27 do j=1,3 write(*,*) bez(i,j) end do end...
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.
Ależ to jest wręcz liniowy program wyłącznie z pętlami. http://www.algorytm.org/kurs-algorytmiki... - na dole strony.
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.
Rozumien, że tam gdzie w tablicy jest aż do 63999 znaków mogę to zmienić na 255 znaków bo tyle ma mieć tekst ? I czemu tablica jest of char ? Myślałam że ma być of string. Napisałam to tak : var słowo:array[1..255] of string; wyraz:array[1..n] of string; czy w tej tablizy z wyrazem liczba znaków musi być zdefiniowana, no bo w końcu nie wiemy jak długiego...
hejka mam prośbę czy ktoś może mi podać jak powinna wyglądać procedura czynie wiem jakie polecenie w Pascalu liczące ilość porównań liczb w sortowaniu bąbelkowym? program sort; const zakres=99; var Liczby:array[1..zakres] of integer; i,j,k,n,wybor:integer; procedure czytaj; begin writeln ('program kt˘rego zadaniem jest sortowanie...
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?...
Miałem kłopot zrozumieć z oryginalnego postu o co chodzi ale..., ale strasznie mi się spodobała ta struktura, bawiłem się z tym trochę, zabawne że nie miałem kłopotu z „dodaj” i „wypisz” a miałem ze „znajdz”. (Ciekawe czy to jakoś nie wynika z „ducha” języka, jutro otrzeźwieję to sprawdzę ;) ). W sumie...
Czesc :D mam napisany program w pascalu który odczytuje,zapamiętuje i zapisuje rekordy w bazie danych.Pod spodem wkleję jego cześc(bez zbędnych procedur wyszukiwania) i potrzebuje pomocy w napisaniu procedury która będzie usuwała i edytowała rekordy w bazie(zapisanej w pliku).Znalazłem coś takiego tylko w innym programie który wyszperałem na necie lecz...
Tablica dynamiczna rekordów, tak samo jak to się robi z listami w pascalu.
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...
...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...
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...
tablice pascalu turbo pascalu programowanie pascalu
ariston auraton emulator pracy silnika programowanie cyfrowego polsatu
Błąd T420 w wózku Linde T20 AP - diagnostyka i rozwiązania Chińskie radio 2DIN nie łączy się z telefonem przez Bluetooth – parowanie, ustawienia, profile
