Sam Sung - jeśli jednak z jakiś względów uzycie parametrów przez referencję nie wchodzi w grę (notabene: Pascal nawet ma specjalny typ parametru out - w C jest cos takiego?) oraz nie chce się tworzyć struktury (np. duża liczba funkcji zwracając wiele parametrów mogłaby zaciemnić kod), to moim zdaniem zwracanie dynamicznie utworzonej tablicy (a ściślej...
readkey zwraca Ci kod naciśniętego klawisza (a ściślej - zmienną typu char ). Po prostu sprawdź ją, a zamknięcie i ewentualny napis po prostu musisz wstawić przed końcem programu a za pętlą, z której wyjście de facto prowadzi do końca.
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....
Witam! Nie wiem, jak utworzyć dwuwymiarową tablicę dynamiczną. Otóż mój kawałek kodu wygląda tak Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . - arnoldziq
Chciałbym się dowiedzieć jak odwołać się do tablicy ocen w tym rekordzie. Do imienia dane wpisałbym tak readln(dziennik[1].imie) ale jak wpisać dane do tablicy integerów znajdujących się w rekordzie. [syntax=pascal] type uczen = record imie : string; nazwisko : string; klasa : string; oceny : array[1..30] of integer; end; var dziennik:array[1..50] of...
Witam Musze napisać program w pascal'u , ale programowanie to dla mnie czarna magia. Proszę o jakieś wskazówki dla zupełnego laika, jak sie do tego zabrać. Treść zadania: Do tablicy 4 wiersze x 4 kolumny wprowadzić liczby, wybrać najmniejszą i największą liczbę, obliczyć średnią arytmetyczną dla wszystkich elementów tablicy, obliczyć sumy elementów...
Witam mam problem mam do wykonania program liczący obw, objętosci, pola itp figur 3D i plaskich. Wszystko dziala tylko mam problem co zrobić aby np po wykonaniu 2 punktu program powrucił do menu wyboru opcji obliczweń? (program poprostu kończy się) program obliczenia; uses crt; var wybor : byte; a, b, c, d, h, hb, p, r, l : integer; procedure prostopadloscian;...
Witam. Piszę mały programik, który po wpisaniu słowa/zdania odwróci je (lama da wynik amal). Sprawa bardzo prosta przy stałej wartości znaków i tablicy, ale... Muszę to jakoś zrobić na zasadzie tablicy dynamicznej jak w c++ czyli tab:array[1..liczbaznakow] of char; ale tak w ten sposób się nie da. Wiem, że są tablice dynamiczne w TP, ale nie umiem ich...
napisz program ,który wczytuje n liczb całkowitych do tablicy i przesuwa w niej liczby o n elementów w prawo.
Napisałem krótki program który wpisuje mi tablicę typu rekordowego do pliku. Niestety do pliku nie zapisują mi się 3 pozycje tylko jedna, ostatnia. Jak zrobić żeby w pliku po 3 przejściach pętli mieć zapisane 3 informacje? Dodano po 4 Trzeba usunąć -1 przy funkcji Filesize.
uses windows,crt; var m:char; plik:text; begin assign(plik,'c:\text.txt'); rewrite(plik); repeat m:=readkey; if m=#9 then write(plik,'---------------------'... write(plik,m); until m=#13; close(plik); end. Jak zrobić aby ten program działał również po zminimalizowaniu?
Witam. Dostałem w szkole takie zadanie: " Napisz program przechowujący w dwóch tablicach jednowymiarowych imiona, nazwiska (jedna tablica dla imion, druga dla nazwisk), max 10 elementów. Tablice mają być przechowane w plikach elementowych. Napisz drugi program, który pobierze z pliku pierwszego i drugiego dane i stworzy trzecią tablicę 10-elementową...
Witam mam taki problem w szkole mieliśmy wprowadzenie do Pascala i mały program tam było wszystko ok ale w domu coś pomieszałem i się pogubiłem bo chciałem dodać procedury :P żeby ciągle nie było tego samego ale coś mi nie działa Var numer:byte; odpowiedz:string; Procedure start; Begin Writeln('1 - Ramka Pierwsza 2 - Ramka :'); Readln(numer);...
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; ║...
Witam. mam problem z programem, którego treść brzmi: Tablica 12 elementowa - elementy typu integer a) losowanie generowanie elementów tablicy b) wyświetlanie tablicy c) Funkcja - średnia elementów d) Funkcja - średnia parzystych e) Fumkcja - obliczanie ile jest elementów z przedziału (-5,5) f) normalizacja tablicy g) potęgowanie tablicy ( każda następna...
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...
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.
Witam mam następujący problem z pascalem mam następujący programik wyświetlający kontekstowe menu USES CRT; Var c1,c2:char; y:byte; tablica:array[1..3]of string; Procedure info; {1} Begin End; Procedure glowny_program; {2} Begin End; Begin Tablica[1]:=' Info '; {3} Tablica[2]:='...
[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...
Witam. Ucze sie programowac w pascalu i idze mi calkiem dobrze.Mam jednak maly blad.Nie wiem czym on jest spowodowany. Podam teraz maly program,bardzo latwy,ale nie wazne.Wazne ze czy w malym czy duzym programie zawsze on wystepuje.oto przyklad: VAR imie:string; BEGIN write('Jak masz na imię?'); read(imie); write('Witaj '); write(imie); write('. Życzę...
Ponizej przedstawiam program ktory sam napisałem w Dev-Pascalu brakuje mi jednak tylko pare elementów. Otóż chodzi mi aby do niego dodac nastepujące elementy: W ostatnim polu pierwszej tablicy ma być zapamiętana suma wszystkich poprzednich wartości w tablicy. W ostatnim polu drugiej tablicy ma być zapamiętany iloczyn dziesiątych części wszystkich poprzednich...
Witam, mam napisać program, który będzie przeprowadzał test z czterema odpowiedziami, przy użyciu rekordów, a następnie zapisywał do pliku tekstowegoi drugi który odczyta plik tekstowy i poda ocenę. Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . - arnoldziq
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
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...
W takiej notacji, że każda cyfra jest w osobnej komórce tablicy, problemem jest obsługa wartości ujemnych. Najłatwiej jest operować na kodzie uzupełnienia do dwóch. Wtedy wyliczanie przeniesienia nie jest skomplikowane. Tutaj możesz zastosować algorytm pisemnego odejmowania, przy czym najniższe cyfry trzymać pod niskimi indeksami, aby można było działania...
Witam Napisałem program mający po kolei: 1. Robić array jednowymiarowy o 7 elementach: 1,2,3,8,16,24,48. to wyglada ok 2. Z niego zrobić dwuwymiarowy array na podstawie takiej, że ten array jest jakby przylegający do niego od góry i lewej strony, (indeksy i,j) i z niego wyliczać logarytm naturalny. to też 3. Stworzyć funkcję sumującą elementy znajdujące...
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ą...
Moim zdaniem eleganckim rozwiązaniem będzie zrobić na początku programu głównego wczytanie danych do jakiejś tablicy, następnie porgram poprosi o wybór co chce otrzymać użytkownik poprzez CASE (wywoła on odpowiednią funkcje) . Poszczególne operacje aż proszą się o procedurkę lub funkcje (jako że zwracają tylko jedną "liczbę" proponuje funkcję). Innymi...
Witam Szanownych Forumowiczów. Mam tablicę ledową która wyświetla różne napisy, które ma zaprogramowane. Chciałbym móc zmienić wyświetlaną treść. Jednak dla mnie to zupełna nowość, dlatego zwracam się z prośbą o pomoc w ogarnięciu tematu. Na "pokładzie" jest Atmega644. Do płytki jest dołączony dość długi kabel zakończony rs232, więc przypuszczam że...
Znalazłem w tablicach jeszcze jedno rozwinięcie w szereg ważne dla każdego x>0: Ln(x)=2*\sum{\frac{1}{2n+1}*(\frac{x-1}{... dla n=0 do ∞ {Oblicza logarytm naturalny z dokładnością eps z ograniczeniem na ilość wyrazów ciągu maxit (by uniknąć zawieszenia się jeżeli nie udaje się osiągnąć założonej dokładności) Funkcja zwraca:...
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...
Nie ma potrzeby żadnej tablicy - po prostu wywołujesz procedurę wyświetlającą pytanie (parametr) i możliwe odpowiedzi (kolejne np. 4 parametry) oraz, która poprawna (parametr), a niech zwraca (i to będzie funkcja, a nie procedura już!), czy wybrano poprawną. Gdzieś w głównym bloku zliczasz liczbę poprawnych. Oczywiście pojęcie użycia procedur jest dość...
A w czym dokładnie piszesz (jakie środowisko/kompilator)? W nowszych można by się posługiwać np. parametrami w postaci funkcji porównujących i zamieniających miejscami (czyli przekazujesz referencje do funkcji, a sama funkcja sortująca sobie po prostu wykorzystuje nie zwracając uwagę na typ - nawet jej tablicy nie musisz dawać). Można by się też posługiwać...
czemu w rekordzie masz tablice stringów ? Przemko - to nie tablica stringów, tylko ShortString o określonej długości. (at)tomek98-99 Po pierwsze warunek na brak wyników jest niewłaściwy, gdyż odwołujesz się do ostatniego przypadku, co jest błędem. Radzę przed pętlą utworzyć sobie zmienną iw przypadku znalezienia - zmienić jej stan. Jesli nie doszło...
przyklad mnozenia elementow tablicy przez 5: tab: array[1..10] of integer; i: integer; for i:=1 to 10 do tab[i] = tab[i] * 5; teraz mosisz tylko dostosowac powyzszy kod do swojego programu Wiele razy zwracałem koledze uwagę na niechlujną pisownię. Przypominałem o tym że zdania rozpoczynamy wielką literą i kończymy...
program Cezar; {szyfrowanie i deszyfrowanie pojedyńczych liter szyfrem cezara o dowolnym przesunięciu k} uses crt, dos; var k:integer;{klucz} alfj:array[1..25] of char; {tablica alfabetu jawnego} alft:array[1..25] of char; {tablica alfabetu tajnego} a:integer;{wyświetanie...
podany przez ciebie temat niestety niedokońca rozwiazał mój problem. muszę wczytać plik tekstowy( A.txt ) do programu a następnie przeliczać uzyskane dane. dane które muszę wczytać to tablica: 2 3 7 1 4 3 2 8 1 na początku programu zadeklarowałem że zmienna i:=1 j:=1 następnie warunek że jeżeli A var P:text; A: array [1..10,1..10] of...
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,...
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...
funkcje eof eoln seekeoln Ale prezciez to jest bez sensu! Oczywiście należy sprawdzać koniec pliku i tu się nie obejdzie bez funkcji eof, ale zupełnie nie widze sensu stosowania pozostałych (no chyba tylko w formie balastu i komplikacji). Zamiast readln należy użyć read, bo przeciez potrzebny jest pojedyńczy znak a nie łańcuch. Napisałem prog co sortuje...
min=t[0]; max=t[0] licznik=0 // licznik prównan for i=1..n-1 licznik++ if t[i]<min min=t[i] else licznik++ if t[i]>max max=t[i] proste liniowe szukanie, licznik przybiera wartości między N a 2N +/- (raczej więcej niż mniej) strategia dziel i zwyciężaj powinna dać między N a 3/2N (raczej N niż więcej)...
.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
Kafka -Pisałem w Pascalu, nie obiektowo więc też struktury. Pamięć dla struktury przydzieli Ci „malloc”. Samo wstawienie NULL’a nie daje nic, nie pamiętam co w C jest odwrotnością „malloc” coś z free w nazwie, ale ze zwalnianiem tego jest kłopot, przy wielkim słowniku jest to najbardziej czasochłonna operacja, bo pamięć...
Ostatnio mialem sprawdzian teoretyczny (o.O) z programowania. Nasza facetka jest nieogarnieta.. wogole szkoda gadac... Ale do sedna, na sprawdzianie padlo kilka dziwnie sformulowanych pytan, chcialbym aby doswiadczeni uzytkownicy podali mi na nie prawidlowe odpowiedzi. Do wyboru prawda lub falsz: 1.Kompilator tworzy kod wykonywalny na podstawie programu...
No cóż...na razie struktury dynamiczne są dla mnie za trudne. Starałem się jakoś napisać program na strukturze statycznej i wyszło mi to tak mniej więcej jak poniżej. [syntax=pascal]program wypozyczalnia; uses crt; type auto=record marka:string; model:string; rok:integer; km:integer; wypozyczajacy:string; cj:boolean; end; klient=record id:integer; imie:string;...
No cóż, wyszedłem z założenia, że jeśli się dostaje tego typu temat do realizacji to należy posiadać pewien zasób wiedzy i umiejętności. W tym wypadku wskazana byłaby wiedza : o konstrukcji i działaniu komputera o językach programowania i pisaniu programów o sygnale akustycznym ze szczególnym uwzględnieniem mowy o metodach przetwarzania cyfrowego sygnału...
zwracanie tablicy zwracanie wartosci zwracanie funkcji
lutowanie transformatorową zabezpieczenia akumulatora końcówka amator
siemens ncdr1100 schemat magnetofon m2405s
Beko WML61023N – filtr przeciwzakłóceniowy a kondensator rozruchowy silnika szczotkowego HTML okrągły kontener z border-radius i clip-path – przykład ograniczenia wyjścia elementu