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...
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"...
Można też ograniczyć do wpisywania wyłącznie cyfr np w ten sposób: function wczytaj: integer; var wynik: integer; c: char; begin wynik:=0; repeat c:=getchar(); if c in ['0'..'9'] then begin wynik=wynik*10+ord(c)-ord('0... write(c); end else if (c=#8) then //backspace begin wynik=wynik...
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: ‘+’, ’-‘, ‘*’...
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.
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...
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 ?
Zobacz nagłówek ctype.h (albo cctype w C++) i funkcję int toupper(int c); Pozdrawiam, Dr.Vee
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"
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
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...
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 ?...
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......
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...
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)...
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ć???
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...
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',...
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...
Nie ma Pascala - do 4 liter! ;)
Istnieją trzy rozwiązania tego problemu. 1. Uniwersalne - to znaczy takie które będzie w stanie wyświetlić dowolny napis, złożony z dowolnych znaków ('%','*') przenosząc poszczególne pixel-e, z których zbudowane są litery i generowanie ich odpowiedników, za pomocą znaków. Odradzam, jest to dość skomplikowane. Można co prawda znaleźć gotowe kody źródłowe...
Spróbuj zmienić małe 'm' na duże 'M' Kompletnie bzdurna porada!!! Pascal nie rozróżnia wielkości liter.
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;)
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.
spróbuj z dużych/małych liter.
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.
litery inne niż małe: możesz zrobić tak: program test; uses crt; procedure test_znak; var ch : char; begin repeat writeln('Podaj znak do zakodowania: '); ch := readkey; until (ord(ch) >= ord('a')) and (ord(ch) <= ord('z')); writeln('Podales: ',ch); end; procedure test_liczba;...
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
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.
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);...
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...
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.
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.......
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ć...
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);...
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?
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...
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...
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...
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...
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]
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...
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...
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().
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
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...
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...
1. Tworzysz zmianą klasy TStringList. Ładowanie pliku TStringList.LoadFroFile(nazwa_pliku) 2. Liczba linii -> TStringList.count 3. Ilość znaków -> sizeof(TstringList.text) 4. Liczenie spacji -> prosta pętla na przeliczanie występowania znaków w TStringList.text. 5. To samo co wyżej, wywołane dla każdej litery. Ten program można napisać w ok 20 liniach....
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...
if ((x >= '65') && (x <= '90')) { Dwie sprawy: 1. Nie jesteś w Pascalu więc nawiasy przy warunkach są zbędne. 2. Zapis w pojedynczym apostrofie dotyczy pojedynczego znaku więc piszemy np. 'a', 'b', ..., 'z' itp. dwa znaki występują tylko przy znakach specjalnych np. '\n' - znak końca linii. scanf ("%c", &x); Od kiedy w ten sposób...
znikające litery podwójne litery litery wyswietlaczu
megane poduszka powietrzna mazda gasnie benzynie większy zasilacz laptopie
philips gc9682 schemat kiedy świeci żarówka
Dodge Caliber 1.8 - sygnały dźwiękowe po uruchomieniu Litera "T" na wyświetlaczu Baofeng UV-5R Max - co oznacza?
