Oto kilka moich wypocin napisanych w Pascalu i Delphi
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,...
Do Altium również można pisać skrypty (w C++, Pascalu i czymś jeszcze). Na stronie: https://code.google.com/p/altium-designe... znajdują się niektóre skrypty stworzone przez użytkowników.
Jak to gdzieś ktoś kiedyś ładnie napisał: "żeby pisać programy trzeba pisać programy" :) Symfonia jest bardzo przystępna, ale nie każdemu odpowiada. Możesz skorzystać z wielu darmowych kursów w internecie, chociaż nie są profesjonalnie opracowane, to da się czegoś nauczyć. Oczywiście nie zgodzę się, jakoby umiejętność programowania w Pascalu była nieprzydatna....
Nie za bardzo zrozumiałem z początku o co chodzi i jakie są twoje zamierzenia. Ale widzę, że chcesz pisać jakby nowy "Command.com". Tylko po co? Dla windowsa są programy lub kolekcje narzedzi o rozszerzonych możliwościach w porównaniu do CMD. W czystym C++ nowej konsoli windowsowej nie stworzysz, bo to będzie tak naprawdę program dla Windows. Musiałbyś...
Piszesz sterowanie klawiszami i po wcisnieciu np. strzalka w gore przesuwasz obiekt do gory zmieniajac jego wspolrzedne osi y, efekt "animacji" mozna uzyskac np. delay,
1. tak MAX232 może konwertować w obydwie strony (jest do tego stworzony) 2. nie trzeba programowo sklejać na PC w pascalu bitów w bajty (odczytujesz z odpowiedniego portu całe "przyjeżdżające bajty" ;) i tak samo wysyłasz. 3. bity startu , stopy etc - to sa tylko parametry które trzeba raz ustawić przed transmisją przez port COM ;) 4. Wspomniałeś, że...
Bardzo ciekawy projekt. Gratulacje. Czy Kolega poleciłby jakieś tutorial do nauki Pascal'a dla AVR ?. Kiedyś pisałem programy w Bascom a teraz w Arduino, ale z ciekawości chciałbym zobaczyć jak to jest w tym języku. Ze szkoły z Pascala pamiętam tylko BEGIN :) ale to było dawno... Dziękuję :-) Przygotowuję krótki tutorial dotyczący języka Pascal oraz...
W takim razie dodaję tutaj. Dzisiaj zamieszczam schemat, projekt płytki drukowanej, opis układu oraz dwa zdjęcia dające wyobrażenie, jak wygląda całość zamontowana w samochodzie. Schemat jest zapisany jako GIF, projekt płytki jest zrobiony w DOS-owym Autotraxie (do ściągniecia ze strony Protela), opis jest w PDF-ie. Do całości brakuje jeszcze najważniejszego...
Zajrzyj do drugiego topicu, ktory zalozyles
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...
Teraz jest dobrze: program dwumian; var a,b,c: real; d: real; x1,x2:real; y1,y2:real; begin write('Podaj współczynniki równania : '); readln(a,b,c); if a=0 then if b=0 then writeln('Równanie sprzeczne') else begin x1:=-c/b; writeln('Pierwaistek równania to : ',x1:0:4);end else begin...
W podanym kodzie, przy odbiciu zmienna yspeed przyjmuje wielkość ok. 30. To jest ta różnica. Ponieważ sprawdzasz warunek na początku pętli lina nigdy nie przekroczy dolnej granicy 479-~30 = 449. Powoduje to także, że przy szczycie wykresu, zmienna yspeed zmienia wartość z ujemnej na dodatnią, juz przy y=14 a nie przy y=0. Stąd bierze się górny "margines"....
Szczerze mówiąc czy się da exe zrobić to nie wiem ale zrobiłem to w delphi W załączniku jest plik project.exe jest to wersja okienkowa bo pascala nie trawię :D A tak to jest zrobione w Delphi Oczywiście operacje na liczbach całkowitych :) [syntax=delphi]var a,b,p : Integer; begin a := StrToInt(Edit1.Text); b := StrToInt(Edit2.Text); p:=(a*b); Edit3.Text:=IntToStr(p);...
https://obrazki.elektroda.pl/7656017200_... O komputerach jednopłytkowych czy stare komputery były lepsze od współczesnych platform rozwojowych i SBC? Nie lubię Arduino I to jest jak najbardziej prawda. Arduino to platforma, która miała dać łatwy dostęp do programowania elektroniki ludziom, którzy nie znają się ani na elektronice,...
https://obrazki.elektroda.pl/9103410800_... Witam. Przedstawiam wszystkim mój projekt. Projekt dotyczy sterowania domem choć to za dużo powiedziane. System składa się ze sterownika PLC Fatek z modułem komunikacji dla modbus 485 oraz TCP i układu odczytu temperatury na ATMega 32 (DS18B20). Opis projektu PLC : •PLC steruje światłem...
data: array[..] of array[..] of ...; I poczytaj o recordach.
if kompilator='Borland' then PressKey(Ctrl+F1) else URL('www.google.pl/search?q=pascal+e... Widzę, że zebrało się koledze na żarty. Ale tak na poważnie : http://obrazki.elektroda.net/43_12661588... I proszę nie zapomnieć ograniczyć pamięci zajmowanej przez program 'master', bo inaczej nie program 'slave' nie uruchomi się...
Siema! Ogarniam procedury i funkcje w Pascalu. Zrobiłem program, który wyświetla wszystkie liczby parzyste od 2 do 222 przy użyciu procedury. I tu moje pytanie, który kod jest poprawny? Tzn. wszystkie te programy działają, ale jak to powinno w miarę profesjonalnie wyglądać? 1.[syntax=pascal]program liczby; uses crt; procedure petla; var i:byte; begin...
Trzeba było od razu napisać, że dostałeś taki kod na kolokwium, bo to zmienia postać rzeczy... oraz moje zdanie na jego temat. Teraz twierdzę, że kod jest prawie genialny w swoim zagmatwaniu i pewnie też taki miał być w zamyśle tego, kto to układał. Ale do rzeczy. Wbrew temu, co Ci się wydaje ostatnia i zresztą jedyna operacja zapisu do zmiennej tablicowej...
Tak. Te programy powyżej są złe. Potrzebuje program przykładowo podaje liczbę 2 i otrzymam wynik 4. Jest ktoś w stanie przysłać mi taki program?
Oba programy wyświelą ten sam tekst na czarnym tle, z tym że drugi najpierw wyczyści ekran,a potem wypisze tekst.
Zgłaszany błąd to "niezgodność typów". Masz zadeklarowaną zmienną "a" typu word, czyli całkowitego a przypisujesz do niej wynik działania funkcji "exp". Ona z kolei zwraca wartości type real - rzeczywiste. Zmień typ zmiennej "a" na real i będzie OK. Brakuje jeszcze średników i "end;". Dołączam poprawiony program
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...
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ę...
Tak jak napisales ten program jest latwy. Ale nie wiem co sobie trzeba w nim przypominac. Skoro jesli nie pamietasz wzoru na wyznaczenie prostej wystarczy toworzyc tablice. Wczytanie 6 zmiennych - obliczenie parametrow a i b (pierwsze 4 parametry) funkcji postaci y=ax+b. Podstawienie do funkcji 5 parametry i porownanie y z 6 parametrem jesli y=6.par...
Właśnie nie potrafię rozróżnić po co deklarować w procedurze zmienne skoro deklarujemy je na początku programy po uses crt; Przyznam szczerze, że nie rozumiem tego. Dodano po 1 Do tego pisałem przecież nie na darmo, aby opcje pozostawić w programie głównym, po co wyważać otwarte drzwi ? Na procedury zrzucić jedynie przeliczanie. W CASE pozyskiwać potrzebne...
Ehh mam problem, strasznie duży problem, jestem uczennicą gimnazjum i wiem że nie wszyscy będa chcieli mi pomóc bo jestem za młoda itp ale w was moja ostatnia nadzieja. Z komputerem na tyle na ile jestem obeznana znam html umiem obsługiwac niektóre programy ale niestety to nie wszytko bym miala 5 z informatyki, potrzebuje zrobic PROGRAW W FREE PASCALU...
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...
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
Witam Zmodyfikowałem program który napisałeś. Jakby jakieś pytania to pisz. Pozdrawiam.
Albo zrobic zeby czekal po wykonaniu odpowiedniej liczby petli na jakis klawisz, i dopiero wtedy pojdzie dalej.... program lottomat; uses CRT; var i,j,k,n,s,x,OK:integer; A:array[1..100,1..6] of integer; {......tablice......} B:array[1..49] of integer; {... tablica statystyk...} enter: char; begin...
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.
Żeby sterować portami pod XP trzeba je odblokować dość dawno bawiłem się LPeTem i programy w C++ ze wstawkami asemblerowymi nie chciały mi działać bo wyskakiwał komunikat "privileged instruction" w załączniku jest program UserPort odblokowujący porty w XP wraz z pdf-em i mój mały programik testowy do LPT :) u mnie działa ale nie gwarantuje że na innym...
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...
Zmienna globalna, inicjujesz na początku programu.
Jak uruchamia się zewnętrzne programy z delphi. W Pascalu było chyba "exec" a jak to zrobić w Delphi ? Przeglądałem pobierznie helpa ale nic mi nie wpadło w oko. Dzięki za zainteresowanie. Pozdrawiam.
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.
Najpierw zapisujesz plik z kodem (F2, albo file->save), a następnie kompilujesz (F9, ew. compile->make). Plik exe pojawi się tam gdzie był zapisany plik z kodem (.pas)
Schemat blokowy ;) http://pl.wikipedia.org/wiki/Schemat_blo... Teraz pokaż co stworzyłeś :D
dopisać przed ostatnim end-em instrukcję readkey; albo readln;
czyli nie ma możliwości podłączenia żadnego przekaźnika? Jest możliwość tylko przekaźników nie włączasz bezpośrednio do portu tylko przez transoptory. Potrzebujesz do tego dodatkowego zasilacza, ale nic nie stoi na przeszkodzie wykorzystać nieużywane złącze zasilacza w komputerze.
Spróbuj takiego kodu : [syntax=delphi]program Project2; {$APPTYPE CONSOLE} uses SysUtils, windows; var a,b,c,o,p,d,z : extended; begin writeln('Kalkulator obliczania miejsc zerowych funkcji kwadratowej.'); writeln('*******************************... writeln('Wzor funkcji: ax^2 + bx + c'); writeln('***************************');....
// 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;...
dopisać readln;
kiedys dawno pisalem proste programy w pascalu baze umie zrobic, port wysterowac tez no ale paskal to przezytek PASCAL nie jest przeżytkiem... jak go znasz nawet w podstawowym stopniu to masz możliwość napisania programu w Delphi czy Delphi Prism. Ten drugi jest językiem o możliwościach identycznych jak C#. Wypadało by podać co to za sterownik masz...
Dzięki, choć nie chodziło mi o takie "kombajny" jak AIDA. Znalazłem jakieś przykładowe programy w Tubo Pascalu i jeden z nich to to czego szukałem. W związku z powyższym temat zamykam
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}...
no wlasnie mam, i programy sie odpalaja tyko ze nie moge np pisac w tubro pascalu i innych dosowskich programach jakie mam i jakie wczesniej mi dzialaly.
miałem to wszystko na pierwszym semestrze. tu masz linka do materiałów z wykładów: http://www.zpcir.ict.pwr.wroc.pl/~witold...
Mam problem muszę napisać program w którym jest narysowana prosta na podstawie dwóch współrzędnych względem osi liczbowej i jej błąd czyli dwie kolejne proste?? Miej więcej ma to wyglądać tak ale jak to w ogóle w pascalu zrobić. Acha współrzędne mają być podane w programie przed kompilacją. Pomocy nie wiem jak to zrobić jak ktoś ma coś takiego to bardzo...
czesc, jest ktoś w stanie pomoc mi przy tym kodzie? Mam do napisania 3 programy, napisałem je odzielnie, ale mają stanowić jeden główny program, oczywyście po połączeniu razem nie działają, aplikacja nie chce przejść pierwszego end; //Program do zadania nr 1 program Rok_przestepny; uses SysUtils; //funkcaj jaka zostala zastosowana do zadania function...
Mam napisac programw pascalu który bedzie liczył pole kwadratu, prostokąta, rombu i trojkąta równobocznego, na poczatku programu ma sie wybierać jaka figura, potem podac boki czy co tam potrzebne dla danej figury, a na koncu ma sie pytac czy ponowic obliczenia, dziekuje z góry za pomoc :)
Cześć, jestem początkującym w tym temacie a mam napisac taki oto program i nie wiem jak zrobic, by wczytywało litery i znaki, a potem jeszcze ułożyc równanie na tej podstawie. Z góry dzięki za pomoc. Dane są dwie liczby rzeczywiste x i y oraz znak określający operację arytmetyczną, który może być równy: ‘+’, ’-‘, ‘*’...
Siemanko...Chciałbym sie zapytac was w jakim programie robi sie pascala...i jak to sie robi??
program trojkat; uses Crt; var a, b, c,p, pole: real; begin WriteLn('Jest to program na obliczanie !'); write('Podaj a'); readln(a); write('Podaj b'); readln(b); write('Podaj c'); readln(c); p:= (a + b + c)/2; pole := sqrt(p*(p - a)*(p - b)*(p - c)); WriteLn('Pole trojkata o bokach a=',a:0:2, ',b=', b:0:2, ',c=', c:0:2, ',wynosi p=', pole:0:2); Writeln('...
Witam Mam pewne zadanko z którym usiłuję sobie poradzić Mam napisać "prosty" program w pascalu. Wprowadzamy z klawiatury liczbę rzeczywistą, program drukuje reszte z dzielenia przez 7 w ten sposób "Reszta z dzielenia liczby .... przez 7 wynosi ... " program aaa; uses crt; var a : real; Begin clrscr; writeln ('podaj liczbe rzeczywista');...
Witam, postanowiłem zainteresować się językiem Pascal i zastanawiam się, czy byłaby taka możliwość, żeby napisać program chroniony hasłem, który przy pierwszym uruchomieniu prosiłby użytkownika o podanie hasła, zapamiętał je (najlepiej w formie zaszyfrowanej, bo wiadomo, że dla kogoś kto "siedzi" w temacie nie będzie problemem wyciągnąć hasła z kodu...
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. 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...
Stworzyłem kalkulator w programie Free Pascal, i po jego kompilacji program działa nieprawidłowo. Nie mam pojęcia co zrobiłem źle, jestem początkujący i dlatego to pytanie kieruje do innych specjalistów z tego tematu. Wstawiam napisany przeze mnie kod. [syntax=pascal] program kalkulator; var a, b, c, d, e: integer; begin write ('Chcesz wykonac odejmowanie...
Witam, czy może mi ktoś pomóc w narysowaniu schematu blokowego tych 2 programów? Pozdrawiam serdecznie i z góry dziękuję. program 1: Program Zgadywanka; uses crt; var pr,li,a,b,x:integer; c:char; label new,zle; begin new: clrscr; randomize; li:=random(70+1)+10; pr:=0;a:=10; b:=80; repeat pr:=pr+1; writeln('Podaj...
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...
Chciałabym zrozumieć grafikę w pascalu. Czy ktoś może po kolei opisać jak się co robi i podać jakieś przykładowe zadania mogą być z rozwiązaniami. Nie chodzi mi o zadanie typu narysuj koło tylko bardziej rozbudowane np. koło wpisane i opisane na kwadracie poruszające się ze środka ekranu w któryś z rogów i do tego koła obracające się na tym kwadracie...
Nie moge dokończyć algorytmu strassena w pascalu, oto kod źródłowy: !!!!!!!!!!!!!!!!!!!!!BARDZO PROSZĘ O POMOC!!!!!!!!!!!!!!!!!!!!! PROGRAM Strassen; TYPE X1=ARRAY Dodano po 4 Chodzi mi o to żeby np. w takim wierszu: p Dodano po 1 .........poprostu jak zrobić zamiast + żeby była procedura dodawania, zamiast * procedura mnożenia....... :-)
Witam, dopiero zaczynam pracować w Pascal Borlandzie i odrazu dostałem takie zadanie: "Program wykonujacy operacje macierzowe: dodawanie, mnozenie, odejmowanie" kompletnie nie wiem o co chodzi, napisałem jeden programik ale nie wiem czy o to chodzi, może ktoś spojrzy i pomoże.
Witam! Musze napisać program w Pascalu znajdujący rozwiązanie równania Ax+B=0 ze sprawdzeniem poprawności wpisania danej A. Niestety nie znam się ani na matematyce ani na programowaniu.. :( Nie wiem jak wygląda rozwiązanie takiego równania nawet.. Czytam juz o programowaniu w Pascalu ale na razie jestem zielony.. czy ktoś mi pomoże... ? prosze.. 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.
programy turbo pascalu programy pascalu ascii tablice pascalu
schemat oleju astra elektryczne nawigacja wince
euroterm nitromix boardview toshiba
Łożysko dmuchawy Vaillant ecoTEC 226/5-3 – typ, rozmiar, wymiana Salus Controls 091FLRFv2 – błąd -40, diagnostyka i naprawa czujnika NTC w termostacie
