Skoro Kurs 90 (dla tych co nie kojarzą to niemiecki system sprzedaży biletów kolejowych który w Polsce żyje od bodajże 1994 roku non stop choć ostatnio dorobił się już pełnej graficznej nakładki) można tyle lat trzymać przy życiu to pewnie jeszcze jakieś stare Subiekty4 czy inny specjalizowany soft może się trafić. Ostatnio miałem taki do pewnego sprzętu...
mowisz i masz (w pascalu i metoda najmnijeszych kwadratow):
Mam parę starych programów napisanych w Turbo Pascalu (niestety dość dla mnie ważnych). Programy działały bez problemu na starych maszynach 486, K6-233 itp. Niedawno zdecydowałem się jednak na wymianę sprzętu na nowoczesny :-) Celeron 450. Przy próbie uruchomenia programów komputer wyświetla błąd w rodzaju: 'runtime error at.....' Słyszałem, że winę...
Może Wiecie na jakich stronach mogę znaleźć gotowe programy pod Turbo Pascala?
Delphi to pascal . Praktycznie wszystkie programy napisane w paskalu są kompilowane i uruchamiane w Delphi . Różnica istnieje w pewnych typach .Np. w pascalu typ ineger był 16 bajtowy natomiast w delphi od wersji 2 jest 32 bajtowy .Tak samo w pascalu real był 6 bjtowy ( odpowiada to w delphi real48) natomiast w delphi jest traktowany jako double . Tak...
czy da sie ten programik przerobic na inna forme tz chodzi mi o to aby nie byl tak samo napisany ale zeby robil to samo <mam nadzieje ze wiecie o co chodzi> program PIRAMIDKA; uses Crt; {uzycie biblioteki Crt} var wiersze,i,j:integer; {deklaracje zmiennych} znak:char; BEGIN clrscr; write('Wprowadz znak do rysowania...
witam, na zajęciach robiliśmy program powodujący miganie lampek na klawiaturze, do tego użyliśmy rozkazu EDh, teraz mam napisać programik identyfikujący klawiatur (ID) za pomocą rozkazu F2h. Oczywiści te programy nie działają w TP uruchamianym z pod Windowsa, do tego używamy Pascala startującego z dyskietki przy włączeniu kompa. Dla przykłady podam...
Ponieważ idzie to po RS-ie więc i PC i Kafka muszą mieć ustawione te same prędkości transmisji. Mam dwie takie drukareczki i bez problemu programy napisane w Turbo Pascalu komunikują się z nimi.
// w tym miejscu stoję, wymyśliłem pewien algorytm ,że liczba pierwsza to taka która (a mod 2) będzie <> 0 oraz ,że liczba a nie jest podzielna przez żadną z liczb aż do a-1.. Pomyślałem ,żeby zwiększać i=i+1 i znowu sprawdzić czy a mod i=0 Ten pomysł jest dobry, sprawdź taki kod (spróbuj to dokładnie zrozumieć): readln(n); a:=2;...
najbardziej prostackie rozwiazanie jest takie program blablabla; var a,b,c: integer; begin readln(a); readln(b); readln(c); if a>b then if a>c then writeln('najwieksza jest:',a); if b>a then if b>c then writeln('najwieksza jest:',b); if c>a then if c>b then writeln('najwieksza jest:',c); readln; end. i jesli sa to twoje poczatki to zacznij od tego,...
Instrukcja zawarta w pliku rar W udostępnionym przez kolegę archiwum nie ma żadnego pliku rar. Poza tym ten plik poprawek został przetestowany z programami pisanymi w języku Borland Pascal 7 oraz Turbo Pascal 7. Nie był testowany z Turbo Pascalem 6. Patch ten usuwa błąd wykonania 200, który występuje na komputerach z procesorami wyższymi niż Pentium...
Kto z wsz potrafi sterowac portem lpt przez programy pisane w TP? Potrzebyje wysyłać 10 Bitów (równolegle) i odbierać 3. Chce napisać program do sterwania robotem. :twisted:
Witam Posiadam dwa wymienione w temacie kompilatory których używam na przemian. Uczę się pisać proste programy z książek o programowaniu w Turbo Pascalu.( które są dosyć stare ) Jak do tej pory szło mi wyjątkowo dobrze ale natrafiłem na pewien problem. Niektóre przepisane z książki programy nie chcą się kompilować na free Pascalu. Natomiast na Turbo...
Prosty to prosty :) tylko nie pamiętam jak przerwac pętle porównująca liczby tam gdzie jest znak zapytania ale to moze sama cos wymyslisz bo ja nie robiłem notatek i teraz nie pamiętam jak to leciało :)
witam mam pytanie apropos robotów więc mam 15lat i jóżo od dziecka bawiłem sie bateryjkami (np. zrobiłem silniczek elektryczny) od niedawna programuje w turbo pascalu (programy typu jak sie czujesz i odp.) i mam pytanie chce wźiąśc się za waldka i po waldku chciał bym robota do zaprogramowania i teraz moje pytanie czy mógłby ktoś pokazac jak wydłądają...
litery inne niż małe: możesz zrobić tak: program test; uses crt; procedure test_znak; var ch : char; begin repeat writeln('Podaj znak do zakodowania: '); ch := readkey; until (ord(ch) >= ord('a')) and (ord(ch) <= ord('z')); writeln('Podales: ',ch); end; procedure test_liczba;...
Spotkałem się z pascalem dla PIC. Można ściagnąć wersje 30 dniową. Charakteryzuje się tym, że spotkana jest składnia Pascala np if then , pętle itp. Ulatwiona jest obsługa pinów i portów w stosunku do asm. Sa zawarte przykładowe programy i to co zajmuje w asm troche czsu w Pascalu jest szybsze. Polecam dla początkujacych. Osobiscie jednak pisze pod...
Niektóre programy pracujące w trybie tekstowym DOS są tak napisane, że zamiast migającego tekstu jest jasne tło, czyli zarówno kolor tła jak i kolor tekstu może być wybrany spośród całego zestawu 16 kolorów. Takim programem jest na przypład edytor DOS wywoływany poleceniem "edit" z wiersza poleceń. Na jakiej zasadzie to jest zrobione i jak to można...
raczej ciężko będzie coś takiego znaleźć. język C++ jest o wiele bardziej rozbudowany niż Pascal. o ile programy napisane w pascalu można prawie zawsze napisać w C++, to tylko nieliczne napisane w C++ można przedstawić w postaci równoznaczego kodu pascal.
Pozostaje jeszcze kwestia programu, którego w życiu nie pisałem i nie wiem jak to zrobić. Dwa przyciski do sterowania, każdy jakby do jednej części tego wyświetlacza ? Masz podane, że uczęszczasz już do trzeciej klasy technikum mechatronicznego. Nie rozumiem jak w takiej sytuacji można nie pisać dotąd żadnego programu. Ja pisałem programy w Turbo Pascalu...
Jest tu: http://www.elektroda.pl/rtvforum/topic33... Sciągnałem wszystkie programy z tamtąd, ale nie znalalem niczego interesującego, mi trzeba właczyć urządzenie przynajmniej 5 razy dzienni i wylaczyc. Ryski napisał: Tak w pascalu umiem. A czy bylo by proste napisanie czegos takiego pod dosem ? Może kolega precyzyjniej napisze, jak należy rozumieć...
Turbo Pascal-nie, ale Turbo Delphi już tak. Ja zaczynałem od PASCALA (tak naprawdę to na studiach od ALGOLu 60 i Fortranu, ale większość moich programów napisałem w PASCALu i asemblerach) od Turbo bodajże 1.0 pod CP/M (słyszeliście o takim systemie :?: ) 3.0...7 pod DOS , HISOFT PASCAL na ZX SPECTRUM (kompletny kompilator pascala z edytorem w ok. 20...
TO zależy co ma robić Twój program. Standrdowo na dyskietce muszą zostać (i to w odpowiednich sektorach fizycznych) msdos.sys, io.sys, himem.sys, command.com - jeżeli planujesz korzystać z interpretatora poleceń, no i plik bat Inne pliki z dyskietki startowej to "dodatki": obsługa CD, myszki, klawiatury z polskimi znakami itd. Pisanie systemu to chyba...
Dane "odzyskane". Z jakiegoś powodu tego dysku nie potrafił zobaczyć ani Win 10, ani Win XP. Dopiero Win98SE sobie poradził, i o dziwo, bezproblemowo załadował system plików, bezproblemowo zgrałem dane na inny dysk. Innymi słowy odzyskałem dziesiątki napisanych przez siebie prorogramów (w Turbo Pascalu ;-). Pisanych dokładnie 20 lat temu, jeszcze w...
Pascal to byl pierwszy jezyk progr. jaki poznalem. Napisalem w nim pare fajnych programow, gier, np. kolo foruny (okolo 2000 linii), z wykorzystaniem myszki w trybie graficznym, robilem swoje okienka jak w windows (mowie o zwyklym pascalu nie delphi). Pozniej sie przesiadlem na C i z tego wzgledu, ze ten jezyk ma np. wiele ciekawych uproszczen np. zapis...
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);...
moja pierwsza instalacja windy szla z dyskietek, na bank sie da, jak zajrzysz do katalogu instalacyjnego to poszczegolne *.cab'y mają po ok.1,3mega - to znaczy ze jest to przystosowane do dyskietek jesli potrzebujesz tylko takie proste rzeczy, to moze latwiej prościutki programik nawet w BASIC'u albo TURBO PASCALU napisać to jest naprawde kilka linii...
[syntax=pascal]Program xyz; uses crt; Var cyfra:integer; odp:char; Begin clrscr; Write('Hello, podaj cyfre 4'); Readln(cyfra); if cyfra =4 then writeln('tak to cyfra 4'); if cyfra <>4 then writeln('ty kretynie to nie cyfra 4'); delay(3000); Write('czy 4+4 to 8?'); Readln(odp); if odp ='t' then writeln('brawo, Enstein z ciebie'); if odp <>'t'...
Brakuje średnika na końcu w trzeciej linijce od dołu
Załączam 2 programy do obsługi RS-232 w Turbo Pascalu. Są to programy terminalowe, ale uproszczone w ten sposób, że najpierw jest wczytywane polecenie z klawiatury, wysyłane do modemu, a potem wypisywana jest odpowiedź modemu. Można więc wykonać jedno polecenie AT. Programy operują na portach (bez BIOS'u), jeden z użyciem przerwań, drugi bez. Niestety...
jak stworze w pacsalu turbo jakis program to jak go mam zapisac zeby działał?? bo gdy zapisuje powstaje plik z koncówka .pas i to niechce sie właczyc co mam zrobic??
while 1=1 do zmień i zobacz dawno pascal'a nie używałem Pozdrawiam!
Witam ponownie:) tym razem mam inny problem z programowania... polecenie jest takie- Napisz program rysujący na ekranie prostokąt z dowolnych znaków i wysokości zadanej przez użytkownika. Otóż samą ramkę gdzie w kodzie od razu podaje dane potrafię zrobić za pomocą 'gotoxy'. Dodano po 3 NAPEWNO DODAĆ ZE DWA WRITELNY:) Proszę poprawić temat postu. Na...
Witam :) Napisałem kalkulator w Turbo Pascal, ca dalej muszę zrobić by powstał program .. ?
Witam. \ Chciała bym prosić o pomoc w zadaniu z tp. Byłam dopiero na drugiej lekcji z "psiaka" i wiele straciłam a nauczyciel zlecił następujące zadanie: użytkownik wpisuje dowolną liczbę większą od 0 i mniejszą od 42 ze zmienną REPEAT Pętla ma się obrócić dokładnie tyle razy ile wpisał użytkownik (np. 5) za każdym razem pobierając do tablicy: imię...
Jestem początkujący, więc nie śmiejcie sie ze mnie :) Wymajstrowałem coś takiego: program liczenie_pola; uses crt; var a,b,h,r,decyzja: procedure; kwad: begin writeln('Podaj dlugosc; boku i wcisnij Enter:') readln('a') writeln(a,'*',a,'='a*a); end; procedure pros; begin writeln('Podaj dlugosc; boku a i wcisnij...
potrzebuje do szkoły program napisany w T.Pascalu4.Może któryś z szanownych kolegów posiada coś w swojej bibliotece.Oto tematy: -prog.rysujący 6 liczb z 49; -prog.rysujący wykres słupkowy 3D(tryb graf.) dla dowolnej ilości danych pobieranych z pliku zewnętrznego; -prog.pokazujący symulację wystrzału armatniego(tryb graf.) Oczywiście chodzi o jeden z...
Witam. napisałem prosty program do rysowania torusa pod windowsową konsolą. Działa to na zasadzie rzutowania na ekran przestrzeni R^3 e której torus opisany jest parametryzacią w zależności od 2 parametrów. Problem polega na tym że torus "źle się rysuje". domyślam się że problem leży gdzieś w zmianie znaku funkcji trygonometrycznych ale nie bardzo wiem...
Nie wiecie gdzie mogę zdobyć program prostego kalkulatora : dzielenie, mnożenie, dodawanie itp. najlepiej z jakimś krótkim opisem kodu. Z góry dziękuje i pozdrawiam.
Witam, Tak to znowu ja :D Jak zwykle probami staram sie dojsc do celu, ale znowu napotkalem przeszkode, napisane przezemnie programy nie dzialaja, gdzies musi kryc sie blad :( Prosil bym o ew. poprawienie :) Pozdrawiam program pola,v2; uses crt var figura: byte; var pole, a, b, h, r: real; begin clrscr TextBackGround(black); clrscr;...
Jak najszybciej potrzebuje rozwiązanie tych dwuch zadań w języku Turbo Pascal: 1. Napisz program, który czyta liczbę naturalną n, 1<n<=10, w tablicy dwuwymiarowej tworzy tabliczkę mnożenia dla liczb naturalnych z przedziału Wskazówka Trzeba zadeklarować tablicę dla najwiekrzego n, czyli 10. a w programie korzystać z jej części odpowiednio do wczytanej...
Jakie są różnice między Borland a Turbo Pascalem? Mam książke do pascala i ona jest przystosowana do Turbo Pascala a ja chciałbym programować w Borland (7.0). Jedyną różnice jaką znam to ta ze aby załączyć biblioteke dla monitora to w Turbo- Piszemy Uses CRT; Borland- Uses WinCRT; Ale np. nie mogę w borland włączyć trybu graficznego, nie mogę uruchomić...
Witam Program działa na zasadzie rekurencji. Procedura LiczbaSlownie wywoływana jest tyle razy ile cyfr ma liczba. Dla liczby np. 123 będzie to nastepująco 1. wywołana jest procedure w programie głównym z parametrem 123. 2. Jeśli liczba jest wieksza od 9 to wywolywana jest ta sama funkcja ale już z parametrem 123 div 10 czyli 12. a) Jeśli liczba jest...
A wiec mam do zrobienia kilka zadan w TP, jestem poczatkujacym w tej dziedzinie dlatego prosiłbym o pomoc w napisaniu takich programów: 1) Wylosować 20 liczb i posortowac je metodą bąbelkową. 2) Na posortowanej wczesniej tablicy zastosowac wyszukiwanie binarne. 3) Napisz program zamieniający miejscami dwa wskazane wiersze tablicy dwuwymiarowej 4) Napisz...
Witam, mam program napisany w Pascalu i nie mogę go odpalić w Delphi wyskakuje błąd Runtime error 105 at 0040B1A0 program macierzowy; uses crt; const N=10; var r,i,j:integer; tab:array[1..N,1..N] of integer; suma,dzielnik:real; nazwa:string; plik:text; begin r:=0; Repeat ClrScr; TextColor(white); Writeln('Podaj...
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;...
potrzebuje waszej pomocy w zaliczeniu w szkole mam do wykonania program "Kalkulator z menu który dodaje, odejmuje,mnoży , dzieli, liczy silnie, dzieli 2 liczby, sume i srednia n liczb, liczy pole powierzchni: trójkąta,koła, kwadratu" był bym wdzieczny gdyby mi ktos pomógł:cry:
Siemanko...Chciałbym sie zapytac was w jakim programie robi sie pascala...i jak to sie robi??
Witam! Nie wiecie gdzie mógł bym znaleźć kompilator do Turbo Pascala w wersji okienkowej, a nie pod DOS-a?? Bo nigdzie nie mogę go znaleźć, a wiem że kolega na studiach pisze właśnie na nim.
najpierw w petli musisz wypelnic tablite wartosciami od 1 to 50 : for i:=1 to 50 do x[i]:=i;
Proszę bardzo :[syntax=pascal]program losowanie; const dolny_zakres = 20; gorny_zakres = 59+1; {sprawdz skad te +1, bo nauczyciel na pewno zapyta} ile_liczb = 20; var x,liczba : integer; begin randomize; for x:=1 to ile_liczb do begin liczba:=random(gorny_zakres-dolny_zakres... write(liczba,','); end; writeln; end. [/syntax]
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...
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
Mógłbyś mi powiedzieć, który dokładnie warunek jest źle zapisany? Zależy mi na tym aby schemat w całości odpowiadał temu co jest zapisane w kodzie programu.
Random(100);
Skompilowany program.
Poszukaj na www.4programmers.net Tam coś takiego widziałem. a dokładniej to tu http://4programmers.net/file.php?id=1487 :) pod delphi co prawda ale to to samo
1. Co nie chce działać? 2. Jakie były założenia? 3. Jeśli robisz przedziały rozłączne, to radzę stosować instrukcję else w celu ograniczenia ilości sprawdzanych warunków.
Hmmm... no chyba, że chcesz stworzyć idealną kopię programu w Delphi, to odpalasz new->console application, robisz ctrl+c, ctrl+v i cieszysz się, że program kompiluje się pod Delphi... bo prawda jest taka, że większość prócz BGI zostało przeniesione z TP do Delphi, wiec nie powinienes miec wiekszych problemow z kompilacją...
Możesz zrobić na dwa sposoby rekurencyjnie albo w pętli, oba wg wzoruk książkowego.
To może umieść swój kod to podpowiemy co zmienić...
Witam. Potrzebuję na informatykę następujący program w Pascalu. Zadanie: 1. Musi to być test wyboru (a, b, c, d) gdy wybierzemy jedną odpowiedź to pytanie znika i pojawia się następne. 2. Licznik wyświetlający, który jest aktualnie numer pytania i ile zostało zaznaczonych poprawnych odpowiedzi. 3. Gdy dojdziemy do końca pytań to program wystawia ocenę....
temat z kosza:p http://www.elektroda.pl/rtvforum/viewtop... cały działajacy program uses crt; var i,m,n,p:integer; begin clrscr; write('Podaj m: '); readln(m); write('Podaj n: '); readln(n); write('Podaj p: '); readln(p); for i:=m to n do if (i*i) mod p=0 then writeln(i); readkey; end.
Ten twój kod działa bez problemu. No chyba, że wpisałeś do kodu tę gwiazdkę ' * ' na początku. Usuń ją razem z całym wpisem : * P000.PAS , to nie jest cześć kodu programu. Następnym razem proszę używać znaczników CODE , żeby było wiadomo gdzie kod się kończy, a gdzie zaczyna.
Może, jeżeli pewnie czujesz się w Pascal-u, to próbuj "przesiąść" się na jakąś Windows-ową wersję tego języka. Masz do wyboru; komercyjne Delphi lub darmowego Lazarus-a. W ten sposób, po niewielkich przeróbkach, możesz swoje programy z Turbo/Borland Pascal-a przenieść na platformę Windows. Abu od razu uciąć wszelkie dyskusje na temat : o wyższości C...
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...
"i na koniec repeat " Czy powyższy wiersz znajduje się w kodzie programu? I co to znaczy nie chce działać? Nie kompiluje się, czy nie działa gotowy program?
turbo pascalu programy pascalu pytania turbo pascalu
marek sondę brotje opinie dobra serwisant
Zamiennik głośnika Wharfedale 0326H - porady i opcje Lokalizacja przycisku zasilania w telewizorze Sony 2018
