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).
zmień pętlę z 1..5 na 0..4 i zmień liczby 12, 13, 14... w gotoxy na 2, 3, 4 itd.
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.
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;...
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...
Weźmy np. taką linię :" (123 rows affected)". Musisz ustalić jaki element będzie niezmienny. Np. rows affected . Nazwijmy ten niezmienny ciąg znaków, po prostu, znacznikiem. Pobierasz całą linię tekstu. Sprawdzasz czy znajduje się w tej linii znacznik. Wiemy, że ten ciąg jest poprzedzony jakąś cyfrą oraz nawiasem. Funkcja POS , zwróci Ci jaką pozycję...
Jak zrobić edytor tekstu w pascalu. Ma mieć funkcje np. wstawiania spacji, przenoszenia wyrazu bez ucinania, przenoszenia linijek w dół po naciśnięciu entera itp. Jak przechowywać\pisać tekst, jeżeli jest dłuższy niż 255 znaków? Zamykam. - arnoldziq
Uses GRAPH; Var ster,tryb:integer; a,b:char; Begin writeln('wybierz literę a'); readln(a); ster:=VGA; tryb:=VGAHi; InitGraph(ster, tryb, 'C:\BP\BGI' ); outtextxy(20,30,'a'); CloseGraph; writeln('wybierz literę b'); . . . . outtextxy(40,30,'b'); End. powiedzmy że tak wygląda obecnie...
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;)
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.
Witam, potrzebuję napisać w Pascalu pętlę, która umożliwiałaby wprowadzenie liczb do momentu wciśnięcia jakiegoś klawisza. Bardzo byłbym wdzięczny, jeżeli ktoś naprowadziłby mnie jak zrobić taką pętlę, albo podał już gotowy kod. Z góry dziękuję za pomoc.
zrobilem program zeby losowal 39 liczb losowych z 99, ktory ma pokazac je w jednej lini oddzielone spacja..... Jednak jest problem...... w jednej lini nie zmieszcza sie 39 liczb bo za malo miejsca.... zmieszcza sie tylko max 30 liczb..... co zrobic zeby wszystkie zmiescily sie w jednej lini albo przynajmniej byly w drugiej...
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...
Dla 100 miejsc po przecinku pozostaje Ci operowanie na tekście.
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...
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...
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...
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ść...
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...
...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);...
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...
Niestety wprowadzenie tej zmiany nic nie daje, a nawet nie pojawia mi się tekst Podaj liczbę a po wpisaniu jednej z liczb i wciśnięciu klawisza enter zamyka mi się okno podglądu.
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...
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 ;)
Na jednym i tym samym komputerze, na pełnym ekranie w jednym programie tło może mieć 1 z 7 kolorów, a tekst może migać, a w innym tło można zdefiniować na 1 z 16 kolorów bez możliwości migania tekstu. Takimi programami są np. Edytor MS-DOS (dostarczony razem z systemem, wywoływany poleceniem EDIT), Norton Commander firmy Symantec, prawdopodobnie Norton...
Ź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...
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
#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ą :)
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...
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.
{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
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ść...
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...
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]);...
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...
[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...
zrobic tablice stringow i do niej wpisac tekst z pliku na poczatku wyswietlic pierwsze 24 linie zrobic zmienne przechowujace od ktorej linii do ktorej linii wyswietlac, po nacisnieciu np. strzalki w dol zwiekszyc obie zmienne i wyswietlic ponownie tekst, po nacisnieciu strzalki w gore zmniejszyc obie zmienne i wyswietlic ponownie tekst, mozna tez obsluzyc...
(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...
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ą...
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...
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ą...
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...
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...
No to skoro sobie marudzimy to: - bez sensu? no nie całkiem. A jednak juz w kolejnej linijce temu zaprzeczyłeś, więc chyba całkiem. - eof konieczny? wcale nie bo zobacz w programie Dialera wystarczy pętlę WHILE NOT EOF(FI) zastąpić przez REPEAT ...... UNTIL READ<1024 i co? eof jest konieczne? ;) Tak. To jest najprostszy sposób sprawdzenia końca pliku...
Przepraszam za błędy w tekście "Maskowanie bitów". Poniżej poprawiona wersja. ----------------------------------------... MASKOWANIE BITÓW w pigułce. (Dla tych, którym sprawia trudność zrozumienie zagadnienia) PODSTAWY Liczby binarne - szybkie czytanie ich wartosci (dzisiętnych) polega na określeniu położenia ustawionego bitu (czyli...
Napisz fragment kodu dla przykładu. coś ze starych zasobów [syntax=pascal]Program BazaTeleadresowa; Uses Crt; type TData = record {definicja typu danych strukturalnego} Imie: String[10]; {dane - stringi o okreslonej dlugosci} Nazwisko: String[15]; Tel: String[12]; Ulica: String[20]; Mieszkanie: String[5]; Miasto: String[15]; Kod: String[5]; end; const...
https://obrazki.elektroda.pl/7656017200_... O komputerach jednopłytkowych czy stare komputery były lepsze od współczesnych platform rozwojowych i SBC? Nie lubię Arduino I to jest jak najbardziej prawda. Arduino to platforma, która miała dać łatwy dostęp do programowania elektroniki ludziom, którzy nie znają się ani na elektronice,...
Jacek cz.... WIdze ze duzo wiesz o c. JA niestety wiem jeszcze bardzo mało. Ale przedstawi tobie zalete stosowanie makr :) ci np. #define LCD PORTC dzieki temu potem w programie zmieniamy tylko te makro i lcd działa na innym porcie. Na pewno nic nowego tobie nie powiedziałem Ci. ale to jest niewątpliwa zaleta makr i chyba po to zostały stworzone makra....
http://obrazki.elektroda.pl/3546939500_1... Konstrukcja będąca tematem wątku powstała jako projekt na zaliczenie przedmiotu na uczelni, którego celem było napisanie sterownika dla systemu Linux do jakiegoś urządzenia. Ponieważ miałem swobodę wyboru tematu sterownika, postanowiłem stworzyć jakieś urządzenie w postaci karty ISA. Złącze...
pascal liczb tekst pascal wyświetlanie tekstu tekstu wklejanie tekstu
odpalać gasnąć wszystek kontrolka spalony samsung czujnik pralka
tomtom 4en52 emachines płyta główna
Wskazania czujnika MAP w Opel Astra K 1.4 Turbo Wzrost poziomu oleju w Skoda Fabia 1 po wymianie pompowtrysku