pascal pierwsze

Turbo Pascal, program ma wypisywać liczbe pierwsze.

// 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;...

Pascal - rozkład na czynniki pierwsze, błędy w kodzie, niepoprawne wyjście

Właściwie było nieźle, wystarczyło to uruchomić i poprawić. Teraz jest tak: [syntax=pascal] program project1; var n, k, k1: LongInt; begin Readln(n); k := 2; k1:=-1; Write(':'); while n > 1 do begin while n mod k = 0 do begin n:=n div k; k1:=k; end; if k1 = k then Write(' ',k); k := k+1; end; WriteLn; ReadLn; end. [/syntax]

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

[PASCAL] Jak napisać funkcję zwracającą liczby pierwsze w tablicy?

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....

Jak napisać funkcję zwracającą liczby pierwsze w C i Turbo Pascal 7.0?

http://www.dzyszla.aplus.pl/programy_i_t... = w C

Pascal: Wczytywanie trójek liczb o sumie będącej liczbą pierwszą

no to jeszcze mała optymalizacja wynikająca częściowo z założeń autora (tylko czemu pierwiastek, a nie połówka? To nie sito!), przy okazji znacznie wydajniejsza: function Czy_Liczba_pierwsza( x: integer) : boolean; var idx : integer; begin if x in [0,1] then {sprawdzamy czy podana liczba to 0, 1} begin Czy_Liczba_pierwsza:=false;...

[Turbo Pascal] Błąd w kodzie szukającym liczb pierwszych w Turbo Pascalu - jak go znaleźć?

Tak zapisana funkcja ma wadę, na moim komputerze sprawdzenie czy 2.000.000.011 jest pierwsze zajęło minutę i 22 sek. długo...., podobnie długo trwało sprawdzenie liczby 2.000.000.012, a przecie już po chwili wiemy że liczba ta pierwsza nie jest. Pewnym ulepszeniem będzie: . pier:=false; . if not odd(L) then EXIT; . for i:=2 to L-1 do . . if L mod i...

Pascal - Wypisuje tylko 4 pierwsze, następne tylko po enterze, co jest?

Pętla while obejmuje Ci jedną linijkę. Ten program powinien się zawiesić, więc omówione wyniki nie są zgodne z tym kodem programu. Przy okazji bardziej polecałbym sczytywanie po linii, czyli readln Zapisz też kod w znaczniku [ syntax ] tu na Forum.

[PASCAL] Jak pomnożyć wartości z trzech stringów w Pascalu?

Ale czemu uparcie używasz stringów? http://cpw.net.pl/pascal/kurs/13,105/ http://www.pascal.eu.org/lekcja0.htm Jak widać znajomość i świadomość istnienia typów to nawet nie pierwsza lekcja. To lekcja zerowa!

Pascal: Program rozkładający liczby na czynniki pierwsze z użyciem pętli while

Witam! Dopiero zacząłem przygodę z Pascalem i mam problem z pewnym zadaniem. " Napisz program rozkładania dowolnej liczby na liczby pierwsze, który po wczytaniu liczby z klawiatury wyprowadzi komunikat - liczba pierwsza/liczba złożona - stosownie do sytuacji. Wykorzystaj pętlę while". Z góry dziękuję za wszelką chęć pomocy :) Obrazki wstawiamy wg

Robot internetowy w Pascalu - czy obsługuje wyrażenia regularne jak PHP?

Po pierwsze, w Pascal-u, to niewiele napiszesz. Może chodzi Ci o OOP czyli Delphi lub Lazarus-a ? Po drugie, co to znaczy wg. ciebie "wyrażenie regularne" ?

[Pascal] Dwie tablice, wyszukiwanie minimum i sortowanie "kopiowaniem"

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...

Polecane programy edukacyjne dla 4-latka do nauki liter i cyfr

Musiałbyś przejrzeć archiwalia tego co Optimus Pascal wydawał - jakieś "Moje pierwsze ABC" czy "Moje pierwsze zabawy matematyczne 1, 2, 3".

[PASCAL] Tworzenie i obsługa dynamicznej tablicy rekordów tosoba

Brawo. To dokładnie miałem na myśli. To prehistoria, więc na tamte czasy więcej niż dopracowany. To co napisałem nie miało dotyczyć jednak wcześniejszych maszyn niż PC (swoją drogą 8086 był 16-bitowy), dlatego napisałem o tym ograniczeniu. Na ICL1900/1305 też było ograniczenie pamięci (musiało być), ale całkiem inaczej robione. Najpopularniejszy chyba...

Tworzenie bibliotek DLL w języku C i odwoływanie się do nich

Witam ponownie! W swojej pracy korzystam z kompilatora Pelles C w którym czuję się najlepiej, a tenże nie jest kompilatorem C++ stąd te trudności w obudowywaniu dyrektywą extern "c" itd. Interesują mni JEDYNIE odpowiedzi w języku polskim. Mam teraz kolejne pytanie: w linku podanym mi przez Kolegę stanleysts znalazłem podstawy budowy DLL i bardzo mi...

[PASCAL] PASCAL – sortowanie zbioru liczb metodą wyszukiwania maksimum – przykładowy kod

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...

Gdzie znaleźć kurs Delphi dla początkujących po polsku?

Sebastian_P, nie ma co zaczynać od pisania głupich programików. Jeżeli jesteś zdecydowany, wal z grubej rury :d. Jako, że nie podałes kontaktu (dostałbyś za darmo), zamieszczam książkę o tematyce Delphi. Po pierwsze, Delphi to Pascal (analogia do C i C++). Więc zamieszczam podstawy Pascala.

Jak napisać program wypełniający tablicę N unikalnymi losowymi liczbami?

Po pierwsze jaki język c++, delphi, pascal, asm co my wróżki!!!! Jak w c++ poszukaj info o funkcji random, rand, randomize

PASCAL - Złożona struktura danych - Sortowanie bąbelkowe.

Drodzy koledzy. A po co utrudniacie sobie życie, kupując poszczególne pola, skoro można przepisać cały rekord. Poza tym, sprawdzanie tylko pierwszej litery przy sortowaniu, to "lekka bzdura". Czy powinienem przenieść nazwisko jaką pierwsze w strukturze danych? To nie ma żadnego znaczenia. Skoro odwołujemy się do konkretnego pola w rekordzie, to "miejsce"...

Sortowanie liczb pierwszych w Pascalu - zapis do pliku wynik2.txt

Witajcie, miałem do napisania program, który miał odczytać liczby z pliku dane.dat, następnie wybrać z nich tylko liczby pierwsze i zapisać wynik do pliku wynik1.txt, a na sam koniec posortować liczby pierwsze od największej do najmniejszej a wynik zapisać do pliku wynik2.txt. Kodzik mam, i działa on do momentu wybierania liczb pierwszych, niestety...

[Pascal] Program losujący 5 liczb bez powtórzeń.

A nie można użyć własnego algorytmu do losowania. Trochę tego jest, głównie oparte o liczby pierwsze. Sam generator może już zapewnić wylosowanie bez powtórzeń.

Jak stworzyć schemat blokowy dla programu generującego liczby pierwsze?

Witajcie. Mam problem ze stworzeniem schematu blokowego do programu poniżej. http://obrazki.elektroda.pl/2841827400_1... Mógłby ktoś przedstawić schemat dalszej części? Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . Proszę poprawić. - arnoldziq

[Turbo Pascal] Turbo Pascal kalkulator: jak uniknąć błędów przy operacjach i typach zmiennych?

Po pierwsze, jeżeli stosujesz własne funkcje do dokonywania obliczeń, to możesz sprawdzać właśnie w tych funkcjach, czy ich argumenty "są odpowiednie". Zamiast : function pierwiastkowanie(a:real):... begin pierwiastkowanie:=sqrt(a); end; Zrób coś takiego : function pierwiastkowanie(a:real):... begin if...

Sterowanie LCD 2x16 z PC przez LPT

po pierwsze, to w czym piszesz ten program, Delphi. Pascal, C czy jakiś inny kompilator i pod jakim systemem operacyjnym go testujesz ?

Pascal - jak znaleźć pozycje spacji w zdaniu i poprawić kod?

Wpisz pos(' ',s). '20' to masz po pierwsze lancuch , po drugie oznacza liczbe 20 a nie spacje.

Aktualna książka do nauki Javy w języku polskim dla użytkownika Linuksa

Dzięki za odpowiedzi. Tzn miałem styczność z programowaniem pisząc takie pierwsze proste programy w C/C++, Pascalu, Ruby. Ale te pierwsze C/C++ są dla mnie jak na początek zbyt trudne. A Pascal juz nie wspierany. Natomiast Java jakos mi podchodzi na początku. Wolę jednak od podstaw zaczynać. Sprawdzę tego Marcina Lisa jesli jest to dość nowy opis pod...

[Turbo Pascal] Jak w Turbo Pascalu dodać lub odjąć liczby w tablicy dwuwymiarowej?

Witam Proszę o pomoc w zadaniu: Muszę w Pascalu napisać program, w którym na początku program pyta o wielkość tablicy ... liczby:(array[1..x, 1..y] of integer; ... a następnie wprowadzam dane do tablicy. I ostatni krok to liczby te muszę do siebie dodać lub odjąć. koniec zadanie pierwszego. Następne zadanie już sobie poradzę analizując to pierwsze....

Jaki język programowania wybrać na start: Pascal, C++, Delphi?

Gui to i w pascalu można robić. A edukacyjność tego polega na tym że robisz od zera (fundamenty), a nie uzywasz gotowych. Np. pomyśl jakbys zrobił grę najprostrzą - klocki. To dużo uczy. Ja jak napisałem swoje pierwsze klocki (pascal+asembler) to sie dużo nauczyłem (więcej niz później na DirectX 7). Tak mnie to wciągneło, że 6 wersji tych klocków napisałem...

[Turbo Pascal] Oblicznie pola figur geometrycznych.

Daj w programie procedurę menu , przed procedurą wybor. Jeżeli procedura jest zadeklarowana po innej to ta pierwsza jej "nie widzi".

Jak zamienić miejscami pierwszą i ostatnią literę w ciągu znaków?

To jest pascal. Tyle mam PROGRAM zamienia_pierwsza_litere_z_ostatnia; USES crt; var ciag:string; BEGIN clrscr; writeln('program zamienia pierwsza litere z ostatnia'); writeln; writeln('Podaj wyraz:'); readln(ciag); writeln('po zamianie'); writeln; REPEAT UNTIL keypressed; END.

[Pascal] Prog. do obl. il. samogłosek/ współgł. w wyrazie

Po pierwsze - sprawdzasz tylko małe litery, jeśli trafi się samogłoska jako wielka litera to jej nie policzysz. Po drugie trochę zgrabniej wyglądałoby rozwiązanie z wykorzystaniem pascalowych SET-ów: program literki; uses crt; var samogloski : set of char; w : string; l, s : integer; BEGIN s := 0; samogloski := ['e','y','u','i','o','a',...

Pascal / Delphi - Algorytmy znajdujący takie samy liczby

Zastosuj pętlę w pętli, pierwsza pobiera kolejne wartości z pierwszej tablicy, druga "przelatuje" po tablicy drugiej i porównuje wartość. W pierwszej możesz użyć "for" a w drugiej "while".

Jak napisać własny system operacyjny? Języki programowania i pierwsze kroki

Ale Pascal i Basic nie są dobre do pisania własnego jądra lepiej C + asm...

Free Pascal: Jak napisać program z sercem z gwiazdek dla dziewczyny?

Tyle się domyśliłem. Ale on ciągle pokazuje mi pierwsza linijkę tzn wybór między Tak lub nie

Jak obliczyć zasięg samochodu w Pascalu z uwzględnieniem warunków pogodowych?

Po pierwsze, to umieść swój kod w odpowiednich znacznikach. Wiem że to Pascal, ale Pascal to też język programowania i należy go tak samo szanować jak inne :D . Muszę powiedzieć, że trochę mnie rozczarowałeś. Miał być deszcz, zmienne warunki atmosferyczne, branie pod uwagę utraty paliwa, zmęczenie kierowcy... Spodziewałem się czegoś więcej. Na przyszłość...

Pascal - nie rozumiem komunikatu, źle działa mysz

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ę.

Free Pascal IDE 2.6.0 Win32 - Program urywa się po wprowadzeniu danych

Problem nie jest z Free Pascalem, tylko z twoim kodem ! Wpisz taki kod i zobacz czy działa : [syntax=pascal]VAR liczba1:longint; liczba2:longint; BEGIN writeln; writeln('Podaj pierwszą liczbę'); readln(liczba1); writeln('Podaj drugą liczbę'); readln(liczba2); writeln('Ich suma wynosi: ',liczba1+liczba2); writeln('Nacisnij ENTER, zeby zakonczyc.'); readln;...

Free Pascal 2.2 - Błąd kompilacji przy użyciu komendy begin

Kolego, a co to za podkreślnik na końcu pierwszej linii kodu? Nic dziwnego, że się nie kompiluje.

Ubuntu 7.10 - Błąd przy kompilacji, brak bibliotek mimo instalacji

Witam. Podłączyłem internet i wszystko już jest dobrze! już normalnie wszystko się instaluje przez komendę sudo apt-get install PROGRAM i nareszcie coś mi się udało zainstalować pod Linuxa pierwsze co zainstalowałem do kadu i free pascal compiler :D Dzięki wszystkim za pomoc.

Turbo Pascal 7.0 Jak zrobić program aby działał?

Z tym programem to zartujesz prawda? Po pierwsze to zrob wciecia i odstepy zeby wogole mozna bylo widziec co jest co a z tym i na koniec repeat to ....

Jak w Pascalu wczytać dane z plików i posortować według nazwiska?

Bardzo nieładnie jest to napisane - naucz się używać w kodzie programu klawisza Tab i dodatkowych spacji przy pętlach/warunkach itp. Wydaje mi się że problem tkwi w tym iż w drugiej pętli for zwiększasz wartość zmiennej b, a wczytujesz do tablicy w której podstawiasz zmienną a - więc dla każdego z 10 przypadków zapisujesz w tym samym miejscu. Co do...

Jak naprawić błąd 'compile failed' w programie Pascal?

To ja trochę rozwinę, bo coś z tego języka jeszcze pamiętam. Po pierwsze napisy nie będące kodem języka, jak na przykład dom, umieszczamy w apostrofach: [syntax=pascal]if haslo = 'dom' then[/syntax] Po drugie brakuje średnika po ostatnim writeln. Z innej bajki, to kompilator pascala powinien wypisywać dość proste w zrozumieniu komunikaty i nawet pokazywać...

Pascal - Wyznaczanie najmniejszego elementu tablicy

W pierwszej pętli for i:=1 to n to na jej zakończeniu i ma wartość n czyli indeks ostatniego elementu tablicy (np 100) i gdy jest przypisanie min:=tab(i) to oznacza min:=tab(100). Porównanie pierwsze jest na pewno dla elementu ostatniego, kolejne już nie musi być dla ostatniego - w zależności od wyniku porównania poprzedniego.

[Turbo Pascal] Jak dodać licznik błędów w grze wisielec w Turbo Pascal?

Na pierwszy rzut oka to taką funkcję masz, domyślam, że się nie kompiluje. Pierwsze to wywal ; po słowie begin. Potem zobacz co wyszło. Za pisanie wiadomości bez sensu i udzielanie kompletnie bzdurnych porad. Ostrzeżenie #2.

Pierwsze starcie z mikrokontrolerami (dozwolone linki Allegro, eBay, itp)

A tu masz odpowiedzi: http://www.elektroda.pl/rtvforum/topic22... Co do języka - zawsze to powtarzam - najpierw naucz się programować na PC potem siadaj do µC - one nie wybaczają tak łatwo błędów w stylu kodowania. Znajomość pascala dużo daje, bo pascal uczy algorytmiki, natomiast pascal nie jest specjalnie rozpowszechniony na µC. Polecałbym...

[Dev-Pascal] Jak dodać sumę i iloczyn do tablic w Dev-Pascalu?

[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...

Pascal – wczytanie ponad 127 znaków do stringa bez bibliotek i assemblera

Witam. Nie mam Pascala przed nosem, wiec radze troche "na slepo", ale sprobuj wczytywania na 2 razy: s: string[255]; writeln('podaj pierwsze 100 znakow i wcisnij enter:'); readln(s[1]); writeln('podaj kolejne 100 znakow i wcisnij enter:'); readln(s[100]); moze zadziala. Pozdrawiam.

I5- 6600 lub i7 6700 - czy jest sens wymiany?

Czekaj na Pascala bądź Polarisa. W pierwszej kolejności wymiana karty jeśli ma być wydajniej w grach.

Pascal - Program nie wstrzymuje działania - readln;

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('***************************');....

[Turbo Pascal] Jak odczytać kolor piksela z pliku BMP w Turbo Pascalu?

Witam. Oto nieco pelniejsza odpowiedz: Wczytywanie BMP - tu bedzie maly problem. Najlepiej byloby, gdybys poszukal w necie opisu naglowka pliku BMP, bo musialbys z tegoz naglowka wyciagnac pewne informacje na temat obrazka - chociazby szerokosc i wysokosc. Pozniej kolejny problem - obraz w pliku bmp zapisywany jest "do gory nogami", tzn. pierwsza pozioma...

Turbo pascal - Jak ugryźć początek programu tablica z funkcja randomize?

Może masz racje że pętla jest bez sensowna ale jak dla mnie program miał wyświetlać 20 liczb z określonego przedziału i wybierać max i min i to też robi więc uważam że dobrze wykonałem zadanie. A wstawiłem te dwie pętle bo uważałem że są potrzebne jak zauważyłeś ja się uczę a nie programuje i nie znam się na tym tak dobrze jak TY... I masz racje pierwsze...

Jaki system operacyjny zainstalować na starym komputerze?

Wybrałem już system operacyjny dla mojego staruszka. Nie będzie to jednak Debian, DSL czy Puppy. Będzie to TinyCore. Naprawdę mały system (obraz waży niecałe 10 MB), bardzo szybki, i - co najważniejsze - jest na nim emulator NES-a (Nestopia), odpowiednik GG (Pidgin), Opera, Free Pascal, DOSBox i... LBreakout2 - pierwsza gra, w którą grałem na Linuksie....

[Pascal] Jak uniknąć powtórzeń pytań w teście w Pascalu?

Rozwiązania podane przez BoskiDialer są na dobrą sprawę bardzo podobne: pierwsze można przerobić tak, aby po oflagowaniu pytania i ponownym wylosowaniu oflagowanego, brał kolejne wolne: złożoność obliczeniowa "prawie" stała. Nie wiem na jakim poziomie ma być ten program (zaliczenie w gimnazjum czy na studiach?) ale najlepiej by było wykorzystać listę...

S7 - Metodyka i poprawność pisania programu w PLC

Pittt to nie jest kompilowanie sobie życia, ale ułatwianie. A jak byś miał takich networków np. 20. I teraz chcesz umieścić w komentarzu pierwsze 8 z nich i ostatnie 5 z nich. To jak to zrobisz w języku LAD? W SCLu wykorzytam komentarz blokowy [syntax=pascal] (* .... *) [/syntax]

Uruchamianie aplikacji Pascal z dyskietki w kernelu na Pentium I, 64MB RAM

Coś lepszego od DOSa łatwo napisać, gdyż jest to system pisany pod pierwsze procesory i peryferia. Dzisiaj technologia poszła trochę do przodu i instrukcje procesorów są bardziej zaawansowane i szybsze. Więc procedury DOS-owe są mało wydajne :(

Jak napisać program w Turbo Pascal do obliczania odsetek z podatkiem?

Witam !! Program do liczenia odsetek to klasyczne początki programowania. napisz z czym masz problem, z jaką funkcją, procedurą, wklej kod to porawimy. Całego zadania nikt za ciebie nie zrobi bo po pierwsze: "za darmo nic", po drugie wtedy się nic nie nauczysz i zawsze będziesz liczył na gotowca.

Free Pascal funkcją arc źle kreśli wycinek okręgu

Coś mi się kojarzy, że już się z tym kiedyś spotkałem... Ale strasznie dawno temu. I chyba nie potrafiłem znaleźć rozwiązania, więc robiłem to na około - najpierw pierwsze koło białe, a potem na nim czarny wycinek. Wiem, że to nie rozwiązanie, ale w sumie przykrywa niedogodność. Niestety ja nic innego raczej nie poradzę:(

Jaki kompilator Pascala wybrać dla początkującego? Kursy z przykładami?

Co do błędu kompilacji, to kompilator wyraźnie 'powiedział' Ci co jest nie tak. Brakuje Ci średnika kończącego pierwszą linijkę. Odnośnie IDE, to pascalem bawiłem się ładnych parę lat temu, i na początku korzystałem z Turbo Pascala (nie wiem, czy przypadkiem któreś z wersji nie są darmowe już), a potem przerzuciłem się na Delphi. Konkretnego kursu nie...

Jak poprawić wyświetlanie menu kontekstowego w Pascalu?

Po pierwsze primo, kod źródłowy umieszczamy w znacznikach code (przycisk powyżej okna edycji postu) - to znacznie ułatwia odczytanie kodu. Po drugie primo: uses crt; var klawisz: char; wybor: byte; napisy: array[0..4] of string; y: byte; procedure info; begin ... end; procedure program_1; begin ... end; procedure program_2; begin...

Jak połączyć pliki sprzedaży i kupna w bazie danych sklepu w Pascalu?

Po pierwsze, musisz się zdecydować na jedną z metod postępowania z baza danych. Albo pracujesz, na zdefiniowanych tablica, które czytasz i zapisujesz do plików przy starcie i końcu programu, albo operujesz bezpośrednio na plikach. 1 Jak wczytać dane z pliku do tablicy po każdym uruchomieniu programu? Jeżeli zdecydujesz się na tablicowanie danych przy...

prosty program w pascalu: czy 3 punkty są współliniowe

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...

[Turbo Pascal] Jak dodać wiele działań w instrukcji CASE...OF?

Pytanie, jakie są założenia... Bo może być tak, że program wyłącznie pokazuje lub nie kolejne przeliczenia, a nie wykonuje cały ciąg ponownie. Z postu tytułowego wynika raczej ta pierwsza sytuacja. Choć jasne i przejrzyste opisywanie to to nie jest...

Jak oddzielić niebo i ziemię w Turbo Pascalu?

Po pierwsze primo: wypelniasz stojac poza prostokatem (patrz wartosc FloodFill(275,574,red); :!: :!: :!: Po secundo: skorzystaj z Rectangle(int,int,int,int) o czym mozesz poczytac tu :http://yarpo.republika.pl/kurs2/lekcje/... albo: procedure prostokat(x1:integer; y1:integer; x2:integer; y2:integer);...

[Turbo Pascal]Szyfrowanie RSA i program się wywala ? pomocy

W zasadzie w kodzie widać żę to: " {1.} i:=random(1)+40; {max 79} M:=((i*i)-(79*i)+1601);{obliczanie pseudo losowe liczb pierwszysch}" da zawrotną liczbę pierwszą = 41 a to chyba nie jest za wielka liczba piwerwsza do działań. To coś innego :(

Źródła funkcji random() w C++, Delphi, PHP - różnice w implementacji

Większość języków używa generatora kongruencyjnego liczb pseudolosowych (różnice mogą być w stałych): x_{n+1}=(a*x_n+b) mod (c) gdzie a,b i c duże liczby pierwsze xn - poprzednia liczba losowa przechowywana np. w zmiennej SEED Pascala mod - reszta z dzielenia

[Pascal] Jak w Pascalu zapisać wczytaną liczbę całkowitą słownie?

Gory (bez obrazy) lecz z ifami to troszeczkę przesada .Wyobraź sobie program który dla liczby z np 50 zerami robi to poprzez if . Po pierwsze zauważmy że np 2 to"dwa" a 2000 to "dwa"="tysiące" . do tego dochodzą "dwadzieścia ,dwieście itp" oraz "miliony ,tryliony" lecz to też są np. "dwa miliony" Automatycznie liczba ifów nam spada . Pozostaje nam tylko...

Turbo Pascal: Jak napisać program do wypisywania dzielników liczby?

po co ten while? o instrukcji warunkowej if się słyszało? Przecież to spełnienie warunku braku reszty z dzielenia ma skutkować wypisaniem dzielnika. Mają być wypisane wyłącznie dzielniki będące liczbami pierwszymi? Jeśli tak, to proponuje napisać funkcję sprawdzającą, czy dana liczna jest pierwszą i dorzucić ją do warunku na wypisanie w przypadku spełnienia...

[Turbo Pascal] Jak przenieść program z Turbo Pascal do Delphi z użyciem modułu DOS?

Napisalem w paskalu pewnien programik... Chcialbym go teraz przerzucic na Delphi... Problem jest jedynie taki ze z Delphi jeszcze do czynienia prawie nic nie mialem :D .... Pierwsze - do dzialania programu konieczny jest modool DOS - w delphi pewnie go nie ma?? Czy jest on dostepny pod delphi (po pewnie tez z FreePascala to sie na wiele nie zda)?? Zamykam....

Pascal - Potęgowanie wektora, zapis i odczyt liczb do pliku.

Mam do napisania program na zaliczenie. Całość zadania brzmi : Losowe generowanie wektora wierszowego o zmiennym wymiarze, wyświetlanie wektora, suma elementów. średnia ujemnych , wyznaczanie liczb pierwszych oraz parzystych, potęgowanie wektora (każda następna liczna jest wykładnikiem poprzedniej A[i] A[i+1](to ma być indeksie górnym w A[i]), zapis...

Myszka podłączona do AVR jako pozycjonowanie CNC...

Widzisz, ja na przykład się za c nie biorę, bo z c ogółem jestem cienki jak tyłek węża... Ale Bascoma załapałem szybko, nie ma takich problemów ze składnią... Polecam. Ale jakby był Pascal do procków to byłbym w siódmym niebie....... ----- Dorzucam moje rozwiązanie licznika up/down - symulacja chodzi cacy... Dwa pierwsze D-flipflop generują przebiegi...

FreePascal - Wyświetlanie liczby WORD w oknie MessageBox

Po pierwsze, Word w Pascalu ma 2 bajty, natomiast typ Char, w zależności od kompilatora i jego wersji od 1 do 2 bajtów, w zależności czy kompilator jest "Unicode ready" czy nie. Jeżeli chcesz wyświetlić jakąkolwiek informację w MessageBox, to raczej należy ją podać jako PChar a nie Char. Co za tym idzie, proponuję zastosować taką składnię : [syntax=delphi]var...

Ocena programu w Pascalu: rekordy i losowanie liczb 1-49 bez powtórzeń

Przy takim type (rekordowym) jak masz teraz, to sortowanie będzie olbrzymim problemem. Nie bardzo można posortować części rekordu. Nie bardzo rozumiem czemu ? własnie do kodu dopisałem Teraz kwestia interpretacji tego zadania; czy za "typ rekordowy" uznamy: Nie wiem o co chodziło nauczycielowi :/ profesor na to zionie żywym ogniem jak zobaczy. :p Kiedy...

Programowanie w Pascalu. Zapis znaków (zminimalizowany program). Klawisze.

Zrobiłem coś takiego: uses windows,crt; var m:char; begin clrscr; textcolor(15); repeat m:=readkey; if m=#9 then textcolor(4); write(m); until m=#13; end. Po wciśnieciu klawisza Tab text zmienia kolor. Jak zrobić zeby program zapisywał wartość "m" w pliku tekstowym. Pozostaje jeszcze pytanie pierwsze.

[Pascal] Jak napisać program do przeglądania plików tekstowych?

odswieze troche temat, bo zacząłem robic troche... mam taki kod programu: program przegladarka; uses crt; var plik:text; linia:string; sciezka:string; menu:integer; procedure wczytaj; begin writeln('Podaj dokladna sciezke do pliku'); readln(sciezka); Assign(plik, sciezka); Reset(plik); repeat readln(plik,linia);...

[Pascal] Program zamieniający liczbę binarną na dzięsiętną.

Drogi kolego. Po pierwsze, nie krzyczymy na forum. Po drugie, obowiązują na forum pewne zasady, o których może kolega poczytać w regulaminie forum. Po trzecie, napisał kolega : OTO POPRAWNIE NAPISANY PROGRAM No, jak dla mnie, jest to dość poważna nadinterpretacja. Nie wiem, jakiego Pascal-a kolega używa, ale wywoływanie nazwy funkcji, jako argumentu...

Jak posortować 5 liczb na układzie 8035? Wyświetlanie i sortowanie rosnąco

Pierwsze z brzegu zapytanie do [url=wiki]http://pl.wikipedia.org/wiki/S... [syntax=pascal] procedure bubbleSort( A : lista elementów do posortowania ) n = liczba_elementów(A) do for (i = 0; i < n-1; i++) do: if A[i] > A[i+1] then swap(A[i], A[i+1]) end if end for n = n-1 while n > 1 end procedure [/syntax]

Jaki język programowania wybrać na start: Pascal czy C++?

Echh, po pierwsze - DevC++ to NIE kompilator, po drugie wykorzystuje MinGW - minimalistyczny port GCC i podsatwowych narzędzi do kompilaowania na Windowsa. Po trzecie - GCC broń boże nie jest standartem - standartem jest obecnie C++0x. : P

Pascal i prosty program... dzielenie, drukowanie wyniku itp.

Po pierwsze, to nie ma czegoś takiego jak reszta z dzielenia liczby rzeczywistej. Trzeba najpierw dokonać konwersji na całkowitą, a nastęnie można co najwyżej dopisać część ułamkową. Po drugie - Twój zapis w poście nie bardzo pokrywa sie z zapisem w kodzie.

Turbo Pascal. Program szyfrujący. Wykorzystanie szyfru Cezara.

hmm... po pierwsze to zmienna litera jest typu longint, powinna być typu char. :-) po drugie - jeśli program ma wczytywać jedną literę i zwracać jedną literę to zbędna jest pętla zmieniająca każdy znak ciągu "litera" na szyfrowy odpowiednik.

Jaka płytka testowa i mikrokontroler do projeku.........

" Naukę programowania będę zaczynał od zera" "...a jednocześnie będzie łatwy w opanowaniu " Programowania w ogóle czy programowania mikrokontrolerów? Bo jak to pierwsze to P.Górecki, płytka, programator STK200 i wyświetlacz LCD. A jak znasz C, asm albo choćby Pascala to raczej R. Baranowski, płytka, darmowe AVRStudio i WinAVR i programator STK500v2.

Turbo Pascal - brak komunikatu po wprowadzeniu liczb, gdzie błąd?

uses crt; var liczba1,liczba2:longint; begin clrscr; writeln('Podaj pierwsza liczbe'); read(liczba1); writeln('Teraz druga'); read(liczba2); if liczba1+liczba2=100 then writeln('Suma rowna jest stu'); if liczba1+liczba2<>100 then writeln('Suma nie jest rowna stu'); readln; end. Niby chodzi,...

Automatyka i Robotyka PG - która specjalizacja lepsza: przemysłowa czy teoretyczna?

Robie w automatyce to "pierwsze" i hajs dobry . Do tego działalność i wlasne fuchy. Te "zaawansowane" algorytmy to pewnie jakis pic na wodę tak jak u mnie w technikum bylem na "systemach i sieciach komputerowych". Z komputerów byl tylko Pascal hehe. A nawet jeśli ogarniesz takie " zaawansowane cos" to poszukaj terwz sobie ofert pracy z tego zakresu...

Pascal: Wczytywanie i wyświetlanie planszy z pliku tekstowego do gry Pacman

Po pierwsze to w najlepszym wypadku będzie brakowało całej ostatniej linii, bo po napisaniu ostatniego znaku w tej linii ekran się automatycznie przewinie do góry ucinając pierwszy wiersz obrazu. Dlatego ostatnią linię lepiej wykorzystać na wyświetlanie wyników itp...

[Turbo Pascal] Jak napisać program w Turbo Pascalu do konwersji kwoty na słowa?

Po pierwsze napisz szkielet programu wyliczającego poszczególne elementy liczby (miliardy, miliony,tysiące,setki ...) Rozpisz sobie końcówki w poszczególnych grupach zależnie od 2 ostatnich cyfr mnoznika 1 - tysiąc 2,3,4,22,23,24 - tysiące 5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,... -tysięcy itd. i na podstawie tego rozpisz warunki....

[pascal] kalkulator, jak zrealizować wybór działania?

Sprawa jest prosta składnia if wygląda tak if warunek then instrukcja_1 else instrukcja_2; jeżeli masz więcej instrukcji do wykonania piszesz tak if warunek then begin instrukcja_1; instrukcja_2; instrukcja_n; end; po prostu instrukcje mające się wykonać w "if" bierzesz w znaczniki "begin" i "end;" kod wygląda tak po poprawieniu program imitCalc; uses...

[Kupię] Stary hardware - Mac, Amiga, pierwsze PC.

Mam przejsciowki Slot 1 >> FCPGA370 Ten sprzet jest dobry do Turbo Pascala nauki pisania programów etc.

[Java] Jak zacząć programować w Javie? Środowisko, narzędzia, pierwsze kroki

Witam, dokładnie tak jak w temacie - chciałbym zacząć cokolwiek pisać w Javie ale jak zacząć? jakie środowisko zassać? jak to odpalić wszystko? jak testować itp Docelowo chciałbym pisać w jawie coś np do urządzeń przenośnych jak telefony - i tam chodzi chyba o midlety czy coś takiego - ale to na razie czarna magia dla mnie Załóżmy że chcę programować...

[Turbo Pascal] Jak odczytać kod ASCII znaku z ekranu w trybie tekstowym?

Bez users_db,panel_u ciezko bedzie mi znaleść błąd. Moze istnieje w tych bibliotekach? Pierwsze slysze zeby takie dziwne rzeczy dzialy sie z TP7 :/ Nie wiem co moze byc tego przyczyna. Kozystalem z niego na 486 pod win95 i 98 oraz na nowszych z winXP. Nie bylo problemow. Trzeba tylko skonfigurowac kompilator jak ktos chce uzywac asemblera i skokow.

[Delphi] Jak stworzyć program do zarządzania i uruchamiania plików z list?

Witam ponownie. Niestety w związku z brakiem czasu musiałem chwilowo zaprzestać pacy nad moim programem, który jest prawie skończony. Chciałbym prosić o pomoc w sterowaniu samy, Listboxem za pomocą klawiatury. Potrzebuję dokładnie po wciśnięciu klawisza np 7 żeby pierwsza pozycja w listbox1 się zaznaczyła i potem żeby klawisz + powodował przesuwanie...

[Pascal] Jak napisać program w Pascalu: wektor wierszowy o zmiennym wymiarze?

Wreszcie napisałem program, czy mógłby ktoś sprawdzić czy ma tak wyglądać: [syntax=pascal] program Project1; {$mode objfpc}{$H+} var N: integer; wektor: Array of integer; procedure generator(N:integer); var i: integer; begin SetLength (wektor, N); randomize; for i:=0 to N-1 do begin (wektor[i]):=random(100)-50; end; end; procedure pokaz(N:integer);...

Jak napisać quiz w Pascalu z losowymi pytaniami i punktacją?

Napisałem taki quiz po swojemu (załącznik), tego co napisał Łuk_F nie czytałem. W sekcji const musisz wpisać pytania i odpowiedzi. Dla przykładu napisałem pierwsze i ostatnie pytanie.

Przepisanie programu z języka Siemensa na SCL lub S7graph

SCl oparty jest na starym Pascalu.Jeżeli już programowałeś w jakimś języku (C,Java,Delphi itp) to nie będziesz miał żadnych kłopotów z SCL. S7Graph jest "językiem" graficznym bardzo prostym do programowania. Przeczytaj np: [url=http://tinyurl.com/6pxu9c]Link Zapoznaj się najpierw z handbuchami. Siemens przy instalacji S7Graph i SCL skopiował na HD doku...

Jaki podręcznik lub samouczek PDF do nauki Delphi 5 polecacie?

Po pierwsze to chyba trochę nie ten dział do programowania jest osobny dział ;) Programowanie ogólne Pytania i odpowiedzi dotyczące programowania w różnych językach (Assembler, C, C++, Java, Pascal, PHP, Basic, Visual Basic, Symbian, Delphi). Wyślij tutaj swoje programy! A co do kursów samouczków wystarczy wpisać w google "programowanie w delphi" i...

Propozycje prostych i efektownych programów w C++ lub Pascal na ocenę 6

Ja bym radził kolego mój drogi, abyś napisał program taki oto właśnie. Jest to program mówiący czy jest to liczba pierwsza czy nie. Jeżeli masz jakieś pytania daj znać. Pomoge. #include <iostream> #include <conio.h> using namespace std; int main(int argc, char* argv[]){ int a,b,i; int ile=0; cout<<"liczby...

Lazarus Pascal - Obliczanie średniej harmonicznej z listy liczb

Witam Potrzebuje zrobić program który będzie podanych przez ze mnie liczb policzy mi średnia arytmetyczna i harmoniczna. Z ta pierwsza sobie poradziłem ale z tą druga już się mecze od paru dni. :cry: Mozę któryś z kolegów rzucił okiem na mój kod i doradził gdzie mam błąd. //Srednia Harmoniczna sumaH:=1/StrToFloat(ListBox1.Items[0]);/... wczytanie pierwszej...

program w pascalu sprawdzający obecność słowa w tekście

Ech... I kwitnie nam pokolenie studentów-informatyków, co na klawiaturze "AnyKey" szukają... :P Sprawa jest banalna. Masz ciąg znaków (tekst) - załóżmy, że w postaci tablicy znaków (array of char). Ustawiasz się na pierwszy element tablicy, sprawdzasz, czy nie jest taki sam jak pierwsza litera szukanego wyrazu, przechodzisz do następnego elementu tablicy...

pascal - procedura wczytania macierzy , prosze o pomoc:)

Po pierwsze link do pliku nie dziala, no chyba ze nie wiadomo jaka jest zawartosc pliku. Po drugie jezeli chcesz wczytywac macierz(czy tez element) z pliku powinienes uzyc funkcji Read a nie Write. I powinno to wygladac o ile pamietam Write(zmienna_plikowa, zmienna_programowa), gdzie zmnienna programowa to Macierz[x][y] lub po prostu jakas zmienna prosta,...

[Pascal] Jak zapisać tekst do pliku i wyświetlić na ekranie?

Po pierwsze, musisz się zdecydować na jaką platformę piszesz ten program. Ustawienia kompilacji masz na Linux-a, a w programie jest podana ścieżka do zapisu z systemu DOS/Windows. Poprawnie skompilowany kod (pod Windows-em) dział bez problemu. Zapisuje, do pliku txt, teksty tego typu : ocena osoby o imieniu: Zenek to 1 z przedmiotu j.polski Nie sprawdzałem...

[Pascal] Jak uniknąć duplikatów przy losowaniu drużyn w Pascalu?

Ale jak to sprawdzić? :( Wylosowane liczba jest to nr komórki tablicy. Mam sobie taką tablice: [1][2][3][4][5] 1: nr1 2: nr2 3: nr3 4: nr4 5: nr5 Losuję teraz liczby i przypisuje tą pierwsza tablice przypisuje do wylosowanych liczb [1] - zmieniam na [los1] [2] - na [los2] Tylko jak sprawdzić czy już taka liczba się wylosowała ? :(

Pascal - nieprawidlowe działanie programu po kompilacji

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...

Tworzenie własnej biblioteki w Pascalu bez użycia crt, dos, graph

Myślę, że mechanizm oceniania zadań konkursowych w wielu przypadkach wygląda tak: 1. Użykownik przesyła kod źródłowy do oceny. 2. Program oceniający kompiluje kod (pierwsze punkty za kompilację). 3. Program oceniający testuje kod dla wybranych danych (punkty za działanie kodu). Zadanie przykładowe (banalne): Napisz w Pascalu program obliczjący sumę...