To nie możesz po prostu złączyć "c:\"+np ?? Dodano po 53 PS. To nie jest "nie wiadomo gdzie" tylko w katalogu roboczym (jeśli nie podajesz ścieżki)
Tak. A następnie instrukcją Seek (lub SeekToEof jeśli dobrze pamiętam) przejść na koniec pliku i wykonać zapis. W ten sposób dołączysz tak, jakbyś otworzyć plik w trybie Append.
Ta odpowiedź jest bardzo niestaranna. Brakuje zamknięcia pliku Może, ale raczej niepełna... miała być wskazówką czego szukać a nie bezbłędnym rozwiązaniem problemu. Kolega Kuba dopiero uczy się programować i jeśli sam nie nauczy się szybko szukać potrzebnych informacji w dokumentacjach, helpach, Internecie,... to będzie miał problem z samodzielnym...
Procedura w takiej formie : {procedura wyszukiwania filmu wedlug zadanego klucza} procedure wyszukaj; var p : file of film; f : film; s : string; x : integer; begin write('podaj tytul filmu ktory chcesz znalezc : '); readln(s); assign(p,'filmy.dat'); {otwieramy plik} reset(p); {reset...
W procedurze twlist(...) ilość begin=4, a ilość end=3!!! Tu wyskakuje Twój error,ale dalej też są. Np nieznana proc. dodaj(...), Trzeba dalej analizować. Poza tym nie widzę ciała programu głównego,sterującego wykonaniem kolejnych procedur.Chyba,że źle widzę.
Strasznie skomplikowany ten twój program. Trudno się połapać o co chodzi. Kompletnie bez sensu używasz tablicy do zapamiętania kolejnych znaków czytanych z pliku. program pliki_TXT; uses dos,crt; const opusc = [#9,#32,#3,#2,#13,#10,#45,#31,#95 ... var SRC : SearchRec; ile : integer; {**********************************...
Poszukaj sobie opisu formatu JPEG i tam będzie rozpisane co gdzie jest. Utworzysz sobie odpowiedni typ danych i wczytasz do nich nagłówek, a potem to już z górki. Można byłoby znaleźć jakąś gotową biblotekę ale pewnie nie o to chodziło nauczycielowi.
Turbo Pascala to lepiej sobie odpuścić w zastosowaniach internetowych. Za dużo roboty by było :( Jeśli już - musisz po prostu napisać klienta FTP. W przypadku Delphi czy Free Pascala najlepiej będzie skorzystać z gotowców Indy.
Z grafiki w TP dużo mi sie juz zapomniało (z resztą wogóle mnie to nie interesowało), ale wydaje mi się, że to tego jest funkcja GetPixel - w przeciwieństwie do PutPixel, która ustawia wybraną berwę punktu.
jeśli znasz rozmiary macierzy, to m razy wykonujesz read(plik,zmienna) i readln(plik) aby przejść do następnej linii (albo już niekoniecznie, nie pamiętam). Czytasz w podwójnej pętli 1-n,1-m, odczytane wartości przypisujesz pod wskazany przez pętle indeks (miejsce) w tablicy. To, jak będzie wyglądać to w dokumencie to w zasadzie kwestia stworzenia specyfikacji....
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...
...mam nadzieje, ze zdajesz sobie sprawe z faktu ze nalezy przestawic tryb kompilacji w momencie jezeli chcesz miec binarke...i odwrotnie jezeli chcesz kompilowac w pamieci... ...mozesz tez w opcjach (bodajze opcja Environment..pisze z pamieci wiec moge sie mylic) jest mozliwosc przypisania katalogu w ktorym ma znalezc sie po kompilacji plik wykonywalny.
Poszukaj pliku z rozszerzeniem *.pas w którym to pisałeś, otwórz go notatnikiem i kopiuj co potrzebujesz.
Witam. Najprostszy zapis do pliku wyglada tak: deklarujesz zmienna typu text: var plik: tekst; teraz musisz przypisac plik fizyczny zmiennej plikowej: assign(plik, 'sciezka\nazwa_pliku'); mozesz podac nazwe jeszcze nieistniejacego pliku, lub istniejacego, ale uwaga!!! istniejacy zostanie przepisany!!! teraz otwierasz plik (do przepisania): rewrite(plik);...
zapamietaj IOResult do jakiejś zmiennej.
Zamiast szukać "auto" szukaj "auto ".
A generlanie co to za tryb 50 wierszowy? Pomyliłeś wiersze z kolumnami. To od razu kilka porawek: Program pacm; uses crt; var plansza:text; linia:string; tab:array[1..80,1..50] of char; i,d,x,y,nextx,nexty:integer; key,pac,nic:char; begin clrscr; assign(plansza,'plansza1.txt'); reset(plansza); for i:=1...
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...
No, to robisz jeszcze drugie przypisanie (assign) do osobnej zmiennej textowej, otwierasz plik do zapisu (rewrite) i zapisujesz to, co trzeba. Jedna uwaga - jako, ze w pliku są liczby to odczytuj do zmiennej liczbowej, a nie tekstowej.
Witam, to chyba to: http://www.delphibasics.co.uk/RTL.asp?Na... jest jeszcze coś takiego: http://delphi.triger.com.pl/index.php?ME... Pozdrawiam, Krzysztof.
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'...
Witam, czy mógłby mi ktoś podpowiedzieć jak napisać w Pascalu sprawdzenie istnienia danego pliku?
Przemyśl może taki kod : program rec; uses crt; type osoba = record imie : string[15]; nazwisko : string[15]; ocena :integer; end; var plik : file of osoba; plik2 : file of osoba; uczen : osoba; a : char; begin clrscr; assign(plik,'dane.txt'); assign(plik2,'best.txt'); {$I-} rewrite(plik);rewrite(plik2&...
Odkodowuje się dokładnie tak samo, tylko zamiast +7 dajesz -7 :). write('Podaj ciag znakow, do zakodowania : '); readln(ciag_znakow); for x:=1 to length(ciag_znakow) do ciag_znakow[x]:=chr(ord&... + 7 ); {!!!!!!!!!!!!!!!} writeln('Zakodowany ciag znakow :...
write(plik, 'ciąg')
Jak mam zmienić kod aby mógł przewijać strzałką do dołu zamiast Enterem tekst i żebym mógł również przewijać tekst do góry. Oto kod: program pliki_tekstowe; uses crt; var nazwa: string; i: byte; procedure pisz(nazwa: string); var plik: text; linia: string[77]; i: byte; begin assign(plik,nazwa); reset(plik);...
No to wiemy wszystko. Normalnie, Windows 7 nie pozwala na zapisywanie plików w katalogu "Program Files" na dysku C. Przenieś Katalog TP na inny dysk, lub do katalogu swojego profilu : C:\USERS\twoja_nazwa_użytkownika. Możesz także w konfiguracji TP zmienić katalog docelowy kompilacji (menu Options/Directories), na taki który nie będzie kolidował z systemem...
No dobrze ale jak mam wpisać żeby program zapisywał odpowiedzi użytkownika a nie pytania które on dostanie na ekranie? Bo ja zakładam, że te odpowiedzi mogą być za każdym razem inne. Odpowiedź jest dokładnie wciąż ta sama. Skoro odpowiedź jest zapisywana do zmiennej poprzez readln, to tą zmienną należy zapisać do pliku. [syntax=pascal]writeln(f, 'Chciałbym...
A nie możesz jawnie podać ścieżkę do Acrobata i jako parametr ścieżkę do pliku pdf?
Nie wszystko działa jak należy ale masz punkt zaczepienia. PROGRAM magazyn; uses dos, crt; VAR nr: string; produkt: string; dostawca: string; data: string; nrfvat: string; pop: Integer; plik1: text; Sciezka: String; PROCEDURE Pauza; begin writeln; write ('Wcisnij <Enter>'); Readln; writeln; end; PROCEDURE...
Temat możesz zamknąć sam, przyciskiem "rozwiązano". Nawet dostaniesz za to punkty. Jeżeli Turbo Pascal nie jest wymogiem odgórnym, to polecam http://www.lazarus.freepascal.org/, powinien działać bez problemu.
hmm tamten problem rozwiązałem po przez dodanie granicy długości znaków. ale tutaj jest problem [syntax=pascal]// zapis pliku assign(plik, 'f:/plik.dat'); rewrite(plik); write(plik,student[x]); [/syntax] odczyt pliku [syntax=pascal]begin reset(plik) ; read(plik,student[x]); end;[/syntax] kod tworzy plik na dysku o nazwie plik.dat z zawartoscia 292kb....
Dzień dobry Od lat programuję w różnych odmianach Pascala, przede wszystkim na potrzeby aplikacji desktopowych. Od czasu, kiedy zainteresowałem się mikrokontrolerami AVR, szukałem dobrego darmowego kompilatora i edytora dla tego języka, obsługującego AVR-y. Okazało się, że znany mi kompilator Free Pascal oraz Lazarus jako środowisko to potrafią, ale...
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...
mam problem z 1 programem liczę na pomoc :P nie pamiętam dokładnie treści zadania ale napisze tyle ile pamiętam Treść Napisz program Tester który zawiera pytania i odpowiedzi zapisane w pliku Txt. Program ma odczytać z pliku txt dane i zapisać na plik rekordowy, pod pytaniem ma być poprawna odpowiedz(i 2 inne blednę ). W programie maja zostać zastosowane...
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 Program prawie_gotowy; Uses CRT; Const haslo='D...'; Var wprowadz:String; petla:byte; imie,nazwisko,telefon: array [1..30] of string; c,c2,c3:char; iloscosob:byte; t1:byte; plik:text; PROCEDURE Zapisz; Begin Assign (plik,'BAZA.DAN'); Rewrite(plik); Writeln(plik,iloscosob); t1:=0;...
To już jest inny temat. W jakim sensie usuwanie rekordów? Usuwanie zmiennej typu rekordowego, której pamięć została przydzielona dynamicznie?
Dzięki za to że ktoś napisał to bo nie mogłem sobie poradzić z tworzeniem pliku w wybranej lokalizacji ;p
To zrób tak : [syntax=delphi]unit WczytaniePliku; interface uses Classes, SysUtils; function plikOtwierany:text; implementation //--------------------------------------... function plikOtwierany:text ; var nazwaPliku:string; begin Writeln('Podaj nazwę pliku wraz z rozszerzeniem np tekst.txt strona.php itd. Plik musi mieć rozszerzenie...
Musisz stworzyć algorytm, który wygeneruje "n" unikalnych nazw plików. Najprościej, to zrobić za pomocą licznika. Przekształcasz liczbę licznika na stringa, dodajesz na początku jakąś nazwę np.: plik i ew. na końcu rozszerzenie np.: .txt i dostajesz nazwy: plik0.txt plik1.txt plik2.txt, itd... http://main.edu.pl/pl/user.phtml?op=less...
Mały błąd się wkradł w program...mianowicie kawałek kodu był w nawiasach...wersja skompilowana w Turbo Pascalu do pliku pwm.exe w załączniku. Ps: Kompilacja do pliku exe w Turbo Pascalu COMPILE -> BUILD
Dziękuje wszystkim za pomoc!
To wiem chodzi mi o to jak zrobić to kopiowanie tworzenie pliku z tym najlepiej jako jeden program.
Imie: John Nazwisko: Kiepski Tel: 111222333 to musisz napisac program zapisujący tablicę lub rekord do pliku. Pozdrawiam. to musiałbym przerobić aktualny program czy napisać nowy który by zapisał tablice do pliku?
Najpierw musisz mieć ten plik z danymi. W tym celu tworzysz więc program, który zapisze twoją tablicę rekordów z danymi osób (co to rekord mam nadzieję wiesz) do pliku binarnego. Następny program korzysta z takiej samej tablicy rekordów i i wczytuje plik binarny do tej tablicy. Potem iteracja (przejście kolejno) po elementach tablicy (rekordach) i obliczenie...
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...
spróbuj stworzyć projekt na nowo. Jeśli masz złożoną formę, możesz stworzyć nowy projekt, zapisać go, zamknąć Buildera, skopiować zawartość pliku odpowiedzialnego za układ elementów na formie, skopiować kod. Nie kopiuj jednak niczego ponadto. Otwórz ten nowy projekt - powinieneś mieć widoczna formę i cały kod. Spróbuj skompilować. Jeśli nie przyniesie...
i teraz mi chodzi zeby to sie roznoczesnie zapisywalo do pliku ale tez wyswietlalo na tym czarnym ekranie
Mój problem polega na tym że nie mam pojęcia od czego zacząć dlatego proszę was o pomoc. Zapis ma być w pliku
Dokładnie tak, jak mówi kolega. A na dodatek zapoznaj się z instrukcją case . I gdzie pętla na czytanie kolejnych linii pliku?
więc zamiast readln otwórz plik i wczytaj z niego do tej zmiennej. Przypisz (assign), otwórz (reset), w pętli (while not eof) wczytuj (readln) do pomocniczej zmiennej, którą rozbudujesz swoją obecną zmienną (zm := zm + ...) i na koniec zamknij plik (close).
ale char to przeciez pojedynczy znak wiec program odczytajeden znak z calego tekstu... Pierwszy odczyt odczyta pierwszy znak, kolejny drugi, następny odczyt trzeci itd. aż do końca pliku Czy ktos probowal prosic o utworzenie osobnego dzialu o programowaniu (oddzielic od mikrokontrolerow by byly same C pascal,java, html itp.?? Moim zdaniem to spowoduje...
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.
Oczywiście, że tak. Do tego właśnie służą, między innymi, rekordy. Zajrzyj np. do tego tematu : . Jest to bardzo podobny temat, tylko baza danych dotyczy filmów a nie danych adresowych. Zawsze możesz coś podejrzeć :)
Skoro dopiero zaczynasz to polecam jakikolwiek kurs. Szczególnie przydatne będą tutaj informacje na temat plików binarnych oraz rekordach.
Pod tym adresem masz Turbo Pascal 5.5 http://www.pobierz.eu/p,1197/Turbo_P... a pod tym Turbo Pascal 7 http://www.dobrepliki.pl/Download-Pl...
Napisz coś podobnego do kodu który zamieszczam. Dodaj zabezpieczenie przed otwarciem nieistniejącego pliku (IOResult). [syntax=pascal] uses crt; var c,w:char; plik:text; st:string; procedure zapis; begin writeln('na pewno chcesz zapisac, a nie dopisac?'); writeln('jesli rezygnujesz z zapisu nacisnij 1, nie dowolny inny '); w:=readkey; if w='1' then...
Tablica dynamiczna rekordów, tak samo jak to się robi z listami w pascalu.
Tak jest to program dosowy, z okolo 1995 roku. Komunikat jaki mi wyskakuje to "Fatal: Can't find unit Drivers". Unit istnieje i jest podana do niego sciezka, ale jest on w postaci skompilowanej Drivers.tpu. Wydaje mi sie ze tu tkwi problem, nowsza wersja kompilatora gryzie sie z unitem kompilowanym na starszej wersji... dlatego chcialbym sprawdzic na...
string[20] w pascalu i char[20] w C to nie to samo. Pascal zapisuje długość w dodatkowym bajcie(to pewnie o nim pisałeś), no i nie kończy napisu 0. jeśli chodzi o to 0A 0D to otwieraj plik w trybie binarnym ("rb").
do usuniecia
A co powinno się znaleźć w "Interface", a co w "Implementation" oraz co z zapisem? Słyszałem, że są dwa pliki.
Witam. Ostatnio się bawię trochę bazami danych w pascalu. Mam daną tablicę 30 elementową 1d typu logicznego (boolean). I mam dwie procedury , które wczytują i zapisują dane. Z zapisem nie ma problemu , ale gdy próbuję wczytać to piszę że nie można wczytać ani zapisać danych tego typu . :/ Tutaj zamieszczam kod tej procedury : [syntax=pascal]procedure...
Pierwszy plik: ,'d:\plik.txt'); drugi plik: 'd:\plik1.txt'); uses crt; var odczyt1,odczyt:text; ch,ch1:char; begin clrscr; assign(odczyt,'d:\plik.txt'); reset(odczyt); assign(odczyt1,'d:\plik1.txt'); reset(odczyt1); while not eof(odczyt) do begin while not eof(odczyt1) do begin read(odczyt,ch); ch:=upcase(ch); read(odczyt1,ch1);ch1:=upcase(ch1); if(ch<>ch1)...
To błąd pliku wygenerowane przez Borland Pascal, poszukaj w sieci patcha na gotowe pliki exe.
Witam, mam do napisania program który odczyta z pliku dane.txt 20 liczb rzeczywistych, obliczający iloczyn tych liczb i zapisujący go w pliku wynik.txt Proszę o pomoc.
Problem tkwi w deklaracji: plik:file of string; W Pascalu max długość stringa wynosi 255 znaków. Jeżeli zadeklarujesz do zapisu string o mniejszej długości, utworzony plik zostanie uzupełniony zerami do 255. Deklaruj: var plik:text; A żeby był ładny zapis pliku, plik zapisu np: c:\test.txt Możesz też zmienić read na readln
Dwa miesiące to dostatecznie dużo czasu ;-). Jeśli będziesz miał konkretne pytania/wątpliwości, to na pewno pomożemy.
Łuk_F to niestety nie to dalej jest ten błąd Plik ma teraz skladnie : (at)ECHO OFF CLS ECHO _ ECHO _ ECHO [ 1 ]. Norton Commander ECHO [ 2 ]. Turbo Pascal ECHO [ 3 ]. Windows ECHO [ Q ]. Zakończ ECHO _ ECHO _ CHOICE /c:123Q /t:Q,10 Dokonaj wyboru IF ERRORLEVEL 4 GOTO Koniec IF ERRORLEVEL 3 GOTO Windows IF ERRORLEVEL 2 GOTO Pascal
Wykorzystaj do tego pliki rekordowe, ponieważ z tesktowymi byłoby bardzo dużo zabawy. Wygląda to mniej więcej w ten sposób, że tworzysz w Pascalu typ rekordowy, a następnie czytasz i zapisujesz takie rekordy do pliku.
Coś naskrobałęm, ale stoję przy losowym wybieraniu imion i nazwisk z pliku tekstowego. Generalnie nawet jak losuje indeks tablicy to często pole imienia lub nazwiska jest puste.
Najpierw assign(...) potem rewrite(...). Masz kawałek kodu: [syntax=pascal] const mx=15; type pp= array[1..mx]of record tytul:string[20]; autor:string[20]; wydawca:string[20]; rok:string[5]; ile_rec:integer; end; var plik:file of pp; rek:pp; ile_rec,i:integer; procedure zapis; begin Assign(plik, 'c:\bib.txt'); rewrite(plik); for i:=1 to ile_rec do begin...
Witam. Pisze tu do was, gdyż mam pewien problem... a mianowicie : zrobiłem prostą grę, a do niej mały ranking, który jest wczytywany z pliku... moje pytanie brzmi czy da się zastąpić tylko pewną część pliku a nie cały plik? np : 1. Gracz 1000 pkt 2. Gracz2 800 pkt 3. Gracz3 600 pkt i np zastąpienie Gracz2 innym tekstem i przesunięcie go na trzecie miejsce......
Witam serdecznie, Mam taki problem. Mianowicie muszę (na sobotę) napisać program (baza danych) samochodów i klientów, która ma działać jak wypożyczalnia, tzn. Możliwość wypożyczenia auta na określony czas lub ilość km. Ja napisać chciałem to w sposób taki że najpierw tworzę plik z autami, potem z klientami, i kolejno po wybraniu klienta i auta przenoszę...
Witam, muszę wczytać dwa wielomiany do programu (wykonującego dodawanie,odejmowanie i mnożenie na nich) z pliku tekstowego ,a nie mam pojęcia jak to zrobić. Mogłby mi ktoś pomóc? Da się zrobić to tak żeby w pliku tekstowym były zapisane?
Ściągałam już wiele takich plików tylko za każdym razem po zainstalowaniu nie mogłam znaleźć fpc.exe i w tym momencie jest tak samo.
Witam! mam następujący problem: Gdy w środowisku Borland TP 7.0 chcę dołączyć bibliotekę GRAPH dostaję komunikat przy inicjalizacji trybu graficznego Device driver not found (egavga.bgi) Bardzo proszę o pomoc.
Poszukuję pliku pomocy do Free Pascala 2.6 lub wcześniejszych, który moznaby podpjąć pod opcje Menu-Help, index, topic itd.. Szukałam na stronie http://www.freepascal.org/docs/docs.html do której odsyłają mnie w FPC, ale jakoś nie ma tej strony, a na innych nie mogę znaleźć takich plików. Mam TP7 ale plik turbo.tph raczej nie bedzie współpracował z...
Witam serdecznie. Muszę napisać program, który szyfruje plik szyfrem vignere'a. Najgorsze jest to, że nie mam wyobrażenia jak to może zostać zrobione. Nie oczekuję gotowego programu. Proszę o jakiś szkielet, pomysł itp. Wiem jak działa ten szyfr, lecz nie potrafię go zaimplementować w języku pascal. Będę wdzięczny za każdą wskazówkę! Pozdrawiam.
Witam. Moim zadaniem było napisanie programu w Pascalu, który zapisuje jakieś dane do dwóch osobnych plików. Wszystko ładnie napisałem, tylko kod nie chce mi przejść przez kompilatora. Spójrzcie na kod i powiedzcie, co jest nie tak? Proszę umieszczać kod w znacznikach syntax . Opcja Listing kodu .
Każde pytanie to: 1) melodia (najprościej: ilość nut + lista par nuta, czas trwania) 2) poprawna odpowiedź (tekst) 3) lista niepoprawnych odpowiedzi Można stworzyć typ rekordowy o w/w strukturze i wczytywać dane z pliku. Oczywiście należy też przygotować plik z danymi - do tego osobny program :) Można też oprzeć się na plikach tekstowych, wtedy prościej...
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,...
Proszę się pochwalić tym, co do tej pory kolega stworzył.
Witam potrzebuje program w Pascalu. program ten ma wczytać plik z wyrazami (są one ułożone alfabetycznie) i mam dodać na wejściu jeszcze jeden wyraz i program ma go zapisać w pliku (z którego wczytał pozostałe wyrazy) i ma on być w takim miejscu w tym pliku aby wszystkie wyrazy dalej były ustawione alfabetycznie (razem z tym dodatkowym). z góry dziękeję...
Ok dzięki temat zamknięty!!!
ale chodziło mi o to, jak ma być zakończony program dołączany przez dyrektywę include. Zrozum, że a) include nie jest dobrą metodą łączenia kilku "dorobków" b) pytanie jest źle postawione (częściowo). czy 'start' i 'end' dla 'slave' to nie pamiętam dokładnie (origin z cała pewnością nie), ale to DYREKTYWY FORMALNE (nie skutkujące kodem), a właściwe...
Nie załączyłeś w jaki sposób ładujesz palete do karty graficznej, ale z tego co przypuszczam wykorzystujesz bezpośrednie zapisywanie do rejestrów. Nie wiem gdzie, ale kiedyś wyczytałem taką uwage, że rejestry karty graficznej przechowujące wartość każdej ze składowych są tylko 6cio bitowe, przy czym ważne jest właśnie 6 młodszych bitów. Aby załadowanie...
A czy ten plik tekstowy leży w tym samym katalogu co EXE, a katalog roboczy nie jest wymuszony inny, niż docelowy dla pliku EXE?
Albo to powinno być jako pierwsze po begin: initgraph(a,b,' '); Albo nie masz lub masz zle ustawioną scieżkę do pliku obsługującego grafikę.
Procedura sprawdzania jest dość prosta: [syntax=pascal]const n := 10-1; {liczba elementow w tablicy(rozmiar pliku),-1 bo tablica zaczyna sie os zera} var tab[0..n] array of integer; a[o..n] array of integer; x: integer; licznik:integer; begin {------>sprawdzanie ulozenia} {najpierw wypełniasz tablicę tab liczbami, tak jak w twoim kodzie} licznik:=0;...
Jak zrobić by ten trójkąt wyswietlany zapisał się do pliku.Na zajęciach miałem takie w miare proste programy z tymi plikami.Tutaj nie potrafie zrobić tego zapisu w formie funkcji. Proszę umieszczać kod w znacznikach syntax . Opcja Listing kodu . Nieregulaminowy załącznik usunąłem.
Chce zrobić taki programik do różnych testów w pascal i chciałbym zrobić oddzielny plik text z pytaniami odpowiedziami i żeby pascal czytał mi np 1 pytanie podaje odpowiedź jeśli dobra to ide do następnego pyt. zła wyświetla jakiś komunikat a na końcu części pytań ma być podsumowanie ile dobrych ile złych i procent odpowiedzi.Da rade czy za dużo wymagam...
Zapewne to jest winne: read(ucz[a].srednia_ucznia,c... Do czego niby to powyższe miało być? Niezrozumiałe jest dla mnie również to: h1:=y[1]; h2:=y[2]; h3:=y[3]; h4:=y[4]; r1:=ord(h1); r2:=ord(h2); r3:=ord(h3);...
Turbo Pascal? Dos? Niemożliwe. Języka nie trzeba zmieniać, wystarczy środowisko (np Delphi)
Zamknij okienko i zapyta Cie czy chcesz zapisać, zapisz i później odpal plik .pas dodaj readln() przed endem i powinno pójść.
Witam! Czy wiecie jak napisać program który przpisuje z pliku txt do elementowego? Konkretnie chodzi mi o sytuację w stylu: Istnieje plik tekstowy w którym są zapisane liczby, 12 13 32 53 65. Jak będzie wyglądał program który wyszuka z tego pliku tekstowego liczby większe od 32 a następnie przepisze je (tylko te > 32) do pliku elementowego? Pomóżcie...
Zapisz je do pliku. W help'ie Pascala poczytaj o instrukcjach assign i rewrite.
Zapisać do pliku o rozszerzeniu "BAT". Uczysz się programować w Pascalu, czy obsługi TP 7.0 przy wyłączonym monitorze ? IDE i Skróty FP są właściwie identyczne, poza tym nauka samych skrótów klawiaturowych jest bez sensu - uczysz się ich w trakcie korzystania z programu, po to aby ułatwiały pracę, nie po to by móc je wyrecytować ;) Pozdrawiam, Krzysztof.
potrzebuje napisać skrypt który by usuwał dany plik po kliknięciu w link lub uruchomieniu pliku exe najlepiej żeby napisać to w turbo pascalu lub html java php zna ktoś się na tych ostanich 3 ?
pascal odczyt pliku pascal pętla sortować pascal
podłączyć telewizor philips router volvo silnika vectra błędy komputera
satel powiadamianie radiowe komunikacja radiowa satel
Jak naprawić błąd silikon eartung w urządzeniach Ilość oleju w sprężarce rotacyjnej klimatyzatora 3,5kW