Nie wiem, czy to błędy przy przepisywaniu ale w Twoim kodzie jest ich kilka. Np: dwukropek zamiast średnika w linii a nawet nie pojawia mi się tekst Podaj liczbę A co Twoim zdaniem ma ów rzeczony tekst wyświetlić. TP nie jest wróżką i na domysły nie bierze.
d to tablica liczb, a do wyświetlenia potrzebny jest tekst. Błąd polega na niezgodności typów - musisz dokonać konwersji liczby na tekst (inttostr).
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;)
[syntax=pascal].... var f:text; begin assign(f,'asdasd.txt'); rewrite(f); ...... for t:=1 to liczba1 do begin liczba3:=liczba3+liczba2; write(f, liczba3, ', ') end; close(f); end.[/syntax] albo prawym klawiszem w pasek konsoli właściwości | opcje | ptaszek przy tryb szybkiej edycji [ OK ] myszką zaznaczasz fragment, [ ENTER ]
Ad. 1. Po prostu Write(g) (możesz też w jednej procedurze podawać kilka parametrów oddzielonych przecinkami i mogą to być zarówno teksty jak i liczby w postaci stałych lub zmiennych. Ad 2. Każde odwołanie do tablicy zapisuje się poprzez nawias kwadratowy ( tablica ), gdzie tablica to zmienna typu array, a numer to wartość z zakresu indeksu (nie koniecznie...
Tylko właśnie o to chodzi, że ten ciąg znakow nie jest za każdym razem taki sam zmienia sie sie liczba wew. i zaczyna się i konczy nawiasami. Da się tak zrobić żeby wląsnie usuwało od nawiasu do nawiasu żeby z (90 rows affected) nie było nic. Możliwe że trzeba właśnie popracować z funkcja delete i pos, ale nie wiem jak napisać, gdy spotkasz '(' usuwaj...
Dla 100 miejsc po przecinku pozostaje Ci operowanie na tekście.
Witam. Zdawałem nową maturę z informatyki w tym roku :) Nie wiem jak określić te zadania, ale do najłatwiejszych nie należały. Ufoludki, jakieś liczby - powiem szczerze - bez znajomości matematyki trudno jest je rozwiązać. Praktyka - do najłatwiejszych też pewnie nie należy. Arkusz kalkulacyjny i baza danych oraz edytor tekstu to podstawa. Przekonany...
Nie, mnożenie tekstów jest tak samo wykonalne, jak upieczenie mieszkania czy wyhodowanie telefonu. Mnożyć możesz tylko liczby.
Generalnie to nie ma potrzeby aż tak szerokich opisów. Np dla warunków wystarczy "l1 = 25?" Komunikat proszący o podanie oraz operacje podania liczby można zapisać w jednym bloku wejścia wyjścia, ale jeśli rozbijemy na dwa, to nie jest to jakimś błędem. W całej petli FOR zdecydowanie zapomniałeś o zwiększeniu licznika pętli. Takie funkcje jak wyczyść...
Działa tak jak chciałem a czy da rade zrobić żeby zrobić taką pętle żeby podać do programu 10 liczb i te liczby będą zapisane w pliku tekstowym w postaci binarnej jeden pod drugim: (plik.txt) np: 10100110 10101100 10101010 01101011 coś takiego pętle już zrobiłem ale zapisuje tylko jedną liczbę binarna w notatniku [syntax=pascal]program postac_binarna;...
o ile sterowanie Mitsubishi programuję metodą drabinkową (mam zresztą do wyboru drabinka lub ST) to w Step7 mogę się "wyżyć". Zaczynając w S7Graph - główny przebieg procesu, AWL=ST obliczenia,adresowanie pośrednie,transfery,skoki, FUP- proste układy RS,& > itp. oraz niekiedy SCL-okrojony Pascal- logiczne powiązania (np. winda) oraz konwertowania liczb...
Program Konwertuj; {Program konwertuje wprowadzonĄ liczb© cakowitĄ na zapis sowny} uses crt; Var T1 : array [0..9] of string; T2 : array [0..9] of string; T3 : array [0..9] of string; T4 : array [0..9] of string; T5 : array [0..5] of string; Liczba : longint ; {Liczba wczytana do konwersji } Licznik : byte ; {Ile razy zostaa wykonana p©tla...
Ogólnie nie wiem jaka ma być idea tego programu ale sadze iż ten sprosta twoim oczekiwaniom. Jednym z błędów którego nie potrafię poprawić jest tablica z indexami dlatego zawsze tworzy się 10 elementowa tablica na indexy a nie 2-3 tyle ile wpiszesz że chcesz liczb. Jeżeli nie o to chodziło to napisz konkretniej jak ma to wygladać :) [syntax=pascal]...
tak, wspomniałem o tym :) ale spróbuj już z więcej niż 1 :) prosze bardzo (liczba 50): http://obrazki.elektroda.net/46_12132890... dalej to samo (i tak samo jest dla liczby wielobajtowych) :D
zmień pętlę z 1..5 na 0..4 i zmień liczby 12, 13, 14... w gotoxy na 2, 3, 4 itd.
Witam, potrzebuje pomocy z programem który ma pobierac od użytkownika liczby do momentu podania liczby całkowitej... Jeśli dobrze zrozumiałem tekst, to Twój program powinien przyjmować liczby typu Real (zmiennoprzecinkowe), np 2.4, 0.567 itd. A zakończy działanie gdy wprowadzoną liczbą będzie np. 5. Zatem operatory typu mod nie wchodzą w grę. W Pascalu...
[url=http://forum.dzyszla.aplus.pl/topic... dzielenia na wielobajtowych liczbach w systemie binarnym przedstawiłem w zlinkowanym tekście. Jeśli jednak chcesz zastosować stricte zasady dzielenia pod kreską, to również można. Najlepiej potraktuj liczbę wejściową jako ciąg tekstowy. Następnie od jego początku szukaj takiej wartości, która...
Jeżeli chodzi o sortowanie liczb (zaimplementowane w pascalu) to może to się przyda: http://omklnx.il.pw.edu.pl/~rgajewski/pa... http://www.sciaga.pl/tekst/42010-43-sort... Ale nie znam dokładnie zadań tego program, lecz poczytanie tego w linkach powinno dać jakiś pogląd na algorytmy sortowania ;)
atrybut znaku jest zapisany liczba 8 bitowa. 1bit migotania 3 bity koloru tla i 4 bity koloru znaku. na pewno mozna ustawic karte zeby migala albo zeby dawala jasne tlo. tyle ze nie pamietam co sie tam ustawialo :D napewno bylo to mozliwe bo robilem takie rzeczy :D. chyba jakas zmienna systemowa, jak sobie przypomne to podpowiem :)
Witam, Muszę napisać program w pascalu który wczyta słowo i obliczy mi ile razy pojawiło się ono w tekście. Próbowałem już wszystkiego, ale nie mam głowy :( Przerabiałem ten program: [syntax=pascal]program project1; const tabulacja=9; var plik:text; n:integer; nazwa:string[12]; procedure slowa(nazwa:string; var liczba:integer); var znak:char; noweslowo:boolean;...
#include <conio.h> #include <stdio.h> ... cin >> tekst; ... for (i=1;i<=length(tekst);i++) if ( upcase(tekst Widzę, że jesteś poliglotą :) O ile mieszanie C z C++ jeszcze można przeżyć, to dodanie do tego Pascala jest już przesadą :)
Zbiór typu wyliczeniowego nie pozwala na wyświetlenie tekstu, gdyż... składniki typu wyliczeniowego nie są tekstem! W procesie kompilacji każdy typ wyliczeniowy zostaje skonwertowany na liczbę, zaś samo istnienie ma jedynie cechy warstwy abstrakcji i ma uczytelniać upraszczać pisanie kodu.
{Czy ktoś potrafi zmodyfikować i uruchomić poniższy program tak aby zamienił wczytana liczbę na tekst ?? Liczę na pomoc, w sobote mam drugi termin!! Program Słownie; uses crt; var {Deklaruj© tablice, oraz zmiennĄ "liczba" kt˘ra zostanie zapisana w postaci s�ownej} {jedno�ci} T1: array Zamykam. - arnoldziq
uses crt,dos; var fSource:file; bufor:array[0..1023] of char; i,o,p:word; read:integer; liczba:longint; cyfr:byte; znal_liczby:array[0..1023] of longint; ind_znal_liczb:integer; procedure SwapLI(var a,b:longint); var tmp:longint; begin tmp := a; a := b; b := tmp; end; begin...
Algorytmów sortowania znajdziesz całą masę. Na przykład sortowanie bąbelkowe: http://pl.wikisource.org/wiki/Sortowanie... W przykładach porównuje się liczby, a nie ciągi tekstu, ale wystarczy napisać procedurkę porównującą dwa ciągi tekstowe. Porównujesz wtedy ciągi, ale sortujesz liczby - indeksy. Być może w Twojej odmianie Pascala...
Ja polecam Free Pascal Compiler. Jest na prawde bardzo dobry. Przede wszystkim dziala zawsze i wszedzie, nie ma problemow z modulem graph i crt, i do tego ladna prezentacja kodu gdzie np. rozkazy, liczby i zwykly tekst sa oznaczane innymi kolorami. Wyciaga standardowo rozdzielczosci do 1024x768 256 kolorow. Qrcze na date nie spojrzalem. :P:P;P:P
Źle to ująłem - chodzi mi o zwykły program który liczy np pole jakiejś figury. W trybie tekstowym potrafię to napisać i bardzo dobrze to działa. W trybie graficznym owszem pokazują się linie tekstu np"podaj wysokosci figury" , "podaj długość boku" , "objętość figury wynosi ..." i w tym momencie nie ma żadnej liczby jakby program nie obliczał. W trybie...
Witam! Nie za dużo kombinowania??. BlockRead nie nadaje się do wczytywania liczb zapisanych jako tekst, bo liczba może być jednym znakiem >5< lub np. pięcioma znakami >12345<. Przy tak ładnie zapisanej tablicy powinno wystarczyc: //po otwariu pliku for y:=1 to LiczbaWierszy do begin for x:=1 to LiczbaKolumn do Read(Plik,Tablica[X,Y]);...
Rozumien, że tam gdzie w tablicy jest aż do 63999 znaków mogę to zmienić na 255 znaków bo tyle ma mieć tekst ? I czemu tablica jest of char ? Myślałam że ma być of string. Napisałam to tak : var słowo:array[1..255] of string; wyraz:array[1..n] of string; czy w tej tablizy z wyrazem liczba znaków musi być zdefiniowana, no bo w końcu nie wiemy jak długiego...
Brak dolara i zera. Dolar wymusza tryb szesnastkowy, a zero jest potrzebne aby to byla liczba. W dziesietnym sie nie da adresować. Specyfika Pascala. Spróbuj mem[$0B800:$0001] := '#';
1) przy okazji dobralbym jakas sensowna wartosc Dx. obecnie na 640 punktach jest proba rysowania cos ze 200 tys punktow. rozumiem ze to po to zeby zachowac ciaglosc przebiegu. a nie lepiej 639 lini? 2) x:=x+Dx; to wszystko przez to sumowanie, bo Dx = 0.0001 a taka liczba nie za bardzo ma rozwiniecie binarne. lepiej x wyznaczac jako xpocz + ilosc krokow...
Może w Visual C++: 1) Stworzyć formularz z 4 polami edit i przyciskiem "oblicz". 2) Kliknąć w przycisk i napisać procedurę obsługującą zdarzenie: - zadeklarować odpowiednie zmienne liczbowe - przypisać wartość pól tekstowych odpowiednim zmiennym dokonując konwersji teksty na liczby - wykonać obliczenia - zamienić wynik na tekst i podstawić go do odpowiedniego...
Każdy TEdit ma właściwość Text, która zawiera tekst wpisany do niego. Trzeba ten tekst zamienić na liczbę, dokonać odpowiednich obliczeń a następnie wyświetlić. Nie można dokonywać obliczeń czy przypisania wartości bezpośrednio do kontrolki, tylko do jednej z jej właściwości.
To jeszcze po części zależy od tego, jak chcesz zrealizować interfejsowo kwestię. Tak, na plansze nada się tablica dwuwymiarowa. A właściwie to dwie - po jednej na każdego zawodnika. Gra by musiała składać się z dwóch etapów: 1 - wypełnienia tablicy (ręcznie lub automatycznie), 2 - właściwej gry. Jeśli to mają być tylko pojedyncze statki, to sprawa...
AD.1.Funkcja VAL, znana z Turbo Pascala działa na tej zasadzie, że jeżeli tekst podany w pierwszym parametrze dla funkcji nie jest liczbą całkowitą zwróci w ostatnim parametrze Code wartość większą od zera (będącą pierwszą napotkaną pozycją wadliwego znaku - nie będącego cyfrą). Oto przykład właśnie tej funkcji: var Str : string; I, Code : integer;...
Nie ma potrzeby żadnej tablicy - po prostu wywołujesz procedurę wyświetlającą pytanie (parametr) i możliwe odpowiedzi (kolejne np. 4 parametry) oraz, która poprawna (parametr), a niech zwraca (i to będzie funkcja, a nie procedura już!), czy wybrano poprawną. Gdzieś w głównym bloku zliczasz liczbę poprawnych. Oczywiście pojęcie użycia procedur jest dość...
...a nie lepiej po prostu: writeln(wynik:6:0); albo tak (z poprzedzającymi zerami): Writeln(FormatFloat('000000#',wy... albo jak bardzo chcesz mieć to w zmiennej typu string przed wyświetleniem, to: [syntax=pascal]Program TestFixed(output); uses sysutils; var a: double; s: string; begin a:=1.56; s:=FormatFloat('000000#',a);...
Funkcja Random również zwróci za każdym razem ten sam wynik (w Windowsie). Dopiero Randomize (pascal) powoduje zainicjowanie generatora liczbą związaną z czasem systemowym. Jako, że wzory na liczby są nieskończone w obie strony, konieczne jest określenie warunków startowych, a więc pierwszej liczby. Dalej idzie już swoim życiem. Opisałem to (a dokładniej...
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...
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...
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...
Chcesz uczyć się programowania i pisać jednocześnie chyba dość obszerny program użytkowy. Według mnie ciężko te dwie sprawy pogodzić, chociaż sam kiedyś pisałem od podstaw bazę danych dla wypożyczalni kaset wideo w Pascalu. Po pół roku dzieło było gotowe a ja zgłębiłem Pascala... Koledzy licytują się pomiędzy wyborem C++, C# lub Delphi... W każdym przypadku...
Wszystkie typy liczb całkowitych (ale uwaga - w pewnych kompilatorach nie dotyczy to Int64) oraz znakowe są policzalne. Tak samo typy wyliczeniowe. case nie mogłoby być zastosowane np do liczb zmiennoprzecinkowych, tekstów, klas, dat. Co do MAX_INT - niektóre kompilatory miały predefiniowaną stałą MaxInt. Oczywiście chodzi o największą wartość jaką...
A znacie może komendę zmieniającą nazwe plików (wraz z rozszerzeniem). Odpowiednik ren w batch Np. Rename - jedna wada - plik musisz najpierw otworzyć. Poszperałem w google, i nie czaje nic z tego kodowania. Możecie mnie oświecić... Ja chciałbym aby kodowało do znaków specjalnych typu: «�#181;¾җم&...
Cześć Czy posiada ktoś może i byłby skłonny udostępnić kod lub biblioteki serwera, klienta i ewentualnie hosta. Interesuje mnie jeden z dwóch wariantów pozwalających na wymianę informacji (tylko liczby i tekst) w grupach użytkowników w dwóch wariantach: 1. serwer przechowuje wszystkie informacje u siebie w swojej pamięci podręcznej. użytkownicy łączą...
Pojawia się błąd: "Error 3: Unknown identifier." Gdzie jest błąd?
Hej Kocia! :) Dawno Cię nie było, aż wspominałem ostatnio że może byś komuś pomogła wskaźniki zrozumieć :P Ale do rzeczy - faktycznie, jak Krzycho wspomniał, operacje na innych systemach liczbowych najłatwiej przeprowadzać bazując na tekstach. Generalnie opiera się o założenie takie: wartość = Σ a(i)*p^i, gdzie i=0 i - numer kolejny cyfry...
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...
(at)ElektrodaBot Pokaż prosty przykład we FreePascalu jak używać CreateFile/ReadFile/WriteFile do obsługi portu COM pod Windows. Bezpośrednia odpowiedź Poniżej masz minimalny, samowystarczalny przykład w Free Pascalu (Windows), który otwiera port COM przez CreateFile, konfiguruje go przez DCB/SetCommState i COMMTIMEOUTS/SetCommTimeouts, po czym wysyła...
Mógł bym jeszcze prosić o pomoc z tym ? Sortowanie śmiga, losowanie śmiga, ale sprawdzanie, czy rekordy nie są takie same nie śmiga. Trochę się na męczyłem, bo nie mogłem wpaść na pomysł, który by działał, ale wymyśliłem. Program działa, ale się sypie, gdy licznik (ten pod untilem) jest w okolicach 350. Chciałem znaleźć rozwiązanie. Dodałem zapis do...
pascal tekst pascal liczba tekst pascal
zamek centralny uniwersalny centralka długo kręcić passat zwiększyć prąd ładowania
pilot cosmo interfejs multidiag
Trzeszczenie wzmacniacza bez muzyki - przyczyny i rozwiązania Szarpanie przy odpalaniu Kia Sorento 2.5 CRDi 2005
