Program Konwertuj; {Program konwertuje wprowadzon¡ liczb© caˆkowit¡ na zapis sˆowny} 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 ;...
w³a¶nie napisa³em swoj± funkcje do zmieniania liczby longint na string [za³±cznik]. z tego co przeczyta³em w pierwszym po¶cie w³a¶nie o takie co¶ chodzi. (nie zmiana np. z 600 na "600" ale na "sze¶æset") Chyba wszystkich b³êdów sie pozby³em (Ach ten J.Polski i liczebniki :) )
Jeszcze jedno proste spostrze¿enie, longint czyli 2^31, pierwiastek z tego to 46344, potencjalne podzielniki nie bêd± wiêksze ni¿ ta liczba i co wa¿ne same bêd± liczbami pierwszymi, jest ich nie wiele, oko³o trzech czterech tysiêcy, mo¿e warto zebraæ tak± tablicê (przy¶pieszenie kilkukrotne)
Poprawiony program: program quiz; type pytanie=record pytanie,a,b... of pytanie; wybrane:array[1..10 ... of pytanie; i,j,pom,prawidlowo:integer...
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...
problem tkwi w tym ze nie chce mi wyswietlac wylosowanych liczb przez komputer o oto kod problem tkwi w tym ¿e nie wiem jak wyswietliæ wylosowane liczby przez komputer , program loto; const ileLiczb= 6; maxLiczba=49; type liczba=1..maxli... Proszê pamiêtaæ o u¿ywaniu znaczników...
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 10... takiego pêtle ju¿ zrobi³em ale zapisuje tylko jedn±...
Przepraszam za b³êdy w tek¶cie "Maskowanie bitów". Poni¿ej poprawiona wersja. ---------------------------... BITÓW w pigu³ce. (Dla tych, którym sprawia trudno¶æ zrozumienie zagadnienia) PODSTAWY Liczby binarne - szybkie czytanie ich...
Witam. Otó¿ mam problem. Jak zrobiæ by po wybraniu np. odpowiedzi 1 (Koñ) zada³o nastêpne pytanie czyli np. Co chcesz teraz zrobiæ? 1. Jechaæ na pó³noc 2. Jechaæ na po³udnie 3. Jechaæ na wschód 4. Jechaæ na zachód ? Oto kod: [syntax=pascal] const Liczba = 2; var Pytania : array[1..Liczba]...
Witam, chcia³em podzieliæ siê z kim¶ i przy okazji rozwi±zaæ jedno zadanie z pascal'a. Zadanie jest z³o¿one. Znam podstawy pascal'a ale to zadanie mnie przewy¿sza. Nie chce te¿ ¿eby kto¶ mi je rozwi±za³ bo wtedy niczego nie po³apie. Zadanie jest takie: Napisaæ program tworz±cy 15 elementow± jednowymiarow±...
Ok wszystko dzia³a, tylko nie mam pojêcia jak wykonaæ procedurê edytuj. Co¶ tam napisa³em ale mi to nie dzia³a. Prosi³bym o wyja¶nienie dlaczego ta procedura nie dzia³a tak jak powinna. A powinna wczytaæ numer identyfikatora rekordu który ma byæ edytowany, po czym powinna usun±æ ten rekord, a nastêpnie...
Witam serdecznie! Mam do Was ogromn± pro¶bê. Muszê zrobiæ 3 proste zadania w jêzyku Pascal Zadanie I Wej¶cie Pierwszy i jedyny wiersz wej¶cia zakoñczony znakiem nowej linii zawiera liczbê ca³kowit± z zakresu 0..255. Wyj¶cie Pierwszy i jedyny wiersz wyj¶cia zakoñczony znakiem nowej linii...
Witam, czy mo¿e mi kto¶ pomóc w narysowaniu schematu blokowego tych 2 programów? Pozdrawiam serdecznie i z góry dziêkujê. program 1: Program Zgadywanka; uses crt; var pr,li,a,b,x:integer; c:char; label new,zle; begin new: clrscr; randomize; ...
mam dwa kody które napisa³em do szko³y teraz dosta³em zadanie po³±czenia tego by wygl±da³o jak kalkulator o to kod FUNKCJI : uses crt; VAR a,b,l,wynikh,x1,x2:integer; o, d,c: char; e,s:string; reszta,i,j:integer; wx,wy,w,x,y,a1,b1,c1,a2,b2,c2,pdelta,del...
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...
Problem dotyczy ma³ego programiku w pascalu. Od niedawna zacz±³em siê tym interesowaæ i chcia³em pisaæ ju¿ co¶ powa¿niejszego. Problem dotyczy tego kodu: program imitCalc; uses crt; var a:integer; funkcja:shortint; g:real; h:real; begin a:=1; repea...
Witam. Mam takie zadanie: W pliku dane.txt znajduj± siê liczby w specyfikacji: - pierwszy wiersz - ilo¶æ liczb - kolejne wiersze - kolejne liczby Rozwa¿my przedzia³y liczb ca³kowitych, lewostronnie otwarte - prawostronnie domkniête, o d³ugo¶ci 1. Wyznacz przedzia³y w których znajduje siê...
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...
Siemka, mam na wstep do programowania zrobic aplikacje okienkow± w Lazarusie, która zamienia liczby dziesiêtne na system dwójkowy, szesnastkowy i ósemkowy. Na razie napisa³em zwyk³± konsolow± aplikacje w C, bo go lepiej ogarniam i próbuje to zmieniæ na Pascala. Tu program w C: A tu pascal z tym...
A wiec mam do zrobienia kilka zadan w TP, jestem poczatkujacym w tej dziedzinie dlatego prosi³bym o pomoc w napisaniu takich programów: 1) Wylosowaæ 20 liczb i posortowac je metod± b±belkow±. 2) Na posortowanej wczesniej tablicy zastosowac wyszukiwanie binarne. 3) Napisz program zamieniaj±cy...
Witam, w szkole na zaliczenie mam zadanko z Pascala. Nie by³em na wszystkich zajêciach st±d wiedza jest troche ograniczona (niestety taka praca). Zadanie mam takie : program ma przeczytaæ 10 liczb, policzyæ liczby ujemne i dodatnie, a nastepnie wypisaæ te których jest wiêcej. Drugie zadanie (nieobowi±zkowe)...
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,...
Witam. Jestem nowy na tym forum, od pewnego czasu bawie sie pascalem i mam problem z jednym programem ktory napisalem a dokladnie z rozszyforwaniem co zrobilem zle. Napisalem kalkulator ale po debugu pojawia sie "syntax error, ; expected but UNTIL found" gdy klikam na ten napis pokazuje mi ostatnia linijke...
Wiêc schemat postêpowania: 0) Przygotowujemy 4 tablice: - dla tysiêcy ('tysi±c', 'dwa tysi±ce', ... , 'dziewiêæ tysiêcy') - dla setek ('sto', 'dwie¶cie', ... , 'dziewiêæset') - dla dziesi±tek ('dwadziescia', 'trzydziesci', ... , 'dziewiêædziesi±t') - dla jedno¶ci ('jeden', 'dwa', ... , 'osiemna¶cie',...
ma byæ jedno has³o tylko na stronê g³ówn± np szko³a nr 4 w xxxxx wykona³ xxxx rok szkolny 2009/2010 a pó¼niej bêdê pisa³ program Dodano po 12 ta 1 ramka to strona tytu³owa ma sie ona pokazac tylko raz w programie po czym gdy podasz haslo prawid³owe przejdzie do menu(2 ramka i to menu...
Jak najszybciej potrzebuje rozwi±zanie tych dwuch zadañ w jêzyku Turbo Pascal: 1. Napisz program, który czyta liczbê naturaln± n, 1<n<=10, w tablicy dwuwymiarowej tworzy tabliczkê mno¿enia dla liczb naturalnych z przedzia³u Wskazówka Trzeba zadeklarowaæ tablicê dla najwiekrzego n, czyli...
siemka potrzebuje pomocy w stworzeniu programu(na dzis:( ) w pascalu a brzmi ono: Kolejka górska odje¿d¿a ze stacji X o godzinie T1 i przyje¿d¿a do stacji Y o godzinie T2. Wyznacz w sekundach czas podró¿y kolejk± wiedz±c, ¿e podró¿ nie trwa d³u¿ej ni¿ jedn± dobê. Wej¶cie Pierwszy wiersz wej¶cia...
Witam potrzebuje pomocy w stworzeniu programu(na dzis:( ) w pascalu a brzmi ono: Kolejka górska odje¿d¿a ze stacji X o godzinie T1 i przyje¿d¿a do stacji Y o godzinie T2. Wyznacz w sekundach czas podró¿y kolejk± wiedz±c, ¿e podró¿ nie trwa d³u¿ej ni¿ jedn± dobê. Wej¶cie Pierwszy wiersz wej¶cia...
Zeby ci to teraz wystlumaczyc bylby problem. Poszukaj na necie jakis kusow pisania w Pascalu. Chciales jakis prosty program, napisalem porgram ktory dodaje dwie podane liczby. program lol; uses crt; var liczba1,liczba2,suma: integer; begin clrscr; write('Podaj liczbe a: '); read(liczba1); ...
Mia³em na zadanie domowe zrobiæ trzy programy w turbo pascalu: obliczanie delty, liczby min i max w ci±gu i tabele z 10 kolumnami gdzie podajemy 10 liczb do wpisania w kolumnach (tege jeszcze nie zrobi³em :P) i mam je wszystkie w procedury wsadziæ co ju¿ zrobi³em. I ka¿da procedura ma byæ wywo³ana poprzez...
Witam jestem pocz±tkuj±cym w turbo pascalu mam problem z tym oto programem: code: program sprawdz_parzystosc; uses crt; var x:real; begin writeln('Podaj x:') read(x); if x mod 2=0 then begin Writeln('Liczba',x,' jest parzysta'); end else begin write...
Witam. Mam taki problem. Mam barze danych w free pascal. Problem jest taki ¿e nie potrafiê zrobiæ kilku rzeczy, które chcia³bym aby siê znalaz³y w programie.. - Po wybraniu SZUKAJ pojawia³o siê pole wyboru: szukaj po: 1.kolorze, 2.marce, 3.roku produkcji.. i zabezpieczenia przed brakiem samochodu...
Skielet programu zrobi³bym tak: Podaj Liczbê X readln X Podaj liczbê Y readln Y Podaj dzia³anie ( + - / * .. [Esc - koniec) znak := readkey; Case znak of + : DODAWANIE - : ODEJMOWANIE ...... ....... #27 : koniec = TRUE {wcze¶niej deklaracja koniec : Boolean; i...
Nie powinienem dawaæ gotowca, ale widzê, ¿e czêsto udzielasz siê na Forum. W podanych kodach mo¿esz wprowadzaæ liczby rzeczywiste. [syntax=cpp] #include <iostream> using namespace std; float liczba,mx=0; int main() { cout.precision(2); do { cout<<"podaj liczbe, podanie...
Co¶ mi siê popieprzy³o i kod który poda³em zlicza puste linie w pliku i linie wype³nione zerami. Chyba by³a to odpowied¼ na inny post. Co do uporz±dkowanego wy¶wietlania tablicy, podajê kod. Wpisywaæ mo¿na liczby oiêciocyfrowe. Zmieniaj±c dx mo¼na zapisywaæ liczby wiêkszej d³ugo¶ci.[syntax=pascal] uses...
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,...
Widzê ¿e to chyba kontynuacja innego tematu. Najpierw odpowiem na konkretne punkty, tzn. jak bym to kodowa³, a potem dorzucê parê uwag. 1. Musisz mieæ podan± listê wierzcho³ków, powinna byæ skoñczona i albo mo¿liwa do przeliczenia (je¿eli np. u¿ywa siê zawsze tablicy 2x1000 i ustala siê ¿e po ostatnim...
Podam kod obliczenia x^y. Mo¿e on s³u¿yæ zarówno do potêgowania jak i pierwiastkowania. y mo¿e byæ liczb± nieca³kowit±, np -2.45, x równie¿. Jedynie gdy x<0 a y jest real, program wypisze b³±d, co jest oczywiste. uses crt; var x,y,wynik:real; i,int:integer; begin clrscr; writ...
Pomysl jest taki zeby dzielic string na 2, wkladac R lub k lub M w odpowiednie miejsce i sklejac to w nowy string. Najlepiej chyba zrobic pliki txtowe z baza danych wartosi serii rezystorow. Najlepiej zrobiæ bazê szeregów, a dla ka¿dego szeregu daæ listê mno¿ników i generowaæ warto¶ci w locie....
napisa³em dodawanie lecz przy dodawaniu liczb 12345+54321 powinno byc 66666 a wychodzi 1130. co jest nie tak, nie chce zeby mnie na zaliczeniu zagi±³ koles na prostym zadaniu program suma; uses crt; var a,b,c: integer; begin clrscr; write('Podaj wartosc liczby a: '); readln(a); write('Podaj...
Opcja pierwsza, najprostsza: do ka¿dego pytania posiadasz flagê czy zosta³o ju¿ wylosowane. Losujesz numer pytania i je¶li zosta³o ono ju¿ wylosowane, to ponawiasz losowanie. Z³o¿ono¶æ jest zale¿na od generatora liczb losowych - w najgorszym przypadku mo¿e on zwracaæ ca³y czas jedn± liczbê. Opcja...
Twoim b³êdem jest próba odczytania warto¶ci real, z pliku TXT który zawiera liczby zapisane jako '1','2' itd. Nie da siê tego zrobiæ bez zamiany jednego typu na drugi. We wcze¶niej wspomnianym przeze mnie po¶cie, masz procedurê, która jest w stanie odczytaæ tablicê z pliku TXT i która przeprowadza...
Witam, Tak to znowu ja :D Jak zwykle probami staram sie dojsc do celu, ale znowu napotkalem przeszkode, napisane przezemnie programy nie dzialaja, gdzies musi kryc sie blad :( Prosil bym o ew. poprawienie :) Pozdrawiam program pola,v2; uses crt var figura: byte; var pole, a, b, h,...
Witam. Mam problem z pascalem ;) Mianowicie ¼le dzieli mi liczby na moim mini kalkulatorze, oto kod: program kalkulator ; [syntax=pascal]uses crt; var a,b : real; w1 : double; znak : char; procedure dodawanie; begin w1:=a+b; end; procedure odejmowanie; begin w1:=a-b; ...
Niestety pewne elementarne rzeczy trzeba po prostu wiedzieæ, aby móc siê uczyæ. A kursy bardzo czêsto wychodz± od prostych kodów obrazuj±cych dzia³anie, które najlepiej rozwijaæ. Jest to lepsza nauka ni¿ próba wymy¶lania na pocz±tku co¶ od zera. Tak, kod jest obecnie sk³adniowo i znaczeniowo poprawny,...
Program ma wypisywaæ liczby pierwsze od podanej x do n Problem w tym, ¿e wypisuje tylko cztery pierwsze, nastêpne wypisuje dopiero po wcisnieciu enter. Nie wiem o co chodzi. Nastepna rzecz, ¿e nie chce wypisywac ich w rz±dku, mam na mysli 1 2 3 4... a wypisuje 1,2,... potem enter musze wcisnac...
Nie uda³o siê, poniewa¿ to co napisano nie ma nic wspólnego z zadaniem. Kompletnie ¼le zrozumia³em to zadanie. Teraz rozumiem to tak, ¿e jak podam liczbê kilkucyfrow±, to program ma mi sprawdziæ, czy ka¿da kolejna cyfra podanej liczby (od lewej strony) jest wiêksza od poprzedniej. Wiêc teraz mój...
Hej. Mam pracê domow±, i nie wiem jaki b³±d pope³ni³am . Proszê o pomoc. Agnieszka tak polubi³a ci±gi rekurencyjne, ¿e nie zastanawia siê ju¿ d³u¿ej nad królikami, tylko analizuje same wzory. Tym razem prosi o obliczenie warto¶ci elementów ci±gu okre¶lonego wzorami: A(0)=4, A(1)=7, A(n)=2A(n-1)+5A(n-2)...
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...
U Borlanda by³o co¶ a la malloc, GetMem. Jednak je¿eli mówi,u o standardzie Pascala. to chyba nic takiego nie by³o (te¿ nie wszystko pamiêtam), wiêc chyba nie o to chodzi. Zreszt± po co wtedy by by³a ta sta³a oznaczaj±ca liczbê elementów tablicy? Co do uczenia Pascala, to mia³ on jedn± zaletê, o ile...
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...
Witam! Wpad³em na chyba szalony pomys³ - mianowicie: chcê zrobiæ "benchmarka" w jêzyku Pascal (inny odpada poniewa¿ tylko ten dobrze znam). Wiêc kilka pytañ: 1. Czy Pascal umie "rozpoznaæ" konfiguracjê komputera? Tzn. ilo¶æ ramu, szybko¶æ proca itp. 2. Jak SuperPi oblicza liczbê PI? Jaki jest jego...
Witam. Potrzebujê pomocy. Chodzi mi o to, ¿e w Pascalu robiê program który oblicza silniê, ale gdy liczba ta jest wiêksza od wielko¶ci zmiennej longint pokazuje siê error. Jak mogê zast±piæ t± zmienn±? Z góry dziêkujê.
Mam nadzieje ¿e, mi kto¶ pomo¿e. A oto co ma robiæ program który mam napisaæ: Dane s± dwie liczby naturalne m i n przyczym m <= n. Spo¶ród liczb naturalnych nalez±cych do przedzia³u <m, n> znale¶æ i wydrukowaæ te, których kwadrat jest podzielny przez zadan± libczE naturaln± - p. Bardzo...
To jest formatowanie liczb rzeczywistych (innych zapewne tez). Ma wyswietlic liczbe (2 liczby znaczace przed przecinkiem i 2 liczby znaczace po przecinku). Tylko tyle pamietam. Jesli usuniesz to formatowanie bedzie wyswietla cala liczbe rzeczywista.
Od razu lepiej ;) Oto moja propozycja programu (wydaje mi sie prostszy) PS: nie wrzuca³em pola kwadratu i trójk±ta bo z tym ju¿ sobie poradzisz ;) var a,b,c,s,w:real; znak,i,n:b... real; procedure DODAWANIE; begin w:=0; writeln...
¬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...
sorki ta funkcja to TryStrToFloat opis jej masz o Bo¿e! jeszcze pocz±tków nie znam a ju¿ procedury.. :/ czyli czy moja procedura powinna wygl±daæ tak? procedure poprawnosc(A; var V; var Code: Integer); i wtedy: program znajduj±cy rozwi±zanie równania; Uses crt;...
napisz program ,który wczytuje n liczb ca³kowitych do tablicy i przesuwa w niej liczby o n elementów w prawo.
£ap, tylko ¿e zamiana jest z dwójkowego na dziesiêtny, a pó¼niej z dziesiêtnego na dwa pozosta³e... no i zak³adamy ¿e u¿ytkownik jest uczciwy i podaje nam na wej¶ciu tylko 0 i 1 ;] uses crt; var binarna:string; function potega2(pot:integer):int... var i,wynik:integer; begin ...
No ja tez jakos jestem na elektrotechnice i poza jezykami ktore nas uczyli (pascal, c, asm) to znam jeszcze pare. Jak to mozliwe ze kolega gumi¶_rzesz nie ma pojecia o programowaniu w c. Taki program z najprostszych tutoriali da sie napisac, a o najprostsze tutoriale pyta sie google ;) A poza tym jezeli...
Witam! Napisa³em program w Turbo Pascalu 7.0. Program oblicza mi pewny y na podstawie kilku zmiennych. y jest typu real bo obliczam go ze z³o¿onego wzoru i wynik jest liczb± przecinkow±. Kiedy chce ju¿ programowaæ wykres x,y to kompilator mi wywala b³±d TYPE MISMATCH. Jest jaka¶ mo¿liwo¶æ wykonania...
Liczba pierwsza ; liczba naturalna, która ma dok³adnie dwa dzielniki naturalne: jedynkê i siebie sam±, np. 2, 3, 5, 7, 11, 13, 17, 19, 23, 29 itp. Liczby naturalne wiêksze od 1, które nie s± pierwsze, nazywa siê liczbami z³o¿onymi. Z podanych definicji wynika, ¿e liczby 0 i 1 nie s± ani pierwsze,...
Witam serdecznie wszystkich u¿ytkowników ;) Mam takowy problem... muszê napisaæ program, ale nie wiem jak... wiem jak napisaæ pocz±tek, niestety drugiej czê¶ci napisaæ ju¿ nie potrafiê :( oto zadanie: Napisaæ program o nastêpuj±cych za³o¿eniach: 1. Wczytaæ dane do tablicy dwumiarowej "d1" o rozmiarze...
Witam Móg³bym prosiæ kogo¶ o sprawdzenie tego schematu blokowego? O ile co do dzia³ania programu nie mam w±tpliwo¶ci to ju¿ co od schematu nie jestem pewien czyt wszystko sobie dobrze wyrysowa³em. Poni¿ej zamieszczam kod ¼ród³owy i schemat. program liczby_pierwsze; uses Crt; var n,i:integer; lp:bool...
Pomogliby¶cie mi rozwi±zaæ te zadania, mam problem z tymi tablicami ;/ 1.Wprowad¼ do jednowymiarowej tablicy 10 liczb rzeczywistych i wyprowad¼ na ekran najwiêkszy i najmniejszy z nich. 2.Napisz program wprowadzaj±cy dane do tablicy dziesiêcioelementowej i wyprowad¼ najpierw liczby parzyste,...
Oto zdjêcie: Chodzi mi o to, ¿eby kto¶ pomóg³ mi napisaæ do tego warunek, który bêdzie wy¶wietla³ b³±d kiedy jedna z liczb bêdzie ujemna lub równa 0 (zero), a je¶li liczby bêd± dobre to niech wykonuje to co ma wykonaæ, czyli co¶ tam policzyæ. Proszê o szybk± odpowied¼, z góry wielkie dziêki za...
Odkurzy³em co nieco :D i nawet fajnie dzia³ jak to przy mno¿eniu dwóch liczb Wersja sprawdzona i dzia³aj±ca [syntax=pascal]var a,b,p : integer; begin writeln ('Podaj pierwszy bok...'); readln(a); writeln ('Podaj drugi bok...'); readln(b); p:=a*b; writeln ('Pole...
wskaznik^.next^.liczba mo¿e powodowaæ b³êdy
Witam, znalaz³em sobie kalkulator napisany w Pascalu, i w jego fragmencie znala³em takie co¶: {$I-}. Czy to jest jaka¶ dyrektywa dla kompilatora? Co to w ogóle oznacza? Fragment tego kodu prezentuje siê nastêpuj±co: [syntax=pascal] begin {$I-} readln(liczba); {$I-} rezultat...
Witam, mam do napisania program który odczyta z pliku dane.txt 20 liczb rzeczywistych, obliczaj±cy iloczyn tych liczb i zapisuj±cy go w pliku wynik.txt Proszê o pomoc.
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).
[url=]Najwiêksza liczba w¶ród 8 liczb wpisanych z klawiatury.
[syntax=pascal]Program xyz; uses crt; Var cyfra:integer; odp:char; Begin clrscr; Write('Hello, podaj cyfre 4'); Readln(cyfra); if cyfra =4 then writeln('tak to cyfra 4'); if cyfra <>4 then writeln('ty kretynie to nie cyfra 4'); delay(3000); Write('czy 4+4 to 8?'); Readln(odp); if...
Witam! Mam problem, d³ugo by opisywaæ, ogólnie zrozumia³em ju¿ jak siê oblicza pierwiastki metod± newtona, na kartce umiem, umiem te¿ zrobiæ program który oblicza pierwiastki z 2 i 3 stopnia, ale muszê zrobiæ pierwiastkowanie z kazdego stopnia, wiem ze w jednym miejscu musze zrobic tylko potegowanie...
Witam, nie pamietam czy aby w funkcji case nie treba podac wartosci w "" to znak char a nie liczba w tym wypadku, czyli: case liczba of "1": Szybkosc:=Szybkosc + 20; {1} "2": Szybkosc:=Szybkosc - 20; {2} "3": ReadKey; {3} A nie bardzo widze deklaracji czym ma byc zmienna liczba, jako char bylo...
[syntax=pascal]{ Kalkulator v1.0 by me ^.^ Program bierze pod uwage kolejnosc wykonywania dzialan wykonujac wyrazenia np. 2+3+4+5*10/19*6+3-3 Podwojne wpisanie znaku np. 10+/20 - program traktuje jako 0 (zero) } uses crt; const ilosc=999; var ch:char; napis:string; liczba:array[1..ilosc]of...
Tre¶æ polecenia: Napisz program przepisuj±cy liczby podzielne przez 3 z jednego pliku do drugiego. Program powinieñ przyjmowaæ dwa argumeny: nazwê pliku wej¶ciowego i nazwê pliku wyj¶ciowego.... W pseudokodzie, wiêc poprawki bêdziesz musia³ wprowadziæ sam. Ja nie mam jak sprawdziæ, bo BP ani TP...
Zacz±³em naukê Pascala. I po zapisaniu jakiego¶ pierwszego krótkiego programu chcia³bym zobaczyæ efekty...ale niestety nie mogê bo okno siê zamyka praktycznie od razu i nie zda¿ê nawet zerkn±c jak mi wysz³o. Jest jaki¶ sposób, aby okienko siê nie zamyka³o? Wpisywa³em Readln; , ale i tak siê zamyka... [syntax=pascal]program...
Zacznij od rzeczy prostszych: Dla podanych liczb nale¿y wypisaæ s³owo "sprawdzam" Wej¶cie W pierwszej linjce wej¶cia podana jest liczba naturalna N (1 <= N <= 100000). W nastêpnych N znajduja siê liczby naturalne X (2 <= X <= 1000000). Wyj¶cie Dla ka¿dej liczby naturalnej X na wej¶ciu...
Bez podstaw arytmetyki daleko nie zajdziesz, liczba gwiazdek: 2*(Length(x)+5) Z ca³± pewno¶ci± to: [syntax=delphi] GotoXY(35,13); WriteLn(StringOfChar('*',Length(x)+4));[... nie bêdzie to na ¶rodku ekranu. Zauwa¿ ¿e u¿ytkownik mo¿e podaæ d³ugie imiê i nie bêdzie to wtedy na ¶rodku. Ale to:...
Hej potrzebuje pomocy z baz± danych w pascalu. Potrzebuje aby program szuka³ osób po nazwisku i wieku i je wy¶wietla³(w osobnych procedurach), mia³ mo¿liwo¶æ modyfikowania dane osoby, wypisywanie wybranego elementu i sortowanie wzglêdem wieku. Z góry dziêki za pomoc. [syntax=pascal]program baza_danych_osob; const ...
(at)D¿yszla , Napisz program wypisuj±cy w jednej linii Twoje imiê i nazwisko oraz numer indeksu, a nastêpnie wyliczaj±cy wszystkie dzielniki ca³kowite Twojego numeru indeksu oraz zapisuj±cy je do tablicy. W kolejnym kroku algorytm ma poprosiæ u¿ytkownika o liczbê dzielników (oznaczmy ja przez m),...
Witam, to chyba w sumie proste. W jêzyku C jakiekolwiek wyra¿enie jest (w sensie logicznym) true je¿eli jest ró¿ne od zera . Je¿eli Delphi chce mieæ wyra¿enie stricte logiczne, musisz po prostu swój warunek zapisaæ tak, ¿e wyra¿enie (ca³e, które tam jest) jest ró¿ne od zera, w Delphi to...
Jedna to tablica liczb ca³kowitych, druga to tablica wska¼ników na liczby ca³kowite. Napisz funkcje, która ustala warto¶ci losowe pierwszej tablicy. Przeprowad¼ proste przeszukiwanie tablicy liczb w celu odszukania najmniejszej i zapamiêtaj jej wska¼nik w tablicy wska¼ników. Potem poszukaj...
Ja tam nie wiem o co chodzi, kolega mi to dyktowa³. No ale jak ja to rozmumiem: -Trzeba napisaæ program w pascalu, korzystaj±c tylko z tablic, nie mo¿e byæ tam list. - Program ma robiæ obliczenia na samych liczbach (bez ¿adnych niewiadomych <x>) - Program ma za zadanie przek³adaæ znaki wpisane...
uses crt; var wynik:integer; x,y:integer; begin wynik:=1; write('Podaj z jakiej liczby silnia ? :'); readln(x); for y:=1 to x do wynik:=wynik*y; writeln('Silnia tej liczby to :',wynik); end. moze bedzie trzeba wziasc wynik innego typu zmiennych gdy silnia bedzie za duza.
ale ja zrzêda jestem, do wszystkiego muszê siê przyczepiæ (szczególnie kiedy na czym¶ siê znam) O!!!! jest pierwszy (w dwu w±tkach o tym samym) kawa³ek kodu który robi to co ma robiæ, choæia¿ ;) to -1 "magiczna liczba" a co je¶li chcemy losowaæ tak¿e ujemne liczby? lepiej ju¿ BREAK (szkoda ¿e nie...
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...
A sortowanie najpro¶ciej to chyba z tablicy klepn±æ ( i szybkie sprawdzenie czy ju¿ podana liczba by³a wprowadzona). Klepa³em co¶ takiego na zaliczeniach z turbo... tablica[np 100 elementow] zapisana zerami-> <<PETLA>> wp... liczbe X -> je¿eli tablica [x]=1 wróæ -> tablica[x]=1 <<KONIEC...
a mo¿e kto¶ z was ma prosty program zamieniaj±cy liczbê z jednego systemu liczbowego na inny ale w Pascalu??Dziêkuje
jak dobrze pamietam to powinienes zrobic s:string[256]; gdzie 256 to liczba znakow... tylko zawsze mi sie wydawalo, ze standardowo jak nic nie podasz to jest 256... ale moze sie myle. Sproboj to zobaczysz. PS.nie wiem czy to napewno dobra skladnia, nie programowalem w pascalu od kilku lat, sprawdz...
type TLiczba = String; super, ale... po co? Nie lepiej po prostu a, b: extended ? Pozdrawiam. Heh, "du¿e" liczby to chyba takie, których nie mo¿na w banalny sposób dodaæ operatorem +. Typ extended przechowuje liczby w postaci zmiennoprzecinkowej (cecha i mantysa) i nawet...
Niestety nie mam czasu pisaæ gotowych algorytmów dla ciebie :( wielkosc - max ilosc ludzi wpisanych tu masz przyk³ad sortowania b±belkowego najprostrzego dla jednej tablicy musisz dodaæ pytanie wg czego chcesz sortowaæ i wtedy zamiast tablica dajesz naprzyk³ad Nazwisko i sortuj± nazwiska musisz...
Jak podzieliæ liczbê modulo x w Pascalu (modulo - reszta z dzielenia) W C++ by³o %...
Odwo³ywaæ musisz siê doportu o ardesie 2 wiêkszym. A ze zmian± karzdego pinu z osobna to trochê sie zabawisz, bo istrukcja out zmiena przynajmniej 8 jadnocze¶nie. A jak to omin±æ? Ano trzeba wiedzieæ które bity z portu odpowiadaj± za dan± liniê i wysy³aæ do niego takie liczby w których wszystkie pozosta³e...
witam musze napisac pewnie programik a w zasadzie znalaz³em taki o jaki mi chodzi z tym ze napisany w pascalu i musze go zamienic na c. Napisa³ bym sam program ale niestety nie rozumiem aproksymacji i wiele godzin nauki i czytania o niej nie przynios³y rezultatu. Teraz moje pytanie czy jesli przepisze...
I czego kolega nie wie ? jak to obliczyæ czy jak to zrobiæ w pascalu ? To ma byæ na liczbach zespolonych ? Liczy siê z prostego wzoru w przypadku takiego uk³adu symetrycznego Ia = \frac{Ua}{Z} Ib = \frac{Ub}{Z} Ic = \frac{Uc}{Z} Bêd± siê ró¿niæ tylko k±tami. Modu³y tych pr±dów bêd±...
czemu ludzie wol± C od Pascala? z tego samego powodu dla którego wol± Pascal od Ady albo Veriloga od VHDL! Pozory, wolê uses ni¿ kombinowanie w *.h Tak patrzê na ten program i czego¶ chyba nie rozumiem. Tylko ja? ¦rednia arytmetyczna: ¦rednia geometryczna: czemu zero ma byæ sygna³em...
W Pascalu procedura konwersji ³añcucha na liczbê nazywa siê Val
