pascal litery

Pascal - programik, wczytywanie liter i znaków, równanie.

Pisane na szybko więc mogą być błędy ... ;) var a,b:real; k:char; begin repeat writeln('Podaj 2 liczby i operacje matematyczna: '); write('Podaj a: ');readln(a); write('Podaj b: ');readln(b); repeat write('Operacja matematyczna +,-,*,/ : ');readln(k); case k of '+':writeln('Suma...

Program zamieniający mały litery na wielkie [Pascal/C++]

Zobacz nagłówek ctype.h (albo cctype w C++) i funkcję int toupper(int c); Pozdrawiam, Dr.Vee

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

Pascal - zabezpieczenie przed podaniem litery jako liczby

witam wszystkich. Otoz robie pewien programik i w pewnym momencie gdy chce wprowadzic wysokosc obiektu lub dlugosc(ogolnie chodzi o wpisywanie liczb) to jak wprowadze jakas literke to program sie sypie. I teraz pytanie do bardziej doswiadczonych, jak zrobic aby program sie nie sypal tylko np. po wpisie liter zeby wyskoczyl komunikat ze to nie liczba...

Jak napisać program w Turbo Pascal do zamiany liter na _X_?

Potrzebuje programu który będzie działał następująco: Po wpisaniu tekstu z klawiatury program pyta nas o wybór jakiejkolwiek litery, następnie w tekście który wpisaliśmy zamienia wszystkie litery wybrane wcześniej na "_X_". Jeżeli litera którą wpisaliśmy nie występuje w tekście program wyświetla "nie ma takiej litery" i prosi o ponowny wybór.

[Delphi] Jak poprawić procedurę wyszukiwania w Lazarusie z Firebird?

http://www.firebirdsql.org/manual/genera... QuotedString? Po prostu każdy blok oznaczony jest wcięciem. Ponadto, jako że Pascal nie rozróżnia wielkości liter, warto zapisywać słowa kluczowe małymi, zaś funkcje z wielkiej litery każdy wyraz występujący w jej nazwie. Czasami zamiast tej reguły stosuje się podkreślniki rozdzielające wyrazy. Prosty...

Turbo Pascal – pojawia się litera „l” zamiast nawiasu okrągłego podczas pisania

Mam mały problem z Turbo Pascalem.Polega o na tym że keidy pisze w edytorze i che nspsiać nawias okragły to zamiast neigo pojawia mi ssie mała literka L.Wiecie jak to naprawić???

[Pascal] Dlaczego program w Pascalu wyświetla wartości 4 i 16? Analiza kodu

Spróbuj zmienić małe 'm' na duże 'M' Kompletnie bzdurna porada!!! Pascal nie rozróżnia wielkości liter.

Pascal na Linuxie – jak wysłać dane na port LPT ($378)? Nie działa Port[$378]

spróbuj z dużych/małych liter.

[Pascal] Jak przypisać dźwięk do litery w programie z pc-speakerem?

Musisz użyć NoSound aby każdorazowo zakończyć odtwarzany ton. uses crt; begin sound(400); delay(500); nosound; sound(1000); delay(500); nosound; end.

Pascal - Sprawdzanie i przepisywanie liczb oraz liter z pliku dane.dat

Nie moge poradzić sobie ze zrobieniem programu ,Licze na wsza pomoc. zad Dany jest plik dane.dat a w nim ciag liczbowy . W zalozeniu tego ciagu liczby powinny byc na przemian parzyste i nieparzyste. a)napisac procedure sprawdzające czy liczby sa ulozone na przemian b) napisac procedure ktora przepisze z pliku liczby nieparzyste do tablicy a i zad 2...

Pascal: Program z tablicą znakową i liczenie liter w tekście

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.

Jak posortować alfabetycznie imiona w Turbo Pascal?

Trzeba by zrobić listę lub tablice ze stringami. Sortowanie może polegać w taki sam sposób jak sortowanie liczb (można porównywać kody ASCII - ich ułożenie rośnie wraz z kolejnymi literami alfabetu). Trzeba by tylko rozważyć sortowanie wg kolejnych liter (pewnie za pomocą rekurencji jakiejś). Zadanie dość typowe na pewno coś znajdziesz Google "sortowanie...

[Turbo Pascal] Wyświetlanie tekstu za pomocą znaków

Aaa Więc już chyba rozumiem tu nie chodzi o to że po naciśnięciu klawisza ma się wyświetlać dane słowo w odpowiednim miejscu ekranu tylko chodzi o to że % ma służyć jako piksel w literach

Jak napisać konwerter jednostek Ohm/kOhm/MOhm w Pascalu z wyborem i formatowaniem?

Ja używam programu Free Pascal IDE. Własnie a jak zoblokowac litery bo jak sie wcisnie np. h to sie program wyłączy kod źródłowy w załączniku P.S. Jak moge wykożystać pascal w elektronice ?

Dev-C++ – jak wyświetlać polskie znaki w konsoli, różne kodowanie CP1250/CP852

Program pisałem na konsoli, aby w prosty sposób ominąć problem polskich liter (właściwie to problemu w tym przypadku nie było). Temat postu wyniknął stąd, że chciałem pisać w środowisku Dev-C++ lub Dev-Pascal programy dla konsoli z polskimi literami. Pisanie funkcji od podstaw to element nauki... Można wogóle korzystać z gotowych programów i nie uczyć...

[Turbo PASCAL] Jak poprawnie zapisać i odczytać hasło z pliku binarnego?

Podałem. Wersja uproszczona to klucz pojedynczej długości, więc zamiast indeksu na klucz i pobierania wartości litery z klucza będzie stała.

[Pascal] Wyszukiwanie ostatniej liczby w pliku tekstowym?

panie doktorze jak tak zrobie to mnie tu strzyka, co mi jest? ;) napisz coś więcej, jak zbudowany jest plik, czy w jednym wierszu jest jedna liczba? czy są to tylko liczby czy może jeszcze jakieś litery? jaki to błąd - kompilacji czy wykonania?

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.

Turbo Pascal: Katalog płyt DVD - problem z menu programu

Gdybym miał to poprawić, musiałbym napisać program praktycznie od początku. Oczywiście mogę to zrobić ale wtedy wystawię fakturę VAT. Wolałbym jednak abyś sam spróbował naprawić program: chętnie pomogę ale najpierw musisz wykazać odrobinę chęci współpracy. Aha, na początek podpowiem Ci, że w funkcji Menu() masz zmienną menu typu word. Zmienna nie może...

[Pascal] Jak napisać generator losowego ciągu znaków w Pascalu?

Witam. Mam takie pytanie czy ktoś z was wie jak napisać taki program który będzie podawał znaki czyli liczby w przedziale od 0 do 9 i litery. Chodzi mi o to aby wypisywał je tak XXXXX-XXXXX-XXXXX-XXXXX-XXXXX w miejsce X'ów oczywiscie wylosowane liczby i litery. Proszę o napisanie tego. Będą oczywiście mega plusy.

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

co do SearchRec - w Delphi występuje pod nazwą TSearchRes. wszystkie struktury w delphi zaczynają sie od litery T. co do modułu Dos - w Delphi "SysUtils"

Jak naprawić błąd w kalkulatorze wykonanym w programie ALGO?

to mi wyglada jak zwykly pascal, nie uzywaj w nim polskich liter, "then to" na "then", zamiast / powinno byc DIV bo dzielisz liczby calkowite i repeat nie mialo until Program kalkulator; Var liczba1:integer; liczba2:integer; chr:char; decyzja:integer; Procedure DODAWANIE; Begin WriteLn('Podaj dwie liczby'); ReadLn(liczba1,liczba2);...

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

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

Jaki masz problem z tymi klawiszami? Pisałem wcześniej już, jak to zrobić najprościej. W onKeyDown wystarczy sprawdzić wartość Key i wywołać procedurę: [syntax=pascal] case Key of 65 : Button1.Click(); // Litera A 66 : Button2.Click(); // Litera B end; [/syntax]

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

Kod w Pascalu do porównania plików tekstowych z ignorowaniem wielkości liter

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

Pascal - Procedury wczytywania i wypisywania plików

Hahah, faktycznie coś mi się powaliło, zmniejszylem to na razie do 20 w celach próbnych ale wywala mi błąd, że przekroczyłem pamięć raised exception class 'External: SIGSEGV'. Dla tego tak dziwnie to pisze, ponieważ jest mi to potrzebne do projektu, w którym mam pobrać plik a następnie podać jego statystyki, liczba słów, liczba zdań, i histogram. I...

Jak wybrać język programowania? Zobaczcie ten pomocny obrazek!

Nie ma Pascala - do 4 liter! ;)

Program w Pascalu znajdujący najw powt. się liter i ich zam.

Witam! Mam do napisania program w którym: Wpisujemy dowolny tekst (bez polskich liter) i program ma sprawdzić której litery jest najwięcej w tekście i te litery których najwięcej ma zamienić na duże litery w tym tekście! Mógłby ktoś mi w tym pomóc? Nigdy nie miałem styczności z tego typu programem. Pozdrawiam serdecznie i dziękuje za wszelką pomoc;)

Turbo Pascal 7.0 na Windows 98 - zmiana układu klawiatury na standardowy

Mam nastepujący problem . W jaki sposob bez wchodzenia w tryb MS-DOS uruchomic/ustawuic w Turbo Pascalu opcje dzięki której podczas pracy w pascalu pod Windowsem 98 bedzie normalny układ klawiatury to znaczy zamiast znaków interpunkcji wyskakują mi polskie litery ą ż ó itp jak to zmienic ?? pozdrawiam

[pascal] [Pascal] Jak zautomatyzować zliczanie wpisanych znaków w programie?

Witam...zrobilem czesc zadania w pascalu.... mianowicie program pokazuje wpisane przeze mnie litery dopiero kiedy wpisze tyle ile ma ich byc i w taki sposob ze np. w pionowej lini ma byc tylko 3 lub 4 liter... zreszta jak otworzycie w pascalu to bedziecie wiedziec o co chodzi A teraz musze zrobic jakis automat ktory bedzie zliczal te wszyskie litery.......

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 - Kalkulator Logiczny na bramkach and, nand, nor, or, xor

Dzięki za tak szybką odpowiedź! Czyli mam porównywać każdy element tablicy 1 do każdego elem. tablicy drugiej? Dwa, a co w przypadku, jeśli jedna liczba ma więcej znaków od drugiej? Proszę umieszczać kod w znacznikach syntax . Opcja Listing kodu . P.S. Shift szwankuje? Jest jeszcze drugi ;) w ostateczności Caps Lock. Zdanie rozpoczynamy z wielkiej litery....

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

Poprawiony program: program quiz; type pytanie=record pytanie,a,b,c,d:string[150]; prawidlowa:string[15]; oznaczono:boolean; end; var pytania:array[1..50] of pytanie; wybrane:array[1..10] of pytanie; i,j,pom,prawidlowo:integer; wybrano:string; begin pytania[1].pytanie:='Polecen...

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

Jak napisać program w Turbo Pascal do liczenia słów w pliku .txt?

Jakiej pomocy oczekujesz? Tu nikt za Ciebie programu nie napisze, choć zawsze możesz liczyć na pomoc w rozwiązaniu konkretnego problemu. Na przykład: - jak stworzyć monit o podanie nazwy pliku - jak otworzyć i móc odczytać dane z pliku tekstowego - jakiej metody użyć, aby program wyszukiwał tekst niezależnie od wielkości liter. Potrzebna jest minimalna...

Jak uruchomić Turbo Pascal na Windows 7? Niezgodność z systemem operacyjnym

Na PSiO w wielu szkołach technicznych dobrym rozwiązaniem jest Dev-Pascal, wiele szkół go używa, a po za tym przy nauce kolejnego języka (w kolejnej klasie) użyjecie innego programu z pakietu Dev np. Dev-C++. Pogadaj o tym z nauczycielem - nie powinno być problemu :) Po za tym nie liczy się kompilator a wynik. W innym wypadku pozostaje Ci virtualna...

[Turbo Pascal] Turbo Pascal Error 36 przy rozpoznawaniu płci – błąd w kodzie, jak naprawić?

Bo zapewne wpisujesz małymi literami a porównujesz ostatnią z dużą. W if musisz najlepiej użyć UpCase (albo UpperCase - nie pamiętam na 100%).

[Pascal] Jak sprawdzić pusty stos i palindrom za pomocą stosu?

PROGRAM obsluga_stosu; USES Crt; TYPE wsk = ^element; element = RECORD dana: Integer; nast: wsk END; PROCEDURE na_stos (VAR wstosu: wsk; d: Integer); VAR p: wsk; BEGIN new(p); p^.dana := d; p^.nast := wstosu; wstosu := p END; {na_stos} PROCEDURE ze_stosu (VAR wstosu: wsk; VAR d:...

[C++] Rozpoznawanie ostatniej litery

Witam, od dłuższego czasu zajmuję się podstawami programowania (pascal, java, c/c++). Nurtuje mnie jedno ćwiczenie. Chcę napisać program w którym użytkownik podaje imię. Program sprawdza ciąg znaków i stwierdza czy jesteś kobietą, czy mężczyzną. W kwestii teoretycznej wyglądało by to raczej tak: Zakładamy sobie ciąg znaków string imie[15] strumieniem...

Pascal OutTextXY wyświetla błędne znaki zamiast tekstu – jak poprawnie użyć?

to nic nie zmienia miałem już wcześniej settextstyle(defaultfont,horizdir,1&... aha, bo zapomniałem dodać. Problem ów nie występuje gdy chcę wyświetlić napis używając liter. np "Ala ma kota" jest ok, ale gdy chce napisać "Ala ma 2 koty" to zamiast 2 dostanę jakieś śmieci Proszę pomóżcie potrzebuję tego... :(

Gdzie znaleźć kod prostego kalkulatora w Turbo Pascalu?

Program - kalkulator dla liczb zapisanych w postaci rzymskiej (dodawanie, mnożenie, odejmowanie dzielenie czy wie ktoś jak to zrobić żeby wyświetlało litery rzymskie

[Pascal] Jak połączyć funkcje w kalkulatorze: dodawanie, odejmowanie, mnożenie?

Rozumiem że problem masz z runkcjiami readln. Niestety problem odczytu w konsoli załatwia za Ciebie read w trybie graficznym masz dwa rozwiązania. Przełączyć się na tryb konsoli i odczytać dane lub stworzyć zmienną (bufor). I dodawać do niego znaki Przykład: Nacisnieto 1 -> dodaj do bufora znak '1' -||- 2 -> dodaj do bufora znak '2' -||- + -> odloz...

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

Jak nie będzie wyjścia to trzeba będzie kombinować . Rysuję brzuch do litery D tą funkcją. Czyli musiałbym tak : okręg , przykryć połowę i namalować kreskę. Hmm... No myślałem,że może jest jakaś inna starsza wersja modułu graph w której ta funkcja działa prawidłowo. Mam jeszcze jeden problem z przełączaniem stron graficznych ale nie wiem czy pytać tu...

[Pascal] Jak wstawić enter co 28 znaków w pliku tekstowym?

Dzięki, ale mimo wprowadzonych przez Ciebie poprawek program dalej nie zapisuje wszystkie litery jedna po drugiej a ma być ze bo 28 literze ma przejść do następnej linii Dodano po 11 Poradziłem sobie!!!Dzięki za pomoc Zamieniłem: if i=28 then writeln(plik1,ch) else begin write(plik1,ch); i:=0; Na: if i mod 28=0 then writeln(plik1,ch) else begin write(plik1,ch);...

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

Nie zgodzę się że aby napisać OS-a potrzebny jest sztab ludzi. Mozna napisac os-a i mozna napisac OS-a. Ten zmalej litery to prawdopodobnie twoje rozwiazanie. Sam napisałem pełny system Co masz na mysli piszac pelny ? Jest zgodny z jakims ogolno przyjetym standardem (np: POSIX) czy jest pelny bo potrafi zaladowac do pamieci program i go uruchomic ?...

Jak zmienić stany pinów STROBE i SELECT na LPT w Turbo Pascalu?

Mam mały problem z obsługą portu LPT w Turbo Pascalu. Umiem wysyłać liczby i litery w kodzie ASCII do portu za pomocą komend, np.: port[$378]:=8; port[$378]:=ord('A'); Ale tymi poleceniami zmieniam tylko stany na wyjściach D0...D7. Moje pytani brzmi następująco: W jaki spasób można zmienić stan pinu nr 1 (STROBE) i pinu nr 17 (SELECT)? Do jakich adresów...

Pascal - jak wypisać całą linię z pliku zawierającą dane słowo?

Funkcja Pos(słowo, linia) zwraca wartość 0 gdy łańcuch "słowo" nie występuje w łańcuchu "linia" oraz pozycję od której w łańcuchu "linia" występuje "słowo" (w kodzie oczywiście nie może być litery "ł"). Zatem z mienna "znaleziono" nie jest potrzebna. Mam wątpliwości co do użycia "break" - a co będzie w sytuacji, gdy słownik zawiera: zamek - część karabinu......

Jak w Pascalu dodawać liczby szesnastkowe wczytane z klawiatury?

Gecko to wszystko prawda poza ostatnim stwierdzeniam o konwersji znaku hex. Pomiędzy '9' a 'A' są jeszcze inne znaki więc nie da się tego załatwić jedną linijką. Trzeba zrobić dwiema :), jedną dla znaków '0'..'9' z odejmowaniem ord(znak)-ord('0') i drugą dla znaków 'A'..'F' z odejmowaniem ord(znak)-ord('A')+10, Pozatym trzeba pamiętać o konwersji znaków...

Jak w Pascalu zrobić stronę tytułową z hasłem i komunikatem o błędzie?

Aby podczas przepisywania kodów z forum nie popełniać błędów stosuję parę mądrych poleceń: "Kopiuj - Wklej". Jeśli pracujesz w Turbo Pascalu, to jest z tym pewien kłopot (IDE Pascala ma swój schowek) i nie współpracuje ze schowkiem Widows. Ale zawsze możesz edytpwac "plik.pas" w jakimś edytorze tekstowym (Notatnik) i potem otworzyć w Pascalu. Pozostanie...

[pascal] Obsługa LCD alfanumerycznego przez port LPT

Witam, Napisałem programik obsługi LCD przez port LPT. Program ma za zadanie wyświetlić litery od A - K. Niestety wyświetlacz wogóle nie reaguje. Port otwieram za pocą programu UserPort. uses crt; var x:byte; const LPT = $378; procedure inicjuj; begin port[LPT+$02]:=$09; {RS=0} port[LPT]:=$30; delay(5);...

Jak napisać plik wsadowy do zamiany liter na 2-cyfrowe liczby i odwrotnie?

uwazam, ze jesli sprecyzujesz pytanie otrzymasz dokladniejsze odpowiedzi; chodzi o dosowego .bat'a, czy o skrypt linksowy ? piszac o zamianie liter na liczby masz na mysli litery z pliku, czy klepane z klawiatury ? jesli chodzi o .bat'a to obawiam sie, ze poleceniami systemowymi nic nie zdzialasz; mozna napisac prosty programik w c, pascalu czy czymkolwiek...

[Turbo Pascal 7.0] Kilka pytań na temat pisania programów

Witam. Napisałem program który wypytuje użytkownika o to: ile ma aktualnie lat, ile chciałby mieć teraz lat, jaką ma płeć, ile ma wzrostu w cm. Wszystkie odpowiedzi użytkownik musi wpisać w formie liczb. Czy istnieje możliwość napisania tak programu aby parametr taki jak płeć użytkownik mógł wpisać w formie litery lub całego słowa? Chciałbym aby użytkownik...

[Pascal] Sprawdzanie czy wprowadzona zmienna należy do liczb

Witam. Mam napisać program który będzie sprawdzał czy wprowadzona zmienna należy do licz, a w wypadku gdy byłaby to litera ma wyświetlić błąd. var b:real; begin writeln('Podaj liczbe'); read(b); {?}if b<>real then{?} begin writeln('Blad!! Podaj liczbe jeszcze raz); read(b); end else readkey;...

Jak zaimplementować szyfr Vigenere'a w Pascalu do szyfrowania pliku?

A zatem ja bym to widział tak (rozwiązanie może i wolne, ale czytelne): Tworzysz sobie tablicę dwuwymiarową statyczna (['a'..'z','a'..'z'] of char). Wypełniasz ją w taki sposób, że idąc w każdym wierszu po kolumnach zaczynasz od Chr(Ord('a')+nr_wiersza), jednocześnie sprawdzając przekroczenie zakresu (wartość litery 'z'). Jeśli nastąpi - wracasz do...

Błędy w programie Pascal - wyświetlanie imienia użytkownika

1. No gdyby był trudniejszy, to bym zaczął marudzić, że kawa mi się rozpuściła i nie widać błędów, a szklana kula potłukła... 2. W nazwach: programów , zmiennych, stałych, procedur, funkcji nie wolno stosować znaków spoza zakresu A-Z,a-z,0-9,_ (ANSI, a więc z podstawowego zakresu tablicy ASCII) a na dodatek pierwszym znakiem musi być litera lub _ 3....

Wyszukiwanie przybliżone w Pascalu z 2 niedopasowaniami w pliku tekstowym

Witam. Mam spory problem z programem ktory musze napisac na infe. Chodzi o wyszukiwanie w pliku tekstowym podanego wyrazu (wzorca), problem w tym, ze wyraz ktory zostanie znaleziony przez program nie musi byc identyczny .. dozwolone sa 2 niedopasowania roznego typu - przestawiona jedna litera (z sasiednia) - brak jednej litery - jedna litera inna -...

Dlaczego pętla repeat w Pascalu nie kończy się po wpisaniu 'n'?

Witam, czy mógłby mi ktoś wyjaśnić dlaczego podany program nie zakończy się po podaniu litery 'n'. Gdzie leży błąd ? program kolo; var znak:char; r:real; begin repeat writeln('Podaj promien: '); read(r); writeln('Pole jest rowne: ',PI*r*r:0:2); Writeln('Chcesz powtorzyc program t / n : ');...

Pascal - jak zapisać plik txt z polskimi znakami w ASCII?

Czy wie ktoś, jak to zrobić, żeby program napisany w pascalu zapisywał pliki txt w kodowaniu ASCII? Piszę program szyfrujący, który wstawia zamienione litery do pliku tekstowego, a szyfr zawiera polskie znaki, które są w ASCII. Plik jednak zapisany jest (chyba) w ANSI i zamiast polskich znaków są w nim jakieś krzaczki. Co zrobić, aby te znaki były poprawnie...

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

Pisząc takie bzdury nigdy nie nauczyś się poprawnego programowania. Już w poprzednich postach ktoś sugerował Ci zastąpienie procedury "read" przez "readln": uses crt; var liczba1,liczba2:longint; begin clrscr; writeln('Podaj pierwsza liczbe'); readln(liczba1); {!!! odczytanie liczby i wszystkich znaków do końca linii, w tym...

[C]Nie mogę przekazac długiego łancucha znakow do struktury

Ok, dzięki bardzo za lekcje :) Mam jeszcze pytanko, mianowicie czy istnieje w czystym C instrukcja, która zamienia wielkości liter ? Nie mogę się doszukać tego. W Pascalu było coś takiego jak upcase().

Jak zliczyć porównania w sortowaniu bąbelkowym w Pascalu?

o matko co to za forum gdzie czepiają się małej litery na początku zdania... jakieś naciągane te zasady... jestem aktywny na trzech innych forach i jakoś problemow z tego nie robią ;] dziękuję wszystkim za pomoc a swoich przyzwyczajeń nie zmienię ;] pozdrawiam

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

Po ostatnim end zamiast średnika daj kropkę. Skompiluj wtedy. Ostatni end w programie musi być zakończony kropką gdyż oznacza jego koniec. Jeśli dajesz znak średnika to oznacza, że dalej będzie jeszcze jakiś kod. Jak będziesz uruchamiał plik wykonywalny exe to chcąc zobaczyć serce to musisz wcisnąć dużą literę T. Uruchom sobie z wiersza poleceń.

Jak napisać program w Pascalu do odtwarzania plików audio (WAV/MP3)?

Wpadłem na pomysł, żeby zrobić taki prototypowy syntezator mowy :P Mam zamiar nagrać każdą literę alfabetu do osobnego pliku audio po wpisaniu tekstu będzie on dzielony na pojedyncze litery, które będą przypisywane do zmiennych 1,2,3,4,5,6,7,8,9 itd... i potem każda zmienna po kolei będzie przepuszczana przez instrukcję warunkową i jeżeli litera będzie...

Jak ustawić jasne tło w trybie tekstowym DOS w Turbo Pascalu 7.0?

Poniżej masz różne możliwości: uses Crt; begin TextBackground(Black);clrscr;{caly ekran czarny} { zielone litery na czarnym tle} TextColor(Green); TextBackground(Black); WriteLn('Witaj!'); { pulsowanie light-red liter } { na jasno-szarym tle } TextColor(LightRed+Blink); TextBackground(LightGray); WriteLn('nacisnij klawisz'); readkey; { Yellow litery...

Jak zapisać odsetki do tablicy w programie Pascal?

Z początku chciałem Ci podać tylko wskazówki, ale postanowiłem załączyć kod. Oznaczaj zmienne tak aby coś znaczyły, a,b,c,d nic nie znaczą, analiza programu jest utrudniona. Nie używaj liter z ogomkiem i kreską, nie ta tablica kodowa. uses crt; var i,ile_lat,wplata,procent:integer; y,ww:real; stan_gotowki:array[1..100]of real; function...

Jak wykluczyć litery przy wprowadzaniu liczb w generatorze totolotka w C?

Nie pamiętam na tyle C, ale zarys podaję ;) galdaniel - pierwsza linia po prostu "przesuwa" w systemie dziesiętnym liczbę o jedną pozycję w lewo i wstawia na najmłodszą pozycję naciśniętą wartość. cout>>c - oczywiście powinno być cout<<c unilt c=#13 (pascalowy zapis mi wyszedł) - w zasadzie until (c==13) , czyli do momentu, gdy zostanie...

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

witam, mam problem co do pascala. Chcialbym napisac licznik bledow do zle wprowadzonych liter przy zgadywaniu hasla. Jezeli popelnimy 6 bledow to program powinien pokazac "przegrales" i wyjsc do menu. tutaj kod: program wisielec; uses crt; var s,m:string; l:string[1]; i,z,licznik,tymcz:integer; begin; licznik:=0; repeat clrscr;...

Sortowanie tablicy dwuwymiarowej w Pascalu od Z do A - jak to zrobić?

Siema potrzebuje pomocy w programie. Program wypełnia tablice losowymi literami i sortuje je od od a do z. Problem polega na tym iż nie mam pomysłu jak zrobić to na tablicy dwuwymiarowej i żeby sortowało od z do a. [syntax=pascal] program project1; uses SysUtils; const min=1; max=5; type tElem = char; tTablica = array [min..max] of tElem; var t:tTablica;...

Jak napisać program w Pascalu do zarządzania danymi o samochodach?

Mam napisać "prosty" programik jako pracę zaliczniową (1 z 3). Problem polega na tym, że niwząb nie pamiętam już Pascala. Może ktoś pisał kiedyś coś podobnego i mógły sie podzielić... Treści: 1) Napisz program realizujący następujące zadania: -Zdefiniuj rekord, na który składają się dane o samochodach: marka, kolor, rok produkcji, uwagi - Wczytuje dane...

Jak pobrać zmienne w trybie graficznym w Free Pascal z modułem Graph?

wrych: a co robi procedura czytaj(...)? Zadeklarujemy: var liczba: string; Nagłówek procedury: procedure czytaj(komentarz: string; var napis: string; wspx, wspy: integer; max, skala :byte; znaki: zakres_znakow); Wywołanie: czytaj('Podaj liczbę ', liczba, 10, 30, 7, 2, ['1'..'9', '0', '.', '-'); powoduje wyświetlenie...

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

Witam wszystkich forumowiczów i proszę was o pomoc w zrobieniu programu, aby działał poprawnie bo ja próbuje ale nie wychodzi, a polecenie brzmi następująco:Zdefiniuj tryb rekordowy zawierający pola: -nazwisko,imię typu string oraz wiek typu integer. Zadeklaruj tablicę, której elementami są oba rekordy.Napisz program pozwalający wczytywać kolejne rekordy...

Jak stworzyć bazę danych w Turbo Pascalu? Jakie narzędzia są potrzebne?

Potrzebuje ta baze do projektu jako jeden ze skladników. gdzie ma zaznaczyć to ograniczenie do 100 osób ? czyżby to było to : array Post edytowałem. Zdania rozpoczynamy wielką literą, jeden znak zapytania wystarcza - krzychoocpp

[Bascom] Przypisywanie n'tego wyrazu ciągu do zmiennej

Witam. Od nie dawna uczę się programowania mikrokontrolerów w języku Bascom. Miałem wcześniej styczność z Pascalem także mam już pewne doświadczenie w tej dziedzinie. Nie mogę poradzić sobie tylko z jedną rzeczą... Mianowicie jak do zmiennej String*1 (chodzi o jedną literę) przypisać n'ty wyraz ciągu S typu string. W pascalu/delphi odbywalo się to tak:...

VirtualBox nie wykrywa pendrive'a - jak uruchomić Turbo Pascal na Win 7 64bit?

W menadżerze urządzeń - zarządzanie dyskami w hoście czyli win7 odłącz/usuń literę napędu pendrajwa (klikasz prawym - zmień literę napędu i tam jest usuń), w 99% pomaga, reszta to upierdliwy antywirus i inne skrajne przypadki.

Implementacja słownika polsko-angielskiego w C z bazą danych w pliku

Kafka -Pisałem w Pascalu, nie obiektowo więc też struktury. Pamięć dla struktury przydzieli Ci „malloc”. Samo wstawienie NULL’a nie daje nic, nie pamiętam co w C jest odwrotnością „malloc” coś z free w nazwie, ale ze zwalnianiem tego jest kłopot, przy wielkim słowniku jest to najbardziej czasochłonna operacja, bo pamięć...

[pascal] [Pascal] Błąd kompilacji przy sumowaniu pięciu cyfr - co robię źle?

tak powinien wyglądać ten program...oczywiście brak w nim zabezpieczeń że to co wprowadzisz nie jest literą tylko liczbą..ale to już sam zrobisz:D program dodaj; var a,b,c,d,e,suma:integer; Begin writeln('podaj a:'); readln(a); writeln('podaj b:'); readln(b); writeln('podaj c:'); readln(c);...

[Pascal] Jak w Pascalu wyświetlić tekst obok siebie w trybie graficznym?

Chodzi o coś takiego ? uses Graph; Var ster,tryb:integer; a,b:char; Begin writeln('wybierz litere a'); readln(a); writeln('wybierz litere b'); readln(b); ster:=VGA; tryb:=VGAHi; InitGraph(ster, tryb, 'C:\BP\BGI' ); outtextxy(20,30,'a = '+a); outtextxy(20,60,'b = '+b); outtextxy(20,90,'Nacisnij...

Pisanie programu sterującego aplikacjami, systemem itp.

Tjanusz, moze i nie rozumiesz zapisow stosowanych w C, ale to nie powod by twierdzic, ze C jest nielogoczny (jesli Cie tak raza te zapisy zawsze mozesz pisac standardowo). Tylko, ze Ty jak napisales zajmujesz sie przepisywaniem programow z C na pascala? Niezbyt tworcze zajecie, chociaz....;) Pewnie stad te Twoje fanaberie na temat nielogicznosci. To...

Pascal - Programowanie - "prosta" gra na zaliczenie ...

Witam!! Mam do napisania prostą grę w Pascalu polegającą na zbieraniu opadających symboli '(at)' za pomocą platformy w konsoli . Chciałbym zapytać o kilka rzeczy: Jak zrobić aby poruszać się platformą i jednocześnie opadały symbole. Dlaczego, gdy wciskam strzałki program wykonuje pętlę dwukrotnie? i jak się tego pozbyć. Jak mam zrobić podliczanie punktów...

Jak zaimplementować odpowiednik readln i read z Pascala w języku C pod DOS?

gets() - wprowadza tylko łańcuch getchar() - pobiera 1 litere, jak potrzebujesz z enterem to było chyba getche() scanf() - pobiera wszystko, formatuje od razu do odpowiedniego typu danych cin - wszystkie typy (tylko c++)

Pascal, błąd w programie, inne polecenie zamiast gotoxy?

może mi ktoś powiedzieć co jest źle (błąd wyskakuje przy else) i czy jest inne polecenie zamiast tego gotoxy dla całości? program srednie; uses crt; var dyst:real; spalanie:real; wynik:real; cena,koszt,suma:real; kilom:real; spalanie1:real; waluta:string; auto:integer; begin clrscr; gotoxy (30,25); writeln ('Aby...

[delphi] [Delphi] Jak filtrować bazę danych bez uwzględniania wielkości liter?

http://forum.4programmers.net/Delphi_Pas... - tutaj ktoś miał podobny problem, myślę że to pomoże Ci rozwiązać problem

Potrzebna pomoc w Dyskretnej Transformacie Fouriera

Cześć, nie odpowiadałem ostatnio bom miał dość pijany koniec tygodnia. A to kolegę żona odeszła, a to prokuratorowi coś się przypomniało (trzeba było uczcić że niepotrzebnie), a to znowu mnie dopadły koszmary ;-). Na otrzeźwienie poczytałem sobie „Cyberiadę”. Nie do końca podziałała, ale może dla tego że, w lodówce było jeszcze trochę płynnego...

FAQ o sterowaniu portem LPT - architektura i funkcje pinów D0-D7

Witam Trochę denerwuje mnie, że w tym dziale ludzie często pytają to samo, zamiast użyć funkcji "szukaj". Ja szczególnie zwracam uwagę na pytania o sterowanie LPT, dla tego zrobiłem krótkie FAQ (jeszcze nie skończone) i zamieszczam je poniżej. Całą sprawę uzgodniłem z moderatorem gulson, który przekazał mi 30pkt na wyróżnienie tematu. Jeżeli też Was...

Jak zacząć naukę programowania od podstaw?

BEGIN Port A więc to o to chodzi 8O 8O 8O Ty po prostu nie potrafisz programować!!!! I dodatkowo pomyliłeś odczyt z portu przez procesor z wprowadzaniem danych przez port :lol: :lol: :lol: Ach te podobnie brzmiące słówka :wink: A wiesz jaką liczbą odczytałbyś, gdyby do portu podłączone było coś o wysokoomowych wejściach? Kolego miałbyś stale odczyt...

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

Jeśli już robisz planszę do gry to zapisz to jako 'zrzut ekranu' (tablica->litera:atrybuty), wczytuj i zapisuj do tablic przez blockread i blockwrite, używaj do wyświetlania bezpośredniego 'przerzucenia' tablicy ze screenem na pamięć ekranu (lub bufora).

Nieczytelne czcionki w DOS na laptopie Compaq Armada 7770DMT

Witam, mam problem z grafiką pod dosem a dokładniej z czcionkami w niektórych porgramach np w programie do centralki lpg lcsa1 v05 (tak jakby był problem z programami napisanymi w np pascalu lub borlandzie) Np. zamiast liczb i liter są krzaczki, z grafiką w programie jest wszystko ok tylko czcionki są nie czytelne. Mój laptop to armada 7770dmt. Jeżeli...

Jak zaimplementować sortowanie i edycję w bazie filmów w Pascalu?

[syntax=pascal]program wypozyczalnia; uses crt; type film=record rezyser:string[20]; tytul:string[50]; rok:integer; miejsce:string[50]; aktor:string[50]; numer:integer; wyp:boolean; end; var plik:file of film; fl:film; q,rez,ty,miejsce:string; nr,rok,n:integer; a,b:char; c:array[1..100] of film; {POWITANIE} {procedure wstep; begin clrscr; writeln('WITAMY...

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.

Opinia o programie - błędy tylko dla zainteresowanych

Witam, mam prośbę tylko dla osób zainteresowanych, napisałem prosta grę w pascalu i prosiłbym bardziej zaawannsowanych programistów o jakiekolwiek opinie, wskazówki czy też błedy znalezione w kodzie. Program jest dopiero w fazie początkowej. Zdaję sobie sprawę że moja prośba jest dość czasochłonna ( kodu jest sporo ) dlatego jak już pisałem prosze o...

Ile bramek logicznych mieści się w nowoczesnym procesorze CPU?

AVE... To już zależy od realizacji układu. Prosty mikrokontroler ośmiobitowy najwięcej tranzystorów będzie miał w blokach pamięci, bo reszta to proste układy. ALU będzie małe, dekoder rozkazów ciut większy, a zbiór rejestrów będzie przypominał kolejny blok pamięci. Komórki pamięci są dość duże i dlatego dużo miejsca zajmują. W przypadku CPU i GPU pamięć...

Type mismatch w Pascalu przy przypisaniu tablicy k:=kp+kp*r; – jak poprawnie obliczyć?

przyklad mnozenia elementow tablicy przez 5: tab: array[1..10] of integer; i: integer; for i:=1 to 10 do tab[i] = tab[i] * 5; teraz mosisz tylko dostosowac powyzszy kod do swojego programu Wiele razy zwracałem koledze uwagę na niechlujną pisownię. Przypominałem o tym że zdania rozpoczynamy wielką literą i kończymy...

Sterowanie obrotami wentylatora rekuperatora na podstawie przepływu powietrza

Anemometr (jego sonda pomiarowa) mierzy prędkośc powietrza, a nie przepływ. Przepływ [m3/h] jest zależny od prędkości [m/s] i jest to zależnośc liniowa - prędkośc pomnożona przez przekrój daje wydajność (przepływ). Niektóre "inteligentne" anemometry mają wbudowane przeliczanie prędkości na przepływ - wprowadza się wtedy wymiary kanału, urządzenie oblicza...

Instalacja Turbo51 na Windows 8 i XP (32-bit) - okienko szybko znika

To co Ci się otwiera to "help" jak używać program. Jest to program konsolowy, kompilator Pascala dla 8051 i debuger. W jednej z pierwszych linijek masz: Turbo51 [opcje] plik [opcje] . Proponuje utworzyć plik xxxx.bat na wzór, który Ci podesłałem; i w pierwszej linijce napisać to co przytoczyłem w poprzednim zdaniu, odpowiednio zastępując opcje i plik...

Pomoc w kupnie PC - Proszę o weryfikacje wybranych przezemnie podzespołów PC

- Największe wątpliwości mam co do płyty głównej , czy będzie dobrze współgrać z prockiem? W prawie wszystkich testach gdzie procesor jest podatny na podkręcanie, pojawiają się płyty z chipsetem Z97 ale czy Z170 (droższa) nie jest lepsza? (Ma więcej złącz itp.) Tylko czy obsługuje podkręcanie jak płyty z chipsetem Z97? Wszystkie płyty z chipsetem na...

Jak poprawić wyświetlanie menu kontekstowego w Pascalu?

Tak jak pisałem wcześniej, uses deklarujemy tylko raz, dla całego programu, i musi to nastąpić w bloku deklaracji globalnych. Wstawiłeś uses w deklarację procedury, stąd compiler error 36. uses crt; type licznik = record sasiad: string[20]; ja: string[20]; ile: longint; end; var klawisz: char; wybor: byte; napisy:...

Delphi - Jak przekształcić tabelę HTML na tekst?

Wszystko działa! Używam wprawdzie wersji 10.00 (2005), ale jest ta funkcja i jest w pełni obsługiwana. Zatem w finalnej wersji posłużyłem się na końcu funkcji nie: Dodano po 2 OK, doszedłem do tego, że funkcja Insert daje mi możliwość wstawienia czegoś w stringa, a wskaźnik wskazuje tylko miejsce w pamięci, więc wszystko gra i buczy. Mogę poprzez wskaźnik...

Nauka programowania - C++, JavaScript czy może coś innego.

Androida kilka lat temu w ogóle nie było Czy ktoś tu pisał o Androidzie? Ja jakoś nie widzę takiego posta... Uczyć się trzeba programowania, a nie języków i platform. To prawda, ale jak chcesz powiedzieć początkującemu by zaczął uczyć się programowania bez angażowania się w konkretny język? Można zacząć od Logo... kiedyś były formy logo które umożliwiały...

Jak przygotować się do egzaminu praktycznego technik informatyk 2012?

Informatyk, (...)...itp można, Zdefiniuj mi pojecie informatyka? Ten co na podwórku za piwo zrobi ci formata? Ten co złoży peceta z części? Ten co usunie wirusa? a może ten który napisał parę aplikacji? (nie zależnie czy to w nieszczęsnym szkolnym Pascalu, Javie, C++, a może nawet PHPie) a może ten który z zamkniętymi oczami postawi i skonfiguruje...