Poprawiony program: program quiz; type pytanie=record pytanie,a,b... of pytanie; wybrane:array[1..10 ... of pytanie; i,j,pom,prawidlowo:integer...
Drogi kolego. Po pierwsze, nie krzyczymy na forum. Po drugie, obowiązują na forum pewne zasady, o których może kolega poczytać w regulaminie forum. Po trzecie, napisał kolega : OTO POPRAWNIE NAPISANY PROGRAM No, jak dla mnie, jest to dość poważna nadinterpretacja. Nie wiem, jakiego Pascal-a kolega...
Jeżeli w parametrze procedury lub funkcji jest zmienna poprzedzona słowem kluczowym VAR to jest to zwrócenie wartości procedury przez tzw. referencję. Procedura jest dobra, a zamiast [syntax=pascal]BEGIN licz(); ... procedura...
Pascal jest już chyba używany przede wszystkim do nauki podstaw programowania - łatwy do ogarnięcia ze względu na lingwistyczną składnię, jednak praktycznie nieprzydatny do robienia "prawdziwych" programów wykraczających poza konsolę, chyba że pójdziesz w takie wywodzące się z Pascala środowiska jak...
Losowe elementy wektora Ai były tylko próbą funkcji LOS. Teraz mają wartości stałe bo przypuszczam, że przy wartościach losowych nawet Solver zgłupiałby jak za każdym krokiem pracy Solvera w wektorze Ai były inne wartości (nie próbowałem tego - szkoda czasu). Jak wcześniej pisałem wczytywanie adresu...
Dawno już nie bawiłem się Pascalem ale jeszcze co nieco pamiętam: [syntax=pascal] unit nazwa_modulu; interface {tu deklarujesz procedury, funkcje, zmienne} implementation {tu treść powyższych procedur i funkcji} end. [/syntax] Na początku programu deklarujesz z jakiego modułu korzystasz...
Witam, napisałem program który ma wyświetlać piramidę pascala do n podanego przez użytkownika, lecz problem tkwi w tym że od 12 wyrazu program wyświetla jakieś chore wyniki nawet na minusie i nie wiem co dokładnie tu nie gra, chciałbym również jakąś prosta metodę na posortowanie całej piramidy by wszystko...
Robię gierkę w pascalu i mam problem z funkcją readkey :/ ta funkcja łapie w bufor wszystko co się naciśnie .. a mnie chodzi, o to ,żeby napisać coś , co zwraca tylko to co jest naciśnięte w momencie wywołania funkcji .. (chyba wszyscy wiedzą o co mi chodzi) .. myślę ,że trzeba to zrobić w assemblerze,...
Witam serdecznie! Mam do Was ogromną prośbę. Muszę zrobić proste zadanie w języku Pascal Liczby pierwsze.Mając funkcje sprawdzającą czy dana liczba jest liczbą pierwszą należy dostarczyć funkcje zwracającą wszystkie liczby pierwsze mniejsze od zadanej liczby.
Książka jest prawie nowa, nie widać śladów używania. Dzięki książce: * Poznasz środowisko TurboPascala * Napiszesz swój pierwszy program w tym języku * Poznasz instrukcje TurboPascala * Nauczysz się definiować zmienne i typy * Dowiesz się, jak uruchamiać programy i usuwać błędy *...
assign(plik,'c:\docume~1\admini~1\pulpit... Nie rozumiem problemu : Czy problem to utworzenie tych że dokumentów. Czy też przekazanie do programu informacji ile ich utworzyć Bo jeśli pierwszy problem to rozwiązanie jest trywialne. assign(plik,sciezka); Gdzie sciezka to zmienna...
mam tu taki program w pascalu jest to książka telefoniczna która posiada dodawanie usuwanie rekordów ale brakuje mi znajdowania przez procedurkę lub funkcję np nazwiska, imie, nr.tel [syntax=pascal]uses Crt; type TOsoba = record { Struktura pamietajaca dane o osobie } ...
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...
mozesz też dać getch(); z biblioteki chyba conio.h Chyba pomylily ci sie jezyki? To co piszesz to funkcja z jezyka C i biblioteki napisanej w C. Dla pascala nalezalo yb uzyc funkcji (procedury) ReadLn;
Turbo Pascal i jego podstawowe sterowniki są w stanie obsłużyć 15 trybów. 5 tekstowych i 10 graficznych. Można je obsługiwać za pomocą funkcji bibliotecznych lub komórek pamięci. Adres pamięci tekstowej znajduje się w 0B800h:0000h, a graficznej w 0A000h:0000h. W komórkach znajdują się dane. A teraz odczyt:...
Zadanie miało być zrobione w sposób opisany przeze mnie. Proszę jednak o pomoc w tych funkcjach
Witam Program działa na zasadzie rekurencji. Procedura LiczbaSlownie wywoływana jest tyle razy ile cyfr ma liczba. Dla liczby np. 123 będzie to nastepująco 1. wywołana jest procedure w programie głównym z parametrem 123. 2. Jeśli liczba jest wieksza od 9 to wywolywana jest ta sama funkcja...
Witam. Muszę napisać do szkoły program w którym zawarte będzie większość instrukcji poznanych przeze mnie przez cały rok szkolny w tej klasie. Wybrałem sobie prostą gierkę w trybie graficznym w Pascalu. Lubie pisać tylko czasami mam wielki problem z ułożeniem odpowiedniego warunku. Postaram się przedstawić...
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...
Tak jak napisales ten program jest latwy. Ale nie wiem co sobie trzeba w nim przypominac. Skoro jesli nie pamietasz wzoru na wyznaczenie prostej wystarczy toworzyc tablice. Wczytanie 6 zmiennych - obliczenie parametrow a i b (pierwsze 4 parametry) funkcji postaci y=ax+b. Podstawienie do funkcji...
Wszystko wpisuj w module. 'Deklaracja Public Declare Function Inp Lib "inpout32.dll" _ Alias "Inp32" (ByVal PortAddress As Integer) As Integer Public Declare Sub Out Lib "inpout32.dll" _ Alias "Out32" (ByVal PortAddress As Integer, ByVal Value...
Zauważ ze to co wkleił kolega marihires to funkcja która do wywołania potrzebuje jednego parametru typu word i zwraca wartosc typu longint. To co zrobiles po nacisnieciu 7 bedzie probowalo wywolac funkcje silnia() bez parametru i sypnie bledami o ile w ogole sie skompiluje :) Podpowiem ci ze musisz...
Można też wczytać najpierw do stringa wszystko, a potem funkcją val spróbować skonwertować to na inta. Trzecim parametrem tej funkcji jest wynik operacji - jeśli ustawi go ta funkcja na 0, to znaczy że konwersja się udała, każda inna liczba będzie oznaczać błąd.
uses crt; VAR a,b,c:integer; {o ,d:string;}o, d: char; {!zmiana typu zmiennych} {poczatek funkcji} function dodawanie(a,b:integer):i... funkcji} {poczatek funkcji} function...
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:...
Hmm czy tak ciezko przeczytac jakis kurs Pascal'a ?? Dam Ci wskazowke bys uzyl funkcji ReadKey ! No i maly source: uses crt; var znak:char; //zmienna na wcisniety znak begin WriteLn( 'Wcisnij jakis klawisz...'); //wypisanie komunikatu znak:=ReadKey; //zczytanie znaku ...
Projekt miernika kondensatorów od 1pF do 10.000uF podłączanego do PC, wskaźnikiem pojemności jest w tym wypadku monitor komputera. Zostały dołączone źródła w Pascal pozwalające poznać zasadę komunikowania portu szeregowego z światem zewnętrznym. Stworzony przez Czecha Jiří Sedláček miernik został...
Witam! Mam problem z napisaniem programu w pascalu- chodzi mianowicie o parkomata. Ma on działać tak że wpłacamy jakąś kwote, opłata stała wynosi 2.35 zl i i na końcu ma wyskakiwać ile poszczególnych monet ma nam wydać. Może na przykładnie płace 4 zł czyli otrzymuje 5zl=0 2zl=o 1zl=1 50gr=1...
Witam! Mam pewien program we Free Pascalu (zrobiony poprzez wprowadzenie pewnych zmian w programie z Turbo Pascala), w którym nie działa drukowanie. Nie chcę się zagłębiać w funkcje i procedury, więc pomyślałem, żeby ten problem obejść przy pomocy Visual Basica. Otóż chciałbym stworzyć aplikację,...
PROGRAM BramkiLogiczne; Uses Crt; VAR a,x,y,w:byte; BEGIN ClrScr; GoTOx... bramk© dla kt˘rej chcesz przeprowadzic operwacje: 1-NOT, 2-AND, 3-OR'); READLN(a); IF a=1 THEN BEGIN WriteLn('Wybrales...
Jest coś takiego jak error handling try część programu except w przypadku błędu end lub try część programu finally jeśli poszło wszystko bezbłędnie end Są też funkcje sprawdzające ale dokładnie musisz poszukać. Co by nie było to pascal więc rozwiązania rodem z turbo...
1. Zrób nową formę. 2. Wstaw na formę 3 Edit-y. (Edit1, Edit2, Edit3) 3. Wstaw na formę 1 Memo. (Memo1) 4. Wstawiasz jeden przycisk. (Button1) 5. Zmodyfikuj swoją procedurę liczącą w ten sposób : [syntax=delphi]procedure P(var A: string; B: string; R : integer); //zmiana var J: Word; C,...
jest to funkcja, która zwraca w wyniku ciąg. CZyli używasz jej, zamiast ciagu.
Witam, jestem początkujący w Pascalu. Mam następujący problem: chciałbym utworzyć plik tekstowy o nazwie wprowadzanej przez użytkownika. Plik miałby tworzyć się na pulpicie. Próbowałem zrobić coś takiego, jednak to nie działa, bo program myśli, że nadałem funkcji Assign za dużo parametrów. Proszę...
Błąd jest w tym miejscu: Readkey jest równy "#", a przecież nie o to Ci chodzi. Jak wiadomo znaki rozszerzonej klawiatury (m. in. strzałki) są kodowane za pomocą dwóch znaków, gdzie pierwszy to 0. Natomiast drugi znak odpowiednio dla strzałek w lewo i prawo to: 75 i 77. Poprawny kod powinien wyglądać...
Witam Chciałem pobawić się obsługą myszy w Pascalu. Znalazłem to Niedziałający link poprawiłem.
?? A po co wywoływać menu rekurencyjnie? To by prowadziło do niebezpieczeństwa przekroczenia rozmiaru stosu. Jeśli już tak bardzo, to tak samo, jak inną funkcję: [syntax=pascal]function Menu; begin writeln('1 - wyswietl znowu menu; 0 - wyjdź z tego poziomu'); repeat case getch()...
Gdybym dziś musiał, bym podjął próbę zlinkowania C z Pascalem, a samą funkcję zachował w C. Operatory arytmetyczne w C są "surowe", w pacalu mogą być "bezpiecznie" np z kontrolą przepełnień, tu jest prawdziwy unsigned, tam ugłaskany unsigned itd.... Kilkakrotnie przez 25 lat miałem porażki. Pamiętaj...
Cos w rodzaju kopiowania. Podaje sciezke da katalogu, z ktorego dane maja byc kopiowane, sciezke do katalogu gdzie dane maja byc kopiowane i w tym drugim katalogu utworzone zostaja wszystkie te same pliki oraz katalogi, z tym ze te utworzone pliki nie zawieraja danych - sa to puste pliki. Funkcje...
Tak zapisana funkcja ma wadę, na moim komputerze sprawdzenie czy 2.000.000.011 jest pierwsze zajęło minutę i 22 sek. długo...., podobnie długo trwało sprawdzenie liczby 2.000.000.012, a przecie już po chwili wiemy że liczba ta pierwsza nie jest. Pewnym ulepszeniem będzie: . pier:=false; . if not odd(L)...
Program dodający duże liczby naturalne: program dodaj_natur; { Testujacy dzialanie funkcji, operujacej na duzych } { liczbach (pamietanych w zmiennych typu String). } uses Crt; type TLiczba = String; function Dodaj (A, B: TLiczba) : TLiczba; {...
Ten szblon wydaje sie byc calkiem snesowny. Napewno trzeba zwrocic uwage na to, ze po kazdej linicje z nazwa procedury lub funkcji nalezy wstawic srednik ma to wygladac tak: procedure nazwa_procedury(argumenty); var...
Witam Rozumiem, że przedstawione rozwiązanie dotyczy zadania nr 4. Chciałem zwrócić uwagę na pomyłkę w kodzie. Funkcja random (X) losuje liczby naturalne z przedziału jakas_zmienna := random (11); gdy to miałby być zakres np. od 1 do 10 wpisujemy jakas_zmienna := random...
Witam. Problem występuje przy zapisie listy do pliku. Błąd 113 Error in statement. Zapewne rozwiązanie jest banalne i tkwi w szczegółach. program listosob; uses crt, dos; type wsk_osoby=^osoby; osoby=record nazwisko: string[25]; imie: string[15]; ...
I tak to jest gdy zamiast wędki daje się ryby. Poczytaj w helpach o write, writeln itp a sam dojdziesz ( ). kolego.. przeczytałem już wiele takich stron..i jak widzisz kombinuje cały czas ale nie wszystko mi wychodzi.. na tych stronach zazwyczaj są omówione poszczególne funkcje, albo skrawki kodów,...
W załączniku przesyłam bazę danych dla salonu. W programie utworzyłem tablicę rekordów zawierających dane o marce samochodu. Wrzuciłem podstawowe funkcje które napisałeś, oraz możliwość zapisania bazy do pliku jak i odczytu. Nie ma zabezpieczenie przed brakiem pliku, gdy np. wpiszesz błędną ścieżkę...
if linia=slowo then - ten warunek jest błędny. Musisz porównywać wyłącznie ciąg o długości odpowiadającej długości słowa lub ewentualnie odszukiwać, czy dane słowo występuje gdziekolwiek w linii ( Pos , ale nie pamiętam, czy TP miał tą funkcję)
Obiecałem pomóc... słowo się rzekło... 1) Linię programu c:=(645-(6*a))/2; zastąp linią c:=(645-(6*a)) div 2 ; i koniecznie poczytaj o typach zmiennych liczbowych i dzieleniu całkowitym. 2) Natomiast linię e:=c+(2*a)+((1/2)...
Czym jest RESULT. RESULT w Delphi(czyli obiektowym pascalu) jest ukrytą zmienną w każdej funkcji. To, co przypisujemy do result, funkcja zwraca. Jeśli chodzi o zwykłego Pascala, rolę zmiennej result pełni nazwa funkcji, czyli: function suma(a, b: integer): integer; begin suma:=a+b; end; ...
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...
Witam, To jest mój pierwszy post więc proszę o wyrozumiałość, staram się zrozumieć listy 2 kierunkowe ( bo potrzebuje ich do projektu na studiach) ale nie o tym mam problem z funkcją szukaj oraz nie mam najmniejszego pomysłu jak zapisać dodane rekordy do pliku oraz je z pliku wczytać program...
Znajdź funkcję odczytującą czas i przypisz aktualny czas do zmiennej. Jako wartość funkcji assign zamiast 'plik.txt' podaj nazwę zmiennej... =========================... m, s, s100);
Tak , tak dokładanie rozwiązania równania kwadratowego. Zaraz sprawdzę program, dzięki za pomoc. Jeśli ma ktoś jakiś programik tego typu to poproszę, może uda mi się "sklecić" to w jedną całość. Chyba w temacie nie chodzi o rozwiązywanie równań kwadratowych, a o obliczenie pierwiastka kwadratowego...
Jak zrobić by ten trójkąt wyswietlany zapisał się do pliku.Na zajęciach miałem takie w miare proste programy z tymi plikami.Tutaj nie potrafie zrobić tego zapisu w formie funkcji. Proszę umieszczać kod w znacznikach syntax . Opcja Listing kodu . Nieregulaminowy załącznik usunąłem.
Witam, jestem początkujący jeśli chodzi o programowanie i mam problem z zatrzymaniem się programu pod koniec, po pokazaniu wyniku, mógłby mi ktoś wytłumaczyć w czym tkwi problem i dlaczego się tak dzieje? Kod programu:[syntax=pascal] program Project2; {$APPTYPE CONSOLE} uses SysUtils; var a,b,...
Uruchamiasz jako administrator? Możesz do postu załączyć projekt Delphi i kod w rar/zip bym przejrzał? EDIT: A próbowałes najprostszą metodą, tzn zamiast: working directory aplikacji. Ew. dla testów podaj ścieżkę do DLL "na sztywno".
A mi się wydaje, e to dlatego, że kolega przekombinował :) Zbyt dużo procedur/funkcji które albo nic albo bardzo mało robią. A potem ciężko się w tym połapać. W dodatku, procedery wyświetlające dane mają podobne nazwy, co wcale nie ułatwia znalezienia problemu. Czy próbował kolega śledzić program...
Witam Piszę w Lazarusie... Mam problem, próbowałem i próbowałem, ale okazuje się, że nie potrafię napisać procedury WypozyczKsiazke w swoim programie. Nie wiem jak to zrobić i proszę o pomoc. Cały kod programu poniżej: [syntax=delphi] //PROGRAM GŁÓWNY: program biblioteka; {$mode objfpc}{$H+} uses ...
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
Pisalem, ze jest w innym watku. Do inicjalizowania trybu graficznego uzywasz funkcji initgraph z biblioteki graph bodajze zrob shift+f1 to bedziesz mial help w pascalu i tam poszukaj initgraph, pewnie nawet bedzie przykladowy kod cos pokroju uses graph begin ... initgraph(driver,mo...
Witam serdecznie! mam powazny problem bo za tydzien musze oddac program do oceny a nie wiem jak go skonczyc:(. jest to ksiazka teleadresowa. Program powinien zawierać funkcje wstawiania, usuwania, przeszukiwania, sortowania elementów. Użycie powyższych funkcji musi być zrealizowane poprzez implementację...
Znalazłem w tablicach jeszcze jedno rozwinięcie w szereg ważne dla każdego x>0: Ln(x)=2*\sum{\frac{1}{2n+1}*(\frac{x-1}{... dla n=0 do ∞ {Oblicza logarytm naturalny z dokładnością eps z ograniczeniem na ilość wyrazów ciągu maxit (by uniknąć zawieszenia się jeżeli ...
hmmm zapewne zamieszczony przez gpql patch pomoze. Zrodla programu pewnie nie masz, wiec potrzebujesz byc moze patcha na pliki .exe. Zawieszenie spowodowane jest przez za szybki procesor. Jakas funkcja z pascala liczy predkosc procka i jak jest za szybko, to wychodzi dzielenie przez zero. Ale to powoduje...
Jeśli chcesz programować to przede wszystkim musisz poznać dany język programowania. Zobacz co pokazały Google na temat "pascal tutorial": Poczytaj troche a potem dopiero bierz się za pisanie programów. A jeśli chodzi o algorytm to bedzie brdzo prosty: 1. deklarujesz tablice oraz licznik częstości: ...
'Jak zapisać w Turbo Pascalu funkcje y=ae(bx)' (bx) - potęga??' y=ae(bx)'=a*e^b (z matematycznego punktu widzenia, rozniczkujac po x). W pascalu mozna to zapisac y=a*exp(b). 'Czy może to być tak że : y=exp(xln(y))'. Jest to funkcja uwiklana dlatego uznalem, ze zastapie argument y argumentem z, bo...
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...
program zliczacz; uses crt; var samogloski : set of char; w : string; l, s,d : integer; BEGIN s := 0; { Licznik samogłosek} samogloski := ['E','I','A','O','Y','U']; re... ClrScr; { Skasowanie ekranu } Write('Podaj...
Proponuję zacząć od zapoznania się z podstawami Turbo Pascala na początek, bo bez tego to będzie praca do jednej bramki a to przecież ty masz ją wykonać. I na pewno skieruj swą uwagę na funkcje przetwarzania zmiennych typu string (copy, pos, i inne) Przydatne będą też: Program uses procedure Var Ass...
Program obliczanie pola trójkąta Uses crt; Var a,h,pole:Real; Begin Clrsclr: ... długość boku a’);readln(a); Write&... wysokośc trójkąta h’);readln(a); Pole&#... 1) Po napisaniu program w pascalu jest zasada...
Ja używam programu Free Pascal IDE. Własnie a jak zoblokowac litery bo jak sie wcisnie np. h to sie program wyłączy Dlatego właśnie powinieneś użyć modułu CRT i jego funkcji READKEY wtedy nie trzeba naciskać enter-a gdyż program monitoruje czy nie nacisneliśmy jakiegoś klawisza, następnie...
Witam! mój proble taki jak w tytule, nie wiem jak właczyć daną aplikacje przez pascala, słyszalem cos o funkcji exec(lokalizacjapliku,lokalizacja pustego pliku txt) lecz to nie pomaga... Może wie ktos jak to zrobić? może byc *.exe i *.bat. pozdro
Faktycznie, raz było tak, a raz tak. W pascalu rzeczywiście nie ma ani ceil, ani floor - pewnie ze względu na nieelegancką asymetrię tych funkcji ;) Pozdrawiam, Dr.Vee
Jak się nazywa funkcja do wykrywania konfiguracji komputera? ... muahahaha a może byś chciał odrazu klase TMojaAplikacja ?? funkcjolnalność o takiej jak piszesz musisz oprogramować sobie sam, lub też poszukaj w tym temacie możliwe że już Ktoś napisał takie funkcję i udostępnił.
Jakie tam wartości podajesz? Wyczytałem, że funkcja Sound() chce zmienną tyou word, ty masz integer. Nie wiem czy to ma znaczenie... pascal... kiedy to było ^^ Masz głośniczek systemowy w komputerze? :D
Witam. Napisałem program w języku Pascal i wykonuje on pewien wykres zgodnie z określonym wzorem. W chwili gdy wprowadzę dane program wykonuje obliczenia i następnie przechodzi do trybu graficznego i wyświetla wykres funkcji. Niestety klawisz PrintScreen nie działa i do schowka jest pobierany jedynie...
Wiem że funkcja random jest w pascalu mam zapisane to w taki sposób x:=random(1000); y:=ran... Niestety jest to źle ponieważ mam zero w wyniku. W c++ jest tak x = (double)rand()/(RAND... a w pascalu nie wiem jak zapisać tą drugą częć...
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...
Wszystkie wymienione przez Ciebie słowa/funkcje/procedury nie istnieją w standardowych bibliotekach Turbo Pascal-a. Na 99% jest to "produkcja" autora/autorów w/w książki. Biblioteka zawierająca te funkcje powinna znajdować się na załączonym do książki nośniku.
Dane są liczby naturalne n i k(n<=k) typu Word. Napisz program, który obliczy sumę pierwiastków kwadratowych liczb naturalnych ze zbioru {n, n+1, ..., k}. void funkcja(unsigned int n, unsigned int k) { unsigned int wynik, ile,liczba; ile = k - n; for(unsigned int index;...
Witam, wie może ktoś z was czy jest w pascalu jakaś funkcja lub procedura zawarta w standardowych modułach do zmiany znaków z klawiatury na kod ASCII, lub zmiany liczb dziesiętnych na liczby binarne i czy można zdeklarować tablicę którą program by rozpoznawał jako tablicę liczb binarnych ?
Nie zwracasz wartości z funkcji, zamiast tego wypisujesz w nich wyniki. Dlatego pewnie jakieś głupotki wychodzą. Zwracanie wartości z funkcji w pascalu wygląda tak (o ile pamiętam): [syntax=pascal] function suma(a,b : real) : real; begin suma := a + b; end;[/syntax] Nic nie musisz wyświetlać...
W standardowym pascalu występuje chyba funkcja odd()
(at)lanky [syntax=delphi] SetLength(ta... // 0,1,2 .. .. Memo1.Lines.Add(wylosowan... nie mialem jeszcze funkcji SetLenght i gosc sie przyczepi, mozesz mi jeszcze powiedziec do czego sluzy: [syntax=pascal]Memo1.Lines.Add(w...
Witam!! Otóż mam do zrobienia program losujący liczbę, my w 15 próbach musiamy odgadnąć jaka to liczba. Niestety wyskakuje mi Error podany w temacie. Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . - arnoldziq
Napisałem krótki program który wpisuje mi tablicę typu rekordowego do pliku. Niestety do pliku nie zapisują mi się 3 pozycje tylko jedna, ostatnia. Jak zrobić żeby w pliku po 3 przejściach pętli mieć zapisane 3 informacje? Dodano po 4 Trzeba usunąć -1 przy funkcji Filesize.
Myślę, że to co napisałem jest wystarczające żebyś sam stworzył odpowiedni kod - trochę się musisz pomęczyć. Dopowiem tylko, że algorytm, który podałem, jest właściwy dla środkowego elementu. Pierwszy i ostatni element usuwa się dużo prościej. Poza tym podejrzewam, że w sieci jest pełno funkcji napisanych...
Odpowiadając krótko na pytanie - procedura ClrEol Przykład powinien wszystko wyjaśnić: [syntax=pascal]program Test; uses crt; var i, j: Integer; begin ClrScr; Write('Nacisnij dowolny klawisz'); repeat for j:= 1 to 5 do begin Write('.'); Delay(20000); end; ...
20 to jest spacja w ASCII ale '20' juz nie. Przeczytaj co zwraca funkcja pos. Mianowicie zwraca ona index znalezionego substringa. Jezeli nic nie znajdzie zwraca 0. Masz zmienic dokladnie jak podalem wyzej. Poza tym pos to funkcja wiec wypadaloby zadeklarowac zmienna ,ktora bedzie przechowywala wynik...
Zanim mi odpisałeś udało mi się napisać. Niby działa: Dodano po 22 Ok, dzięki za pomoc. Zostawię tak jak jest :)
Jeśli mowa o Pascalu dla DOS to jest się ograniczonym przez ustawienie w systemie, bardzo często stosowane w pliku autoexec.bat ( - zerknij na kompletny plik). Niestety od Windows 2k i w linii NT DOS był tylko emulowany i tu obowiązują trochę inne zasady. Generalnie najprościej chyba byłoby napisać własną...
... pomijając if do ... No jak zmienisz na Break i dołożysz jeszcze jedną instrukcję która tak a propos jest UB to na jednym kompilatorze zadziała na innym - nie. Nie wspominając już o trudniejszej przeróbce na funkcje. Jeżeli już chcesz optymalizować to lepiej przerobić na while i dać dwie...
Heh, taki mały problem a ile się nauczyłem innych rzeczy, wielkie dzięki :) Dlatego mam takie moje ulubione przysłowie: człowiek uczy się całe życie a i tak umiera głupi :D To co napisałem powyżej to tylko przykład. Jak mam projekt to w głównym pliku .c nie ma ciał funkcji. I faktycznie, jak przerzuci...
Witam Napisałem program mający po kolei: 1. Robić array jednowymiarowy o 7 elementach: 1,2,3,8,16,24,48. 2. Z niego zrobić dwuwymiarowy array na podstawie takiej, że ten array jest jakby przylegający do niego od góry i lewej strony, (indeksy i,j) i z niego wyliczać logarytm naturalny. 3. Stworzyć...
Dzieki Sam Sung. Ale powiedzialbys mi jeszcze jedno: Zalozmy, ze w projekcie glownym mam funkcje, ktora cos robi na swoich lokalnych zmiennych, natomiast mam plik dll.dll w ktorym jest inna funkcja, ktora chciala by cos wykonac na funkcji w glownym projekcie i przekazalaby do tej funkcji parametry...
Nie za bardzo zrozumiałem z początku o co chodzi i jakie są twoje zamierzenia. Ale widzę, że chcesz pisać jakby nowy "Command.com". Tylko po co? Dla windowsa są programy lub kolekcje narzedzi o rozszerzonych możliwościach w porównaniu do CMD. W czystym C++ nowej konsoli windowsowej nie stworzysz,...
Pisze program na laborke i cos nie bardzo mi to idzie :( Temat programu to: "Obsługa hurtowni" 1. nazwa towaru, producent, kategoria, cena, ilość w magazynie; 2. dostawy i sprzedaże: data, nazwa towaru, producent, kategoria, ilość, kwota; 3. Szukanie po poszczególnych składowych. 4. Sortowanie...
Elektryk sam napisal, ze pisze z pamieci i jak dobrze pamietam, to wlasnie w funkcjach form powinno byc tak jak napisal simon71 (niestety niuanse roznych jezykow programowania) pozdro
Myślałem, że można to zrobić prościej np. tak jak w Basic-u jedną instrukcją. Jak napiszesz odpowiednią funkcje to tesz będziesz miał jedną linijke.
Oto przykład funkcji obliczającej silnię: FUNCTION silnia(n: integer): integer; BEGIN IF n = 0 THEN silnia := 1 ELSE silnia := n*silnia(n - 1) END; Pozdrawiam wszystkich jjanek
Witam. Możesz poprzez funkcję IF np. If (wczytana_cyfra == 5) to przedstawienie_cyfry := pięć i tak dalej, jeżeli nie będziesz używał liczebników porządkowych to jest wszystko ok. Jeżeli cyfra jest dwu lub więcej znakowa np 33. musisz rozbić ją na dwie 3 i 3. Jedna trójka to trzydzieści a druga...