Pascal FAQ

---

Pascal FAQ , czyli zbiór najbardziej nurtujących pytań wraz z odpowiedziami na temat Pascala. Choć jeszcze pytań nie jest wcale tak dużo, niemniej i tak znajduje się tu wiele informacji odnośnie programowania w Pascalu. Można pytać o wszystko: kompilatory Pascala (Turbo Pascal, Free Pascal Compiler), algorytmy, niuanse implementacyjne, błędy programistyczne, instrukcje Pascala etc.
Zachęcam bardzo do dzielenia się wiedzą!


N - nowe pytanie  

1. Skąd można pobrać kompilator pascala? (11)
2. Jak pozbyć się błędu "Run-Time Error 200"? (34)
3. Czym różni się Pascal od Turbo Pascala? (7)
4. Dlaczego mój program za każdym razem wybiera te same liczby losowe? (7)
5. Co zrobić, aby program wyświetlał wartości Real z n miejscami po przecinku? (1)
6. Jak pobrac lub ustawic date systemowa? (3)
7. Czy można zwiększyć czcionkę w trybie tekstowym? (1)
8. Jak pozbyć się migającego kursora? (6)
9. Jak uzyskać plik *.exe napisanego programu? (18)
10. Jak wydrukować coś używając pascalowego programu? (2)
11. Jak usunąć dowolny plik? (4)
12. Jak pobrać listę plików w bieżącym katalogu? (1)
13. Jak uruchomić inny program z mojego? (2)
14. Czy mozna z pliku exe uzyskac jego zrodlo..? (6)
15. Czy w Pascalu mozna deklarowac dynamiczne struktury danych? (4)
16. Czy pisząc programy w Turbo Pascalu można użyć np. Asemblera? (2)
17. Czy mogę w Pascalu obsługiwać np. myszkę lub cd-rom? (3)
18. Co oznacza przekazywanie parametrow przez wartosc i przez zmienna? (3)
19. Jaki kompilator pascala jest najlepszy? (4)
20. Co to za błąd Run-Time Error 200? (11)
21. Jak obliczyć pierwiastek n-tego stopnia z danej liczby? (19)
22. Jakie są wzory do przeliczania współrzednych z 2D do 3D? (3)
23. Co oznacza błąd "String constant exceeds line. Jakie są najczęstrze powody występowania błędu (6)
24. jak użyć rozkaz trim w trakcie kompilacji pojawia się błąd 3 unknow identifier (2)
25. JAKIE ZASADY OBOWIĄZUJĄ PRZY KONSTRUOWANIU SCHEMATU BLOKOWEGO DLA PROBLEMU Z PĘTLĄ W PĘTLI? (3)
26. JAK OGRNICZA SIE DOPUSZCZALNĄ DŁUGOŚĆ NAPISU? (1)
27. jakie jest słowo kluczowe do zmieniania koloru (9)
28. Co oznacza error setting exception i tutaj numery od 00 do 11? (brak odpowiedzi)
29. Jak zrobić grafike, czym wstawić? (8)
30. gdzie jest ten turbo pascal??? (4)
31. Co to jest error while linking (24)
32. jak wyłączyć komputer z poziomu pascala (3)
33. Jak zrobic obsluge klawiatury bez readkey tylko keypressed bym nie musial zatrzymywac programu by nacisnac klawisz i enter tylko odrazu by skanowal klawisz. POZD! (3)
34. Co to jest rekurencja 'ogonowa'? Czym rozni sie od 'zwyklej' rekurencji? Prosze o jakis przykladowy program, ktory obrazuje oba te pojecia.. (1)
35. Co to jest podwójne buforowanie i na czym polega ? Proszę o prosty przykład w Pascalu w trybie 13H (2)
36. Jak w trybie tekstowym zrobic sciane nie do przejscia z dowolnych znaków,dla poruszajacego za pomoca klawiszy znaku np."*" (10)
37. W turbo pascalu mozna robic jedynie pliki dosowe, a da sie zrobic programy okienkowe?? (5)
38. Jak zamienić wartos z string na np. integer Odpowienik strtoint z delphi. (4)
39. Jak w pascalu odsłużyć błędy (4)
40. Jakie są wzory na przeliczanie kilometrów na godzinę i metrów na sekunde do Tp (7)
41. nie wiem jak napisac taki program program porosi o wpisanie liczby n, program wypisuje liczby od 1-n tak żeby pazyste były czerwone a niepzyste niebieskie (2)
42. Jak napisać możliwie jak najszybszą procedurę asemblerowską, która mogłaby wrzucać bezpośrednio na ekran lub na stronę pamięci sprite'a? Prosiłbym jeżeli jest to możliwe o NAJSZYBSZĄ procedurę tego zadania w sposób SOLID i TRANSPARENT (wtajemniczoni powinni wiedzieć o co chodzi). (brak odpowiedzi)
43. skad sciagnac pascala? (22)
44. Zróbmy grę!!! :) Tak! Ludzie! Czy ktoś z was, kto ogląda tę stronę, zna się chociaż zaawansowanie na Pascalu i tak nisko-zaawansowanie na Assemblerze? Jeśli tak, to chciałbym, aby rozważyliście moją propozycję. To mogą być też zarówno programiści jak i graficy, "dźwiękowcy", no i pomysłodawcy ciekawych planów gier. Proponuję grę typu RTS (strategia) - na pewno widzieliście Age of Empires, Tzar, Warlords Battlecry albo może inne tytuły. Nie marzyliście o stworzeniu małej gierki? (17)
45. Jak należy zainstalować moduł graficzny do Turbo Pascala (Borlanda)? I jak ja zainicjować w programie? Prosze o szczegoly :) (6)
46. Jak zainstalować turbopascala? (5)
47. Jakiej instrukcji badz procedury uzyc aby program napisany w tp jendoczesnie gral muzyczke (marsz turecki) i wyswietlal animacje (napisana za pomoca modulu graph? (1)
48. Skąd wziąć Borland Pascala 7.01? (2)
49. Jak stwozyc w Pascalu program aby obliczał pole i obwód prostokąta?! Moze ktoś napisał juz taki programik?! prosze o szybką odpowiedz! (6)
50. Ja rozwiązać problem z klawiaturą (pomiszane niektóre klawisze) w Turbo Pascalu 7.0? (5)
51. Jak obliczać proceny w pascalu ?? (5)
52. Jak wydrukować kod z turbo pascala??? (3)
53. Aby skopiowac kod pod tp nalezy pamietac ze konfiguracja klawiszy ctrl+c oraz ctrl+v nie dziala. odpowiednio występuje to konfiguracja shft+del oraz shft+ins. (1)
54. Czy ktos moglby opisac krok po kroku jak dziala program Gaussa. Z gory dzięki (brak odpowiedzi)
55. Co zrobić aby w TP7 były polskie litery np:ą ę ż itd ? (3)
56. O co chodzi w błedzie type mismatch???? (15)
57. Czy da sie w pascalu napisać program rezydentny, który chodziłby w środowisku windows, a nie pokazywał sie w pasku startu ani nie wyświetlał konsoli PS: sprawdzałem keepa ale chyba nie chodzi pod windowsem ---> (być moze sie myle) (prosze o przykład źródła jakiegos prostego) (1)
58. Jak napisać program dla malarza który oblicza ile potrzeba farby na pomalowanie całej powieszchni pomieszczenia odejmując okna i drzwi jeżeli na 5m kwadratowych potrzeba 1l farby (1)
59. Co to sa tryby 13H, 12H i inne? do czego sie ich uzywa? (2)
60. Co zrobić aby okno programy TP wyświetlało się na całym ekranie. Nie potrafię tego opanować Mój system operacyjny to Win XP (3)
61. Czy wersja TP na palmtopa?Jeśli tak to skąd ją wziąść? (2)
62. Czy da się zrobić tablicę, która będzie się składać z dowolnej liczby elementów? Liczba elementów tablicy będzie zależna od tego ile wyrazów znajdzie w importowanym pliku tekstowym. Może mieć np. 3 elementy bądź 100 000. Jeśli się da to jak to zrobić? (5)
63. Siemka potzrebuje kogoś do pomocy w zadaniach związanychz turbo pascalem !!! Prosiłbym o kontak jak by ktos miał chcec pomóc mi zrobic.!!! gg:7114269 (brak odpowiedzi)
64. Napisałem w tp obrazek i chce żeby się przemiszczał. jak to zrobić, i jeszcze jak sie ustawia zdarzenia losowe? (1)
65. co oznacza pojęcie zmienna w turbo pascalu (3)
66. Witam czy w pascalu da sie zrobic tak aby program czytal znaki z klawiatury lecz zeby to czytanie nie zatrzymywalo programu?? (4)
67. Jak w pascalu zrobic cos takiego żeby np. od liczb 1-100 odejmowało 19% a od 101 do 200 - 20% ? (4)
68. Co zrobic gdy po odpaleniu pascala procek pracuje bez przerwy na 100% i muli całego kompa(procek Sempron 2800+ 64bit. 768MB RAM. Radeonik 9600 Pro) (2)
69. jak napisac program obliczajacy wartosci wyrazen matematycznych zawierajacych min. nawiasy,+,-,^,sin,arcsin,ln, zmienna x, stale e,pi. prosze o wszelki wskazowki jak sie do tego zabrać. z gory dziekuje (2)
70. CZy mogę skonfigurować układ klawiatury w edytorze Turbo Pascala? (1)
71. jak napisac program z podwojna pentla "for" aby wynikiem tego programu byl pojawiajacy sie prostokat zlozony ze znakow "x" ?? (3)
72. Czego dotyczy ERROR 39: Ordinal Expression Expected i kiedy występuje? (5)
73. Chciałbym zrobic dekoder w stylu: wpisujesz tekst naciskasz enter program zamienia wszystkia "a" w tekście na "b" program wypisuje wynik p.s. czy można ściągnąć source gier tu przedstawionych? proszę o odpowiedz na email (2)
74. Jak wyznaczyc przeciecie dwóch dowolnych funkcji liniowych?? (2)
75. mialem napisac program wypisujacy wszstkie liczby naturalnie mniejsze od liczby podanej przez uzytkownika co ja robie zle??? BEGIN clrscr; writeln('Podaj jak±¶ liczbê'); read(liczba); IF (liczba=10) OR (liczba=20) THEN BEGIN licznik:=0; REPEAT licznik:=licznik+1; writeln('Poda³e¶ liczbê 10 lub 20'); UNTIL licznik=10; writeln; END; Halt; END. (2)
76. jak zrobić w turbo pascalu prostokąt (3)
77. Jakieś pentle w turbo pascal na koniec zadania? (brak odpowiedzi)
78. jak narysowac trojkat z gwiazdek?? tak ze w pierwszej linijce jest 1 gwiazdka w drugiej 2 a w trzeciej 3? * ** *** cos takiego.. (2)
79. Jak napisać program podający słownie, w której setce leży podana liczba. Zakres od 1 do 1000. (4)
80. jak powinien wygladać program porządkujący w kolejności od najmniejszej cztery dowolne liczby? (3)
81. Mam problem z progrmem odszukującym liczby dokonałe. Jak go napisać? (1)
82. Jestem początkującym użytkownikiem pascala..... Szybko sie idzie nauczyć jego obslugi?? (2)
83. jak zrobić pasek postępu ze znaczka ASCII, taki jak w XP przy logowaniu. Pomocy! (2)
84. W jaki sposób napisać program szyfrujący z binarnego do dziesiątkowego a z dziesiątkowego na litery, gdzie 0001 to 1 a jeden w alfabecie to A itd. (1)
85. mam maly problem z gra. (5)
86. Program do tablicy wybiera losowo 1000 liczb całk., zapisuje tak wybrane liczby do pliku txt, następnie je porządkuje od min do max i zapisuje do drugiego pliku txt. Jak zagnieździć procedury zapisu do pliku txt tablicy nieuporządkowanej, a następnie po uporządkowaniu do drugiego pliku txt tablicy uporządkowanej ? (2)
87. elo,czy za pomocą komendy assign otworzyc plik z serwera i na nim operowac? Np. zamiast sciezki na dysku wpisac adres pliku na serwerze. (2)
88. Jak napisać * Program wyświetlający słownie podaną liczbę; (20)
89. Jak napisać * Program gromadzący podstawowe informacje o pracownikach, np. imię, nazwisko, data urodzenia, miejsce urodzenia, płeć i numer telefonu. Powinna być możliwość wyszukiwania, usuwania i modyfikowania pracowników; (2)
90. Jak napisac program aproksymacji wielomianowej? (brak odpowiedzi)
91. gdzie można ściagnąć turbo pascala? (brak odpowiedzi)
92. W jaki sposób w TP liczbę arabską zamienić na liczbę rzymską? (brak odpowiedzi)
93. Chciałbym aby program prosił o podanie np.funkdji typu 2*x+3, a następnie podany ciąg zamieniał na argument funkcji. Czy ktoś zna algorytm na pochodną. A może ktoś ma jakis program iteracyjny związany z optymalizacją funkcji? (1)
94. Interpolacja funkcji metodą Lagrange'a...Czy ktoś wie jak napisać program w Pascalu? (brak odpowiedzi)
95. witam potrzebuje zegar ze wskazówkami a zarazem cyfrowy prosze o pomoc to jest zadanie na ocene roczna moje gg 7365119 (4)
96. jak w turbo pascalu można zapisać zmienną a do potęgi n? (3)
97. pisze taka grę. zadaje różne pytania. jak ktoś odpowie źle to program ma wracać do pierwszego pytania. jak to zrobić? PILNE (4)
98. dlaczego po kompilacji modułu rozszerzenie nie zmienia się z pas na tpu? (2)
99. jak zczytac cala linie z pliku znak (char) po znaku do tablicy? (1)
100. Mam prosbe. czy moglby ktos napisac dla mnie program w pascalu: kilka pytan jesli odpowie sie dobrze idziesz w lewo, zle- idziesz w prawo itd. takie bladzenie i wracanie na start. naprawde bardzo prosze. mail: q161@wp.pl (brak odpowiedzi)
101. jak wykonać zegar cyfrowy w Turbo Pascalu 5.5? pilne bardzo! (4)
102. jak utworzyć postać ruszającą się w trybie 13h? (2)
103. Mam problem z free pascal i nie wiem jak go rozwiązac albowiem podczas kazdego compilowania i zapisywania pliku wyskakuje mi błąd i pisze "error while linking " jak sie tego pozbyc? help (1)
104. mam wielki problem z kompilatorem kiedy wlaczam turbo pascala jest w malym okienku wtedy dziala ale kiedy naciskam alt+enter aby powiekszyc zacina sie kompilator tak samo dzieje sie kiedy kompiluje program w trybie 13h prosze o pomoc jezyk znam dobrze;[ (1)
105. jak napisac program za pomoca ktoreg mozna narysowac domek (1)
106. Jak obliczyć przekątną prostokąta w Pascalu?? (2)
107. Wiatm! Programowałem wcześniej w JavaScript, teraz w TP. Mój kompilator nie ma bibioletki Graph. Czy mógłbymi Ktoś przysłać tę bibilotekę. Mój mail: mmlynczak@o2.pl Pozdrawiam! (2)
108. Mam napisać program na zaliczenie semestru, który podana kwotę wypisuje słownie np. 123,65 sto dwadzieścia trzy zł sześćdziesiąt pięć groszy. Bardzo PILNE!!!!! (5)
109. ile jest kilometrów z Warszawy do Hiszpanii jadąc samochodem? (3)
110. Dlaczego znaki wyświetlane w kompilatorze nie odpowiadają znakom na klawiaturze, i jak to zmienić? (brak odpowiedzi)
111. jak napisać program żeby program wyświetlał hasło a po trzykrotnym wpisaniu błednego wpisania hasła pokaże sie na całej stronie napis nie ty baranie prosze o gotowca (11)
112. 1. czy w TP da sie losowac liczby w ustanowionym przedziale (2)
113. Mam problem z uruchamianiem programu z modułem GRAPH -instrukcje takie jak setBKcolor(3) nie powodują zmiany tła itp nie diziałają również inne np dotyczące wypełniania tłem - korzystam z Free Pascala -winXP (2)
114. w programie P_7_2 jest pokazana animacja obiektu. Ale w programie z rozszerzeniem pas występuje mi taki problem: "file not found". Co mam zrobić żeby program chodził z poziomu Turbo Pascala? program można pobrać z przykładów do książki : ftp://ftp.helion.pl/przyklady/2d3dtp.zip (brak odpowiedzi)
115. hej mam zrobic lekcje o rysowaniu figur geometrycznych w turbo pascalu.Chcialam wyprobowac np.napisanie programu,który rysuje koło np.tak: program kolo; uses Graph, Crt; var tryb, karta : Integer; begin karta:=0; tryb:=0; InitGraph(tryb, karta, 'C:\tp\Bgi') SetColor(14); Circle(250, 250, 100); repeat until keypressed; CloseGraph; end. Ciągle mi wyświetla error 15:plik nieznaleziony,sprawdzałam ścieżkę zgadza się,nie mam pojęcia czemu to nie działa, proszę pilnie o pomoc. (6)
116. Czy ktoś zna rolę poszczególnych pinów w portach usb i ps2 i wie jak sterować kartą dzwiękową? (1)
117. czy mogą pojawiać sie błedy w wyswietlaniu grafiki BTP tylko dlatego ze mój system to Xp?? czy musze miec dosa? (brak odpowiedzi)
118. jak stworzyć program grający jakąś kolęde w Turbo Pascalu?? bradzo PILNE!!!! (3)
119. JAK STWORZYC PROGRAM GRAJACY JAKAS KOLEDE W TURBO PASCALU?? BARDZO PILNE!!!! (1)
120. Skąd moge ściągnać do Turbo Pascala 7.0 moduł CRT??? (1)
121. Coć na temat animacji ???? (brak odpowiedzi)
122. Jak działa funkcja Round?? (5)
123. jaki jest wzor na kodowanie w pascalu (ascii)? jak to zrobic... (2)
124. co zrobić gdy chcę wstawić animowany obiekt(drugi bufor ekranu) do istniejącego wcześniej tła? (2)
125. Czemu nikt tu nie pilnuje tego dzialu? same offtopy _._ (2)
126. jak wyświetlić listę plików (4)
127. Jak zrobić w Turbo Pascalu, żeby po naciśnięciu np. Esc coś się stało. Chodzi mi o to, że wiem, jak to zrobić, kiedy naciskamy jakąś literę lub cyfrę, ale ze SPACJĄ jest problem. Słyszałem, że jest coś takiego jak ID klawisza np. chr i coś tam. Czy może mi ktoś podać wszystkie tego typu klawisze? (7)
128. Co znaczy komunikat w Tubo Pascalu "File not found(system.TPU)" (brak odpowiedzi)
129. Co znaczy komunikat w Tubo Pascalu "File not found(system.TPU)" (6)
130. jak można "upiększyć" program napisany w turbo pascal? chodzi mi głownie o tło, czcionke..no i jak jest z tym GotoXY.. (1)
131. Jak zrobić żeby losowo wybrane liczby nie powtarzały się? np. jak chce wylosować 5 liczb z 10 to żeby nie było 2 piątek itp. ?? (4)
132. Jak, wywołując w TP moduł DOS, uruchomić np. plik muzyczny (C:\muzyka.mp3)? (3)
133. Jak jest z zagnieżdżaniem tablic? Wiem, że zmienna wygląda tak:"a:array[1..20] of array[1..20] of char;" - przykładowo. Jak przypisać tablicy 1,1 znak #? (1)
134. Skąd można pobrać TURBO pascal..Prosze pomóżcie bo na piątek musz eoddać prace a nie mam programu.moje gg:8640341 albo jumanji16@wp.pl (1)
135. Czy ktoś przypadkiem nie chce odsprzedać Turbo Pascal'a 7.0? Oczywiście orginała z ksiąźką i płytą. Prosze o kontakt grub_y@wp.pl (brak odpowiedzi)
136. Czy ktoś przypadkiem nie chce odsprzedać Turbo Pascal'a 7.0? Oczywiście orginała z ksiąźką i płytą. Prosze o kontakt grub_y@wp.pl (brak odpowiedzi)
137. zadeklarowałem zmienne we free pascalu komendą var i wyskoczył błąd syntax error "identifier" expected but "VAR" found pomóżcie prosze (2)
138. Co oznacza "identifier expected" (brak odpowiedzi)
139. Jak dokładnie działa polecenie exec? Proszę o przykład. (brak odpowiedzi)
140. Proszę mi podać, jak działa polecenie "exec". Proszę o przykład kodu i bardzo dokładne opisanie go.Chciałbym użyć tego polecenia do uruchomienia innego pliku (3)
141. WITAM MAM PROGRAM DO OBSŁUGI PRZYCISKÓW PRZEZ MYSZKĘ ALE JAK KOMPILUJĘ TO WYSYKAKUJE MI "SYNTAX ERROR W MIEJSCU (x&lt275) PROSZĘ O POMOC!!!! PONIŻEJ ZAMIESZCZAM KOD.PROGRAM JEST PISANY W TP7. KOD uses crt,dos,graph; Var x,y,przyciski:word; Procedure OPCJA1; Begin Sound(50); End; Procedure OPCJA2; Begin Sound(100); End; Procedure OPCJA3; Begin Sound(150); End; Begin VgaOn; SetFillStyle(SolidFill,Green); Bar(215,220,275,250); Bar(285,220,345,250); Bar(355,220,415,250); OuttextXY(218,232,'Opcja 1'); OuttextXY(288,232,'Opcja 2'); OuttextXY(358,232,'Opcja 3'); UstawMyche(1,1,635,475); PokazMyche; Repeat PobierzMyche(X,Y,PRZYCISKI); If (PRZYCISKI=1) Then Begin If (X>215) AND (y>220) AND (x&lt275) AND (y&lt250) Then OPCJA1; If (X>285) AND (y>220) AND (x&lt345) AND (y&lt250) Then OPCJA2; If (X>355) AND (y>220) AND (x&lt415) AND (y&lt250) Then OPCJA3; End; Until Keypressed; Nosound; CloseGraph; End. (4)
142. jak wsadzić jpg do pascala???? help me!! proszę o szybką odpowiedz (2)
143. Ile w pascalu jest znakow x i y?? (2)
144. Jak zrobiś animacje 3d, np trójkąta ?? (2)
145. Proszę o napisanie mi programu w pascal ma wyglądfać tak: w środku ma byc okrąg na zewnątrz ma sie obracac dookoła inne kolo a na zewnątrz innego kola ma sie obracać jeszcze inne kolo taka jakby animacja prosze o pomoc PILNE gg 5529093 (brak odpowiedzi)
146. Cześć. Jak napisać program który za pomocą lini napisze moje iniciały M.A ?? (1)
147. cześć mm pytanie, czy jest możliwość powiekszenia liter w trybie graficznym za pomoca jakiejs procedury albo funkcji, bardzo byłbym wdzieczny (brak odpowiedzi)
148. Cholera skad mam wziasc ten program!!!!!!!!!!:?????????????????????? (2)
149. moze ktos napisać te programy; 1zad: Napisać program sprawdzający liczbę małych liter "a" w tekscie 2zad: Napisać program sprawdzający czy dany tekst jest "palindromem" 3zad: Napisać program pozwalający wykonać dodawanie bardzo dużych liczb ( liczba cyfr >9) Z GÓRY DZIĘKUJE!! (2)
150. Animacja koła , koło ma sie przesuwać w lewo potem do góry i w prawo :PP Prosze o pomoc (1)
151. Działania na datach, np. obliczanie ile miesięcy i dni minęło od określonej daty do dzisiaj (z uwaględnieniem lat przestępnych) - czy data stanowi odrębny typ zmiennej? czy trzeba korzystać z jakichś modułów? Dałem córce zadanie, a teraz sam nie potrafię nic na ten temat znaleźć... (1)
152. jak napisać program, który wczytuje i wypisuje tablicę jednowymiarowa złożona z liczb a następnie dzieli średnia liczb przez trzecia wprowadzoną liczbę? z góry dziękuje (3)
153. jak napisać program, który wczytuje i wypisuje tablicę jednowymiarowa złożona z liczb a następnie dzieli średnia liczb przez trzecia wprowadzoną liczbę? z góry dziękuje (1)
154. Napisałem program ktory wypisuje liczby pierwsze od zera do podanej granicy. Problem polega na tym, ze jesli liczb jest duzo to nie przenosza sie do nastepnej linijki tylko wyswietlaja dalej jakby poza ekranem tak, ze ich nie widac. Jak temu zaradzic? (1)
155. Jak spowodować, by po otwarciu programu okno główne rozciągało się na cały ekran monitora? (1)
156. Jak napisac program w Pascalu pingujacy dany adres (np wp.pl) co jakis czas i zapisujacy te informacje do pliku txt ? Pilne PS. wiem ze trzeba uruchomic ""C:/WINDOWS/system32/ping.exe" wp.pl" Tylko jak zrobic zeby program kopiowal tresc drugiego programu ??? (brak odpowiedzi)
157. Czego uzyc zeby program zaczekal okolo 8 sek zanim uzyje funkcji read? Jest to przydatne np przy pingowaniu jakiegos serwera, poniewaz informacje sa wypisywane po koleji. (1)
158. Jak zrobic aby mój program nie uruchamiał sie w dosie tylko w okienku i jak zrobic grafikę np:żeby nie była czarna tylko w okienku się program uruchamiał (3)
159. Jak użyć w turbo Pascalu modułu gif? (2)
160. jak przypisać funkcji keypressed wartosc false?? (3)
161. Czy można w jakiś sposób usunąć migający kursor? (3)
162. Jak w kodzie zaznaczyc, aby program od razu po uruchomieniu przechodził w tryb pełnego ekranu (fullscreen)? Nie interesuje mnie zaznaczanie "Pełny ekran" we właściwościach. (1)
163. Czy da się ukryś pisany tekst znakami ***? np. wpisuje w programie hasło i zamias liter hasła wyświetlają się znaczki ***... bardzo proszę o pomoc (1)
164. Witam. Mam problem z TP7 Przy przełączaniu Alt+Tab między aplikacjami po powrocie do aplikacji TPX.EXE i TURBO.EXE oraz podczas przerwy w wykonywaniu programu kombinacją Ctr+Pause/Break monitor wariuje. Efekt ten jest taki sam jak w przypadku gdy program, który wykorzystuje moduły Crt i Graph inicjuje tryb graficzny ale go nie zamyka poprzez CloseGraph. Dzieje się to tylko na laptopie Olivetti LX 4/C, procesor: Intel i486DX2 50MHz; ram: 20MB; dysk twardy: 115MB system operacyjny: Windows 3.1. (2)
165. Mam pytanko od niedawna bawię się w pascalu i nie wiem czy da się w czasie jednego programu włączyć drugi jakąś komendą... np. mam program x i np. gdy nacisnę y klawisz włączy się program z... można tak? (2)
166. Skad wziać graph.tpu??????????? (1)
167. Jak mam zrobić docelowe przyciśnięcie jakiegoś przycisku?? np. na ciskam + to wykonuje działanie wcześniej podanych liczb, wiem ze trzeba if uzyć ale nie bardzo wiem jak?? (1)
168. Witam. Czy można napisać program który składa się z 2 procedur - jedna z parametrem, druga bez parametru oraz jednej funkcji.Główny blok programu ma najpierw uruchomic obie procedury jedna pod drugą a następnie napisać wartość funkcji. (1)
169. jak powiększyć okno w Turbo pascal??? (7)
170. A ja mam poważny problem. Piszę pracę na zaliczenie modułu. I bardzo mi potrzebny program, który pokazywał by na ekranie tak jak by jadący samochód. A dokładnie mówiąc narysować coś przypominającego samochód (2 kółka i jakiś prostokącik), a obok drzewa które by sie przesuwały. Wszytko ma wyglądać jak by ów samochodzik sie poruszał (a poruszały sie np drzewka obok). Proszę o pomoc bo z pascala orłem nie jestem a bez tego będę miał poważny problem (2)
171. POMOCY!! Program akceptuje nieograniczny number liczb i musi pokazac ile liczb bylo wyswietlonych,ich sume,srednia arytmetyczna,najwiekszy i najmniejszy numer wporowadzony (1)
172. Hey!! program musi pokazywac siatke numerow (10 na 10) sekwencja numerow: 0123456789 1234567890 2345678901 3456789012 itd (1)
173. jak zrobić w turbo pascalu prostokąt z x-ów z wypełnieniem a,b na zmiane po wierszu do tego mają być wprowadzane dowolne wartości długości boków? prosze o szybką pomoc!! (1)
174. Jak zmienić ikonę do swojego programu? (brak odpowiedzi)
175. Jestem poczatkujacy w turbo pascalu więc proszę o wyrozumiałość. Mam problem z procedurą window Pisze maly program uzywajac podprogramow (PROCEDURE). W jednym z podprogramow zrobilem ladne graficznie menu tytulowe uzywajac procedury window(x1,y1,x2,y2) aby ustawić kilka kolorów tła i tutaj zaczyna się problem. Podprogram z menu wyswietla się ładnie ale następne podprogramy cały czas używaja ustawień procedury window z podprogramu z menu. Nie pomaga ustawienie procedury window na lewy gorny i prawy dolny rog ekranu z opcja clrscr; Podprogramy uporczywie wyswietlaja sie w oknie procedury window. Czy istnieje jakis sposob na anulowanie procedury window aby kolejne podprogramy nie korzystaly z niej? Mam nadzieje ze wyjasnilem problem w miare jasny sposob Z gory dziekuje za kazda odpowiedz (2)
176. Gra dla dwoch graczy: Gracz1 wprowadza 5 numerow pomiedzy 1 do 50 - wiem array [1..50] of integer - te numery sa schowane dla gracza 2. ta czesc umiem zroobic ale teraz gracz 2 ma 5 prob zeby odgadnac te numery. np. proba1: 26 Nie. 26 nie jest tym numerem. proba2: 44 Tak. 44 jest tym numerem. i tak do proby 5 na koncu program musi podsumowac ten wynik. np. 1 zle 4 dorbre - jestes beznaziejny:-P Blagam niech mi ktos odpowie (1)
177. Jak zrobic prosty slownik z array (polsko - anglielski)?? (2)
178. pyt 176 "Gra dla dwoch graczy: Gracz1 wprowadza 5 numerow pomiedzy" gracz 2 wprowadzil swoje odp. i program musi podsumowac wszystkie jego odp. np. "uzyskales 1 z 5 poprawnych odp." PROSZE O POMOC (2)
179. Jak zablokować kalwiature żeby nie odczytywała tego co się naciśnie prócz pokreślonego klawisza, oraz jak otwierzać inne pliki za pomocą programu. (2)
180. Jak zablokować kalwiature żeby nie odczytywała tego co się naciśnie prócz pokreślonego klawisza, oraz jak otwierzać inne pliki za pomocą programu. (brak odpowiedzi)
181. dlaczego kompilator pascala nie obsługuje grafiki... np. nie daje sie odpalić przykładowych programów z działu grafika? (2)
182. jaką instrukcje trzeba wypisać w paskalu aby uzyskać zaokrąglenie części całkowitej? (1)
183. JAK ZROBIC ARRAY Z LIMITAMI USTALONYMI PRZEZ GRACZ ??????????????????????????????????? pROSZE O POMOC!!!!!!!!!!!!!!!!!:] (1)
184. co zrobić gdy wyskakuje mi Error 200: Division by zero?? (16)
185. jak obliczyc pierwiaastek z delty w turbo pascalu?? (1)
186. jak zrobic gre - 2D array ?????????? (2)
187. 2D ARRAYS JAK SIE TO ROBI???????????????????????? gdy mam np. newlist: array [1..3,1..2] of char; nie wychodzi mi ?? ?? ?? (1)
188. Witam! Mam napisać grę Wisielec(program losuje jedno z haseł, a zadanie gracza jest jego odgadnięcie). Szkielet i podprogramy już napisałem ale utknąłem. Czy Ktoś mógłby napisać instrukcję (lub chociaż podać jakąś wskazówkę) sprawdzającą, czy podana litera występuje w wylosowanym wyrazie. Jeśli jest trafione, to program powinien to zaznaczyć tak: _ A _ A (hasło:DAMA, podana litera:A). Bardzo proszę o pomoc-jest naprawdę pilnie potrzebna!Dzięki! GG1:11095327; mail:kaiwohcor@poczta.onet.pl (3)
189. Co zrobić żeby pascal wyświatlał wynik po zakonczeniu obliczania ? (4)
190. 16-bitowy podsystem MS-DOS Turbo Pascal NTVDM CPU: napotkano nieprawidłową instrukcje CS:c000 IP: dfdf OP:ff ff ff ff ff Wybierz przycisk zakończ abo zakończyć działanie aplikacji takie coś wyskakuje mi jak chce uruchomic program z grafiką nie wiem co mam z tym zrobić ? Może ktoś pomoże ? (4)
191. co jest po "USES" (1)
192. mam zrobić sygnalizator świateł taki jak na drodze.sam sygnalizator już mam tylko jak zrobić żeby zmieniały sie na nim światła z góry na dół? z góry dziękuje za pomoc (1)
193. Jak procedure napisac zeby program poakzywal tablice random ''of char'' ale rowniez trzeba uzywac integer????? ??????????????????????????????????? PROSZE O POMOC I Z GORY DZIEKUJE:-) (1)
194. co zrobić jeśli w Turbo Pascalu nie działa myszka ani klawiatura (brak odpowiedzi)
195. Mógłby ktoś podać jakieś wskazówki, jak napisać program pozwalający tworzyć słownik polsko-angielski w oparciu o dynamiczne struktury danych? Z góry dziękuję za pomoc. (1)
196. Jak działa funkcja CASE i jak się jej używa? (7)
197. Co trzeba wpisać by program sprawdzał jaki klawisz sie nacisnęło (chodzi o od f1 do f12, strzałki,page up, page down, home i end) (1)
198. ??????Jak zrobic 'Record' z baza danych??????? program ma baze dznych np. na dysku A:// (brak odpowiedzi)
199. Witam! Byłbym bardzo wdzięczny, gdyby ktoś powiedział mi jak ma dokładnie wyglądać pętla umożliwiająca sprawdzanie, czy podana litera występuje w wylosowanym wyrazie? (procedurę losowania już mam, chodzi tylko o sprawdzanie występowania litery). Bardzo proszę o jak najszybszą pomoc. Dziękuję! (1)
200. jak napisać program, który wczytuje imię i nazwisko??? (2)
201. jak zrobic RECORD w pascalu dane maja byc zapisane na dyku (nieszczesne File of...) Porgram musi: 1 / osoba mogla wprowadzic dane o studentach np. imie, nazwisko itp. 2 / zeby mozna bylo szukac danych np poprzez wporwadzenie nazwiska >>>>>>>>>>>>>>>>>>>>>>> mam problem z zapisaniem danych na dysku, tworzy plik dane.dat ale nie moze ich zapisac podobno trzeba zrobic cos z "uphold" - tylko co to znaczy?????? PROSZE O POMOC (1)
202. Jaka biblioteka do obsługi myszy będzie ją płynnie wyświetlała z innymi obiektami. (1)
203. Mam dobrze napisany program ale gdy go chce uruchomić pokazuje się Graghics not initialized(use initgraph),co zrobić? (2)
204. POMOCY mam do napisania probna prace re: jak zrobic dwuwymiarowa table ktora bedzie pokazywac wyniki glosowania (brak odpowiedzi)
205. Czy ktos moze sprawdzic ta procedure: x,y:integer; Begin y:= 1; x:= 1; while y<= choicesnum do begin x:= 1; while x<= voternum do begin list2[y,x]:= 0; x:= x +1; end; { end of the inner loop } x:= 1; y:= y+1; writeln(list2[y,x]); end; { end of the loop} end. KONIEC POWINNA POKAZYWAC 2D TABELE ALE ZAMIAST TEGE MAM: JEDENASCIE ZER (RZADEK DO DOLU) I NA SAMYM KONCU NUUMER 9410.o co chodzi ????? Z gory dziekuje:) End; (brak odpowiedzi)
206. Pyt 205 OK wlasnie dodalam write(list2[y,x]) i mam poziome ale dalej mam (brak odpowiedzi)
207. Pyt 205 OK wlasnie dodalam write(list2[y,x]) i mam poziome ale dalej mam (1)
208. pyt 205 - 207. ta proedura musi jeszcze brac numery z poprzeniej tabeli ktora ma inna procedure list1[c,r], ktora generuje tabele 2 na 5 (1)
209. pyt. Jak narysować odcinek na podstawie współrzędnych punktów początku i końca ? (1)
210. pyt. Jak narysować odcinek na podstawie współrzędnych punktów początku i końca ? (brak odpowiedzi)
211. Jak napisać program w którym punkt będzię się odbijać od boków ekranu ? (brak odpowiedzi)
212. Jak napisać program w którym punkt będzię się odbijać od boków ekranu ? (brak odpowiedzi)
213. Jak napisać program w którym punkt będzię się odbijać od boków ekranu ? (brak odpowiedzi)
214. Jak napisać program w którym punkt będzię się odbijać od boków ekranu ? (brak odpowiedzi)
215. Jak napisać program w którym punkt będzię się odbijać od boków ekranu ? (1)
216. Jak zrobić koperte ktora ma byc kwadratem wymiar podaje uzytkownik? (3)
217. Jak powiększyc okno w Turbo Pascalu 7.0? (4)
218. Jezeli mam procedure w innej porceduze to czy 2D tabela danych (z procedury nr 1 ) bedzie zapamietana ?? - chodzi mi o to ze mam tabele - proc 1 - do ktorej wprowadza sie dane np. wybor nr 1 - 4;wybor nr 2 - 5 itd do 5 (powtarzane 12 razy );. Procedura 2 ma za zadanie policzyc numer glosow 1. bylabym wdzieczna za kod :) (brak odpowiedzi)
219. jak losowo wybrac n liczb (n<=100) z przedzialu od 0 do 1000 i znalezc najmniejsza z wyswietlonych (1)
220. TO JEST FAQ - 80% zadawanych pytan bylo zaanych wczesniej (brak odpowiedzi)
221. Jak zadeklarowac abstrakcyjną strukturę danych, będącą kolejką dwukierunkową?? (1)
222. potrzebuję program imitujący działanie bankomatu , wpłata, wypłata ,stan konta ( za pomocą procedury case ).dzięki !!!!!!!!! krusz15@wp.pl (2)
223. w wyniku moje programu poakzuje sie 1,50000000000000E . Jak to usunac?? (1)
224. jak zrobic baze danych ktora ma zaznaczać w bazie danych osoby o tym samaym nazwisku i miejscu urodzenia???? prosze o PLINA ODPOWIEDZ:D (1)
225. W jaki sposób mógłbym dodać muzykę do programu napisanego w Free Pascalu?? Ściągnąłem biblioteki ze tej strony ale nie działają(lub nie potrafie ich dodać :/) Proszę o pomoc... (1)
226. Jak zrobić listę list? Proszę o w miarę dokładny zapis, żebym mógł to załapać. Dziękuję! (2)
227. Prosze o pomoc w napisaniu programu bo jestem zielony a potrzebuje do szkoly. Z gory bardzo dziekuje! A oto tresc: Dany jest plik dane.dat. W plikuumieszczone jest 100 losowych liczb, kazda w innym wierszu. Program ma za zadanie wypisac do pliku wynik1.dat wszystkie liczby pierwsze z pliku dane.dat a nastepnie posortowac liczby od najmniejszej do najwiekszej i umiescic je w pliku wynik2.dat. (2)
228. Jak zrobić flage Olimpijska w pascalu tak zeby kółka przeplatały sie ??? piszcie na meila krzysiek435@wp.pl PILNE!!!!! (4)
229. Czy jest możliwość otwarcia pliku ze ścieżki, którą podaje użytkownik w trakcie działania programu? jeśli tak, to proszę o przykład, jak to zapisać... (1)
230. Jak otworzyć plik tekstowy (z możliwością działania na nim) o nazwie podawanej przez użytkownika. Bo musi przecież być stworzona zmienna plikowa o takiej nazwie i typu Text? (brak odpowiedzi)
231. Czy listę trzeba usunąć przed zakończeniem programu? (brak odpowiedzi)
232. Jak powinien wyglądać program sprawdzający ile jest zapisanych wierszy w pliku.txt? (1)
233. sposoby kodowania liczb i ich przykłady. (brak odpowiedzi)
234. mam na pisac 2 programy na zaliczenie prosze o szybka odp.oto one: -napisac program rozwiazujacy układ 3 rownań liniowych z 3 niewiadomymi -metoda wyznaczniki. -napisac program ktory zaszyfruje szyfrem cezara text pisany zklawiatury i zapisze go do pliku o nmazwie szyfr ,a nastepnie odszyfruje ten text i wydrukuje na ekranie zaszyfrowany i odszyfrowany. jak możecie to pszslijcie mi te 2 programiki na meila: jonolot.karol.krasnosielc@interia.pl (brak odpowiedzi)
235. [Error] Unit1.pas(1): 'UNIT' expected but 'PROGRAM' found Co zrobic zeby tego nie bbylo pomocy!! (brak odpowiedzi)
236. Mógłby mi ktoś przystępnie wytłumaczyć jak tworzy się listę list (tylko w oparciu o struktury dynamiczne, bez tablic)? Z góry dziękuję! (brak odpowiedzi)
237. CZY KTOS WIE JAK ZROBIC TO IDIOTYCZNA AFRYKANSKA (bez obrazy dla Afryki ) GRE WARI dla 2 graczy ?????PRosze o pomoc !!!!!!!!!!!!!!!!!!!!! (brak odpowiedzi)
238. Jak zapisać listę słów do pliku binarnego, tak aby później mogła być wczytywana do programu? (brak odpowiedzi)
239. Jak można wyczyścić bufor wczytywania z klawiatury? Np, gdy program czeka na wciśnięcie dowolnego klawisza, ale tak aby nie przeszkadzało to innej instrukcji która czyta wciśnięty klawisz? (programowy odpowiednik opcji Flush) (brak odpowiedzi)
240. CZY KTOS WIE JAK ZROBIC TO IDIOTYCZNA AFRYKANSKA (bez obrazy dla Afryki ) GRE WARI dla 2 graczy ?????PRosze o pomoc !!!!!!!!!!!!!!!!!!!!! (brak odpowiedzi) N (brak odpowiedzi)
241. Witam jak napisac program ktory bedzie liczyl ilosc pikseli poszczegolnych kolorow w pliku bmp moj gg 4674489 (brak odpowiedzi)
242. Czy w (brak odpowiedzi)
243. tablica dwuwymiarowa wypelniona losowo liczbami pierwszymi. JAK TO ZROBIĆ (1)
244. Proszę o pomoc w napisaniu programu który wczytuje plik i go potem usów. Moje gg 9177497. Prosze o pomoc. (1)
245. Mam pytanko czy ma ktos moze jakis dobry program do pascala tzn do przerabiania normalnych liter na program pisac na gg 288955 prosze !! (1)
246. jakie znaczenie w TP ma znaczek "hasz" tzn."#" ? (1)
247. Co i gdzie mam umieścić w tym programie, aby zaliczył podczas podawania loginu, tylko niektóre przezemnie wpisane słowa? Najlepiej jak by mi ktoś na gg pomógł: 9533935. PROGRAM hasla; VAR login: string; haslo: string; BEGIN writeln ('Witamy w programie wykonania dan_0803!'); writeln ('Prosze poda&#8224; sw˘j login ze strony www.lsfan.vot.pl'); readln (login); writeln ('Login potwierdzony, prosimy o podanie hasˆa.') readln (haslo); writeln ('Toľsamo˜&#8224; potwierdzona! Witamy ',login,'!'); writeln ('Hasˆo do odcink˘w "Lilo i Stitch" z naszego downloadu brzmi: SuperAli'); writeln ('˝yczymy miˆego oglĄdania :) i polecamy si&copy; na przyszˆo˜&#8224;'); readln; END. (1)
248. WAZNE - używam programu DEV-PASKAL i nie chcą się w nim kompilować, ani uruchamiać napisane programy. Proszę o pomoc.Po wybraniu kompiluj i uruchom nic się nie dzieje. Darek DARCCO@WP.PL. Dzięki. (1)
249. Zaimplementuj moduł, zawierający podprogramy rozwiązywania równań liniowych, rozwiązywania równań kwadratowych, rozwiązywania układu równań liniowych. Napisz program testujący działanie tego modułu. (brak odpowiedzi)
250. mając w zmiennych cyfry wywala mi ze chce aby tam stał begin... ludzie pomocy! ;( (1)
251. witam mam pytanie czy w Pascalu da sie zmienić czcionkę wydruku chodzi mi o wielkość pozdrawiam (brak odpowiedzi)
252. Witam :) mam problem z napisaniem pewnej gry... Bardzo typowej w internecie gry - łucznik w lewym dolnym rogu ekranu, tarcza w losowo ustawionym miejscu (to już napisałem :D) teraz zostaje mi tylko "za pomocą odpowiednich klawiszy sterujących ustawić siłę i kąt wystrzału strzały, trafienie w środek tarczy kończy grę..." czy moglibyście mi pomóc w dokończeniu programu (potrzebnego na zaliczenie do szkoły) lub chociażby nakierować albo odesłać do jakiegoś gotowca ? bonie wiem jak mam tą krzywą balistyczną wyznaczyć (czy tam parabole czy rzut ukośny) Będę wdzięczny za pomoc :) A jakby co wrzucam meila - Chmiel.Superman@interia.pl pozdrawiam (brak odpowiedzi)
253. Jak wyświetlać obraz BMP w SVGA??? (brak odpowiedzi)
254. mam problem przepisałem taki oto program do pascala program Zaba; uses Graph; var karta,tryb:integer; n_kat,i,x,y,r,los:longInt; skok: real; begin karta:=detect; initGraph(karta,tryb,''); n_kat := 3; skok := 1 / 2; r := 200; for i := 1 to 10000 do begin putPixel(x + 320, y + 240, yellow); los := random(n_kat) + 1; x:=round(x+(r*cos(los*2*pi/n_kat)-x)*skok); y:=round(y+(r*sin(los*2*pi/n_kat)-y)*skok); end; readLn; closeGraph; end. gdy kompiluje niema zadnego bledu lecz dgy chcem go uruchomic nic się nie dzieje niewiem dlaczego prosze o szybkom odpowiedz z góry dzięki. (brak odpowiedzi)
255. mam problem czy mógłby mi ktoś zrobić w TP grafikę koła olimpijskie o odpowiednich kolorach bo ja nic z pacsacla nie umiem. Potrzebne szybko (brak odpowiedzi)
256. mam problem czy mógłby mi ktoś zrobić w TP grafikę koła olimpijskie o odpowiednich kolorach bo ja nic z pacsacla nie umiem. wysłali byście mi to na e-maila cristiano602@wp.pl Potrzebne szybko (brak odpowiedzi)
257. Co zrobić, gdy mam nowy komputer, a w Turbo Pascalu7.0 wyskakuje: File not found (SYSTEM.TPU)? Please, help me! (1)
258. witam mam pytanko jak skopjować gotowy tekst do free pascala?? mam zrobiony program jest zapisany w notatniku i che go skopjować do pascala:D (3)
259. Witam.. mam pytanie. Muszę napisać słownik polsko-angielski. Program ten powinien gromadzić polskie słowa oraz ich angielskie tłumaczenia (oczywiście nie cały słownik) w tablicy (lub tablicach) oraz umożliwiać wprowadzanie nowego słowa do słownika jeżeli jeszcze się w nim nie znajduję.. jak to zrobić?? (1)
260. Hey !POMOCY! musze napisac gre WARI - gdy mam 1 tablice [1..12,1..48] UTKNELAM kiedy gracz_1 wprowadza ktore pole ma oproznic - jest rowne 0, poczatkowe bylo 4 - a kolejne 4 pole zwiekszaja sie o 1 - no wiec 5 - I WTEDY zaczyna sie PROBLEM dalej w procedurze nie zmieniaja sie wartosci wiec zamiast 1,6,6,... on robi 0,5,5,... PROSZE O POMOC - to moja praca na zaliczenie - (1)
261. tak zmienne sa globalne Procedure due_ (var table:arrayAB; a1,a2,cupA,cupB,ma,mb,za,zb:integer;empty_A,empty_B:integer); var x,y:integer; N,q1,q2,r:integer; begin ma:= 24; cupA:= 0; mb:= 24; cupB:= 0; a2:= 4; za:=4; zb:=4; n:= 1; while n<= 2 do begin repeat writeLN(name_A,' Which cup is to be emptied ?'); ReadLN(empty_A); za:= 0; until (empty_A>=1) and (empty_A<=6); a1:= empty_A; q1:= empty_A; for x:= 1 to a2 do begin a1:=a1+1; table[a1,a2]:= a2+1; write(' ',a1, ' - ',table[a1,a2]); if (a1>=7) or (a1<=12) then begin a2:= a2; if (a2= 2) or (a2 = 3) then begin cupA:= cupA+a2; end; end; ma:= ma-1; end; table[empty_A,a2]:= 0; writeln; writeln('ma - ',ma); writeln('!!!!!!!!!!!!!!!!!!!!!'); repeat writeLN(name_B,' Which cup is to be emptied ?'); ReadLN(empty_B); until (empty_B>=7) and (empty_B<=12); a1:= empty_B; q2:= empty_B; for y:=1 to a2 do begin a1:= a1+1; if a1>= 12 then begin a1:= 1; end; {of if ...} table[a1,a2]:= a2+1; write(' ',a1, ' - ',table[a1,a2]); if (a1>=1) or (a1<=6) then begin if (a2= 2) or (a2 = 3) then begin cupB:= cupB+a2; end; end; mb:= mb-1; table[q2,a2]:= zb; end; writeln; writeln('mb - ',mb); n:= n+1; end; end;{of procedure} (brak odpowiedzi)
262. Pomocy! Uzytkownik podaje date w postaci np. 1 stycznia, program zwraca jaki to dzien tygodnia, nastepnie uzytkownik pisze liczbe np. 40 a data zmienia sie o 40 dni do przodu i wyswietla dzien tygodnia np. wtorek. pomocy! (brak odpowiedzi)
263. Pomocy! Uzytkownik podaje date w postaci np. 1 stycznia, program zwraca jaki to dzien tygodnia, nastepnie uzytkownik pisze liczbe np. 40 a data zmienia sie o 40 dni do przodu i wyswietla dzien tygodnia np. wtorek. pomocy! (brak odpowiedzi)
264. Pascal mi sie tnie, co zrobic?????? przytrzymam spacje a dopiero za moment idzie do przodu? wczesniej sie tak nie dzialo, co mam zrobic? (brak odpowiedzi)
265. Jak pozbyć się buforowania? (brak odpowiedzi)
266. PROSZE O POMOC TA PRACA JEST NA ZALICZENIE !!!! tak zmienne sa globalne Procedure due_ (var table:arrayAB; a1,a2,cupA,cupB,ma,mb,za,zb:integer;empty_A,empty_B:integer); var x,y:integer; N,q1,q2,r:integer; begin ma:= 24; cupA:= 0; mb:= 24; cupB:= 0; a2:= 4; za:=4; zb:=4; n:= 1; while n<= 2 do begin repeat writeLN(name_A,' Which cup is to be emptied ?'); ReadLN(empty_A); za:= 0; until (empty_A>=1) and (empty_A<=6); a1:= empty_A; q1:= empty_A; for x:= 1 to a2 do begin a1:=a1+1; table[a1,a2]:= a2+1; write(' ',a1, ' - ',table[a1,a2]); if (a1>=7) or (a1<=12) then begin a2:= a2; if (a2= 2) or (a2 = 3) then begin cupA:= cupA+a2; end; end; ma:= ma-1; end; table[empty_A,a2]:= 0; writeln; writeln('ma - ',ma); writeln('!!!!!!!!!!!!!!!!!!!!!'); repeat writeLN(name_B,' Which cup is to be emptied ?'); ReadLN(empty_B); until (empty_B>=7) and (empty_B<=12); a1:= empty_B; q2:= empty_B; for y:=1 to a2 do begin a1:= a1+1; if a1>= 12 then begin a1:= 1; end; {of if ...} table[a1,a2]:= a2+1; write(' ',a1, ' - ',table[a1,a2]); if (a1>=1) or (a1<=6) then begin if (a2= 2) or (a2 = 3) then begin cupB:= cupB+a2; end; end; mb:= mb-1; table[q2,a2]:= zb; end; writeln; writeln('mb - ',mb); n:= n+1; end; end;{of procedure} (brak odpowiedzi)
267. animacja rzutu ukośnego (1)
268. dlaczego zamiast niektórych kodów ascii np. spacja czy : mam krzaczki w trybie graficznym ? jak to naprawić ? i jak zmienić rodzaj oraz wielkość czcionki? (1)
269. jak napisac program ktory wczytuje n elementowy zbior liczb calkowitych i wyprowadza roznice (brak odpowiedzi)
270. jak napisac program ktory wczytuje n elementowy zbior liczb calkowitych i wyprowadza roznice (1)
271. Jak sprawdzić czy wpisane przez użytkownika dane są typu liczbowego. Chodzi o zrobienie algorytmu idioto odpornego, czyli takiego który nie pozwoli na wprowadzenie liter zamiast cyfr. Nie mam pojęcia jak przeprowadzić walidację wprowadzanych danych... (2)
272. JAk napisac program ktory sprawdzi ile razy w pliku wystapila duza litera A????? (3)
273. czy pascal uruchamia się w pełnym ekranie? (6)
274. napisać program do przeprowadzania testów. Program powinien wczytywać z pliku pytania wraz z prawidłowymi odpowiedziami(odp. testowe a,b,c,d). Następnie powinien losować pytanie, wyświetlać je na ekranie i pobierać odpowiedź, dając na nią użytkownikowi określony czas. Na koniec powinno sie wyświetlać podsumowanie wyników. W pliku z pytaniami i odpowiedziami dodatkowo powinna zostać zawarta informacja, ile punktów dostaje się z prawidłową odpowiedź na dane pytanie, ile ma się czasu na odpowiedź i ile pytań powinno być wylosowanych. Wylosowane pytania nie mogą się powtarzać. Program powinien na początku pytać użytkownika o imię i nazwisko, a następnie dopisywać wyniki do jednego pliku, tak żeby po przetestowaniu kilku osób znalazła się w nim lista wyników. pomocy! (2)
275. jak napisać program,który wyświetla słownie liczbę całkowitą wprowadzoną przez użytkownika w przedziale(-1000;1000) prosze o pomoc (1)
276. Jak załadować dowolny plik bitmapowy np. jpg w pascalu i przekonwertować go na ascii?? proszę o pomoc! i z góry dziękuję (2)
277. Pomocy! Mam napisać funkcję, która wczytuje 9 cyfrową liczbę typu Longint, następnie wypisuje ją z odstępami co 3 cyfry.. (2)
278. co zrobić jesli wyswietla mi sie file not found gigikurs. tpu prosze o pomoc (2)
279. Jak napisać program, który po wpisaniu wyrazu przestawia każdą literę o podaną liczbę do przodu. (np o 3 JAN = MDR). proszę o odpowiedz. (1)
280. O co chodzi z tym UNIT ??? jak chce uruchomic tryb graficzny to mi wzskakuje UNIT EXPECT. i nie chce mi uruchomic trybu graficznego. jak uzywac UNIT ?? prosze o podpowiedz (brak odpowiedzi)
281. O co chodzi z tym UNIT ??? jak chce uruchomic tryb graficzny to mi wzskakuje UNIT EXPECT. i nie chce mi uruchomic trybu graficznego. jak uzywac UNIT ?? prosze o podpowiedz (brak odpowiedzi)
282. Gdy pokazuje mi sie Find not found (Graph.tpu) to co mam z tym zrobic skoro na innych komputerach otworzy mi sie pewien obrazek a u mnie w domu nie???????????????? prosze o szybka odp (1)
283. Gdy pokazuje mi sie Find not found (Graph.tpu) to co mam z tym zrobic skoro na innych komputerach otworzy mi sie pewien obrazek a u mnie w domu nie???????????????? prosze o szybka odp (brak odpowiedzi)
284. co zrobić by działał turbopascal TPX (brak odpowiedzi)
285. numerowanie klawiszy (brak odpowiedzi)
286. CO ZROBIĆ GDY KOMPILATOR NIE KOMPILUJE (brak odpowiedzi)
287. czy można otworzyć plik w pascalu, który ma rozszerzenie więcej jak 3 literowe np.: rozszerzenie html (1)
288. Czy można w TP7 zdeklarować zbiór do którego należałyby punkty płaszczyzny np. (2,3), (4,2) itp. chodzi mi o skończoną ilość punktów. Także te punkty nie muszą być zapisywane w nawiasach mogą być np. postaci 2 3 4 2. chciałabym wykonywać operacje na tym zbiorze. (brak odpowiedzi)
289. Czy można w TP7 zdeklarować zbiór do którego należałyby punkty płaszczyzny np. (2,3), (4,2) itp. chodzi mi o skończoną ilość punktów. Także te punkty nie muszą być zapisywane w nawiasach mogą być np. postaci 2 3 4 2. chciałabym wykonywać operacje na tym zbiorze. (brak odpowiedzi)
290. Witam! Mam problem z trybem graficznym w turbo pascalu. Otóż po próbie odpalenia programu, w którym jest tryb graficzny program z początku wydaje się jakby się włączał, ale zaraz po tym monitor robi się cały czarny... i wyłączenie programu jest tylko możliwe za pomocą alt + ctrl + del. W katalogu BGI mam chyba wszystkie potrzebne pliki do odpalenia trybu graficznego, więc nie wiem dlaczego sie tak dzieje. Proszę o pomoc.. (1)
291. Jak zrobić banner WITAJ za pomocą gwiazdek? (brak odpowiedzi)
292. Jak zrobić banner WITAJ za pomocą gwiazdek? (brak odpowiedzi)
293. Czy ktos tu wogóle zagląda? I czy osoby, które tu napisały doczkaja sie kiedyś odpowiedzi na ich pytania? (2)
294. Dlaczego po próbie skompilowaniu programu z trybem graficznym program mi sie wyłącza? (1)
295. Polecam nową stronę o programowaniu w Pascalu. Na stronce powstaje kurs "robimy grę przygodową". Oprócz tego na zadawane pytania odpowiadam bardzo szybko :) Odpowiadałem tutaj na masę pytań pod adresem "irlik-krzysiek@wp.eu". Jeśli ktoś z was ma jakiś problem, to chętnie pomogę ;) (1)
296. Jak napisac program, ktory ma wylosowac 39 liczb z 99 i potem te wszyskie liczby wylosowane mamy ulozyc od najmniejszej do najwiekszej a nastepnie te wszystkie liczby dodac?? (brak odpowiedzi)
297. jak napisać program na obliczanie przeyspieszenia i pola powierzchni prostopadłościanu w Dev-Pascalu???????? (brak odpowiedzi)
298. Czy w Turbo pascalu można stworzyć regulację głośności dźwięku ? Lub procedurę która mogłaby wstrzymać odtwarzanie dźwięku ? Jeśli tak to bardzo prosiłbym o kod... Przyda mi sie do pracy zaliczeniowej :] (brak odpowiedzi)
299. Jak zrobić program w Turbo pascalu aby uporządkował te liczby od najmniejszej do największe? pilne (brak odpowiedzi)
300. jak ominąć błąd o nazwie "107 error Too many relocation items" . Dodam, że program który robie jest duży, ma już 8 odwołań do *.TPU, i nie moge dalej robić bo mnie pascal ograniczył...moge jakoś obejść ten błąd? (1)
301. "eror 124: statement part to large" Instrukcja jest poprawna w 100% kilkakrotnie uzywalem procedury 'case of' program jest dlugi pewnie dlatego, jest sposob by 'powycinac' fragmenty tego programu pozapisywac je osobno a nastepnie zrobic program uruchamiajacy poszczegolne z nich przy procedurze case - wczytanie danego pliku ? jesli tak jaki jest kod ten procedury.. mile widziany prosty przyklad (brak odpowiedzi)
302. Jak napisać program, w którym się pokazuje gwiazdka a potem ona znika i w innym miejscu na ekranie pojawia sie nastepna i tak w kolko dopoki sie nie nacisnie jakiegos klawisza? (brak odpowiedzi)
303. Jak napisać program, w którym się pokazuje gwiazdka a potem ona znika i w innym miejscu na ekranie pojawia sie nastepna i tak w kolko dopoki sie nie nacisnie jakiegos klawisza? (brak odpowiedzi)
304. czy moze mi ktos pomuc? mam takie zadanie do zrobienia: Napisz procedure kodowania i dekodowania tekstu,zapisanego w pliku tekstowym, zgodnie z nastepujacą metodą:weź znaki pierwszy, czwarty, siódmy itd. i umieść je na początku, po czym weż znaki drugi, piąty i ósmy itd., i wreszcie znaki trzeci, szósty, dziewiąty itd. zaproponuj uogólnienie tej metody. Bardzo prosze opomoc mam na to 30min ;p jak mozna to krok po ktoku (brak odpowiedzi)
305. czy moze mi ktos pomuc? mam takie zadanie do zrobienia: Napisz procedure kodowania i dekodowania tekstu,zapisanego w pliku tekstowym, zgodnie z nastepujacą metodą:weź znaki pierwszy, czwarty, siódmy itd. i umieść je na początku, po czym weż znaki drugi, piąty i ósmy itd., i wreszcie znaki trzeci, szósty, dziewiąty itd. zaproponuj uogólnienie tej metody. Bardzo prosze opomoc mam na to 30min ;p jak mozna to krok po ktoku (brak odpowiedzi)
306. Jak sie wypełnia dowolnymi liczbami od 0 do 9 figurę, np. kwadrat?? ja robie to przez randomize (losuje liczby) i gotoxy (podaje współrzędne) ale tylko pierwsza liczba wychodzi ok a kolejna juz nachodzi na boki figury i ja niszczy;( Pomocy!!! (brak odpowiedzi)
307. Jak sie wypełnia dowolnymi liczbami od 0 do 9 figurę, np. kwadrat?? ja robie to przez randomize (losuje liczby) i gotoxy (podaje współrzędne) ale tylko pierwsza liczba wychodzi ok a kolejna juz nachodzi na boki figury i ja niszczy;( Pomocy!!! (brak odpowiedzi)
308. Może mi ktoś napisać program który po wprowadzeniu daty w zakresie od początku 2008 roku do końca 2009 roku odczytywał dzień np: wpisuje 1.06.2008 i wyskakuje mi poniedziałek. Czekam na odpowiedź. Jestem gotowy odwdzięczyć się za napisanie tego programu. Czekam i pozdrawiam. (brak odpowiedzi)
309. wymiary oraz elementy tablicy wprowadzane recznie sumowanie elementów tablicy w pascalu a nastepnie zamiana najwiekszego wiersza z najmniejszym? (brak odpowiedzi)
310. witam, mam napisac taki program. tablica el. typu string: Tab1 "dowolny tekst" Tab2 za litere 'o' wstaw "XX". pomocy (brak odpowiedzi)
311. witam, mam napisac taki program. tablica el. typu string: Tab1 "dowolny tekst" Tab2 za litere 'o' wstaw "XX". pomocy (brak odpowiedzi)
312. Jak napisać program, ktory: ze standardowego wejścia wczyta współrzędne n punktów P1,P2,...Pn wyznaczy najmniejszy obwód prostokąta, w jaki mozna "zapakowa" te punkty wypisze wynik na standardowe wyjscie (brak odpowiedzi)
313. jak napisac pismem technicznym litery (Adr) w module graph w turbo pascalu????????? (brak odpowiedzi)
314. W jaki sposób można napisać jakich funkcji użyć aby napisać kalkulator nieskończenie dużych liczb. (brak odpowiedzi)
315. Mam klopot.. Chce zrobic gre online i napisac w Pascalu unit z polaczenie sieciowym do mojego ip. Czy ktos ma taki TPU z funkcjami typu ipConnect(ip, brama)? Prosze o pomoc! Jesli posiadacie taki TPU wyslijcie na e-mail: juhasjoe@o2.pl (brak odpowiedzi)
316. jak uruchomić własny program przez jakie opcje (1)
317. Hej mam prośbe czy ktos mógłby mi napisać taki program: Narysuj schemat blokowy i napisz program obliczania obwodu prostokąta zabezpiecz go przed wprowadzeniem wartości ujemnych Praca potrzebna do szkoły z góry dziekuje Pozdro (brak odpowiedzi)
318. Hejka mam prośbę czy ktoś mógłby mi napisać program:Narysuj schemat blokowy i napisz program obliczania obwodu koła i zabezpieczgo go przed wprowadzaniem wartości ujemnych Z góry dzięki (brak odpowiedzi)
319. napisz program zamiany liczby dziesietnej na liczbe w ukladzie trojkatnym.bardzo pilne!!prosze o pomoc!moj mail justynsia86@o2.pl (brak odpowiedzi)
320. jak narysować schemat blokowy i napisać program obliczający sin i cos danego kata? (brak odpowiedzi)
321. czy można używać myszki w trybie tekstowym? (3)
322. czy można używać myszki w trybie tekstowym? (brak odpowiedzi)
323. Jak zrobić by program, który napiszę w pascalu, działał w MS-DOSie? Bo jak próbuję odpalić, to mam "This program cannot be run in dos mode" (1)
324. schemat blokowy i program obliczania pola kola (2)
325. Napisz program , ktory czyta ciąg znaków zapisanych w pliku a następnie zamienia wszystkie litery "a" na "b" i odwrotnie. Proszę o pomoc!!!! (brak odpowiedzi)
326. Mam 2 pytania dot. jednego programu. 1 to dlaczego wyskakuje mi Error 64: Cannot Read or Write variable of this type. oto ten program: uses crt; type uczen=record imie,nazwisko:string; ocena:integer; end; type plik_uczniow=file of uczen; var plik:text; p:plik_uczniow; ch:char; wynik,x,y,z:integer; begin clrscr; assign(plik,'uczen.txt'); repeat clrscr; writeln('co chcesz zrobic?'); writeln('1. dopisac dane'); writeln('2. odczytac dane'); writeln('3. wyswietlic nazwisko ucznia i jego info'); writeln('4. podac ocene i wyswietlic liste uczniow z ta ocena'); writeln('5. zakonczyc program'); readln(x); case x of 1:begin writeln('plik jest czysty. za chwile zaczniesz dopisywac'); z:=0; if z=0 then begin {$I-} reset(plik); {$I+} wynik:=IOResult; if wynik=2 then rewrite(plik); read(plik,p); writeln('zapisac? 1=tak, 2=nie'); readln(y); if y=1 then begin writeln(plik,p); writeln('plik zostal zapisany'); close(plik); end; if y=2 then begin close(plik); ch:readkey; end; z:=z+1; if z=1 then begin append(plik); writeln('teraz mozesz dopisac'); read(p); writeln('zapisac? 1=tak, 2=nie'); readln(y); if y=1 then begin writeln(plik,p); writeln('plik zostal zapisany'); close(plik); end; if y=2 then begin close(plik); ch:readkey; end; end; 2: begin {$I-} reset(plik); {$I+} wynik:=IOResult; if wynik=2 then rewrite(plik); while(not eof(plik)) do begin readln(plik,p); writeln(plik_uczniow); ch:=readkey; end; close(plik); end; 3: end; 4: end; 5: end; until x=5; end. i 2 pytanie: jak zrobic pkt 3 i 4 w moim programie bo nie za bardzo rozumiem. (brak odpowiedzi)
327. Mam 2 pytania dot. jednego programu. 1 to dlaczego wyskakuje mi Error 64: Cannot Read or Write variable of this type. oto ten program: uses crt; type uczen=record imie,nazwisko:string; ocena:integer; end; type plik_uczniow=file of uczen; var plik:text; p:plik_uczniow; ch:char; wynik,x,y,z:integer; begin clrscr; assign(plik,'uczen.txt'); repeat clrscr; writeln('co chcesz zrobic?'); writeln('1. dopisac dane'); writeln('2. odczytac dane'); writeln('3. wyswietlic nazwisko ucznia i jego info'); writeln('4. podac ocene i wyswietlic liste uczniow z ta ocena'); writeln('5. zakonczyc program'); readln(x); case x of 1:begin writeln('plik jest czysty. za chwile zaczniesz dopisywac'); z:=0; if z=0 then begin {$I-} reset(plik); {$I+} wynik:=IOResult; if wynik=2 then rewrite(plik); read(plik,p); writeln('zapisac? 1=tak, 2=nie'); readln(y); if y=1 then begin writeln(plik,p); writeln('plik zostal zapisany'); close(plik); end; if y=2 then begin close(plik); ch:readkey; end; z:=z+1; if z=1 then begin append(plik); writeln('teraz mozesz dopisac'); read(p); writeln('zapisac? 1=tak, 2=nie'); readln(y); if y=1 then begin writeln(plik,p); writeln('plik zostal zapisany'); close(plik); end; if y=2 then begin close(plik); ch:readkey; end; end; 2: begin {$I-} reset(plik); {$I+} wynik:=IOResult; if wynik=2 then rewrite(plik); while(not eof(plik)) do begin readln(plik,p); writeln(plik_uczniow); ch:=readkey; end; close(plik); end; 3: end; 4: end; 5: end; until x=5; end. i 2 pytanie: jak zrobic pkt 3 i 4 w moim programie bo nie za bardzo rozumiem. (brak odpowiedzi)
328. Mam problem z grafiką. Napisałam program który ma rysować wykres pewnej fukcji, program się kompiluje ale nie wyswietla wykresu,bo w Viscie(taki mam system)nie mogę uruchomić trybu pełnoekranowego(alt+f4 nie działa).Jak próbuje uruchomić program to pojawia się komunikat:'Turbo Pascal.This system does not support fullscreen mode. Chose 'close' to terminate the application.' Proszę o pomoc, co mam z tym zrobić. Będę wdzięczna za każdą wskazówkę:) (3)
329. Z gwiazdek zrobić prostokąt o bokach 11 gwiazdek i 10 gwiazdek. Proszę o pomoc (brak odpowiedzi)
330. Z gwiazdek zrobić prostokąt o bokach 11 gwiazdek i 10 gwiazdek. Proszę o pomoc (brak odpowiedzi)
331. muszę napisać program w ktorym to dwa koła jadą jedno z prawej drugie z lewej. jak sie uderzą to jedno jedzie do góry a drugie do dołu ... pomóżcie (brak odpowiedzi)
332. jak napisać program spadaaca kulka? (brak odpowiedzi)
333. Jak napisać program który za pomocą punktów wyświetli imie i nazwisko? (brak odpowiedzi)
334. jak napisac program ktory liczy średnią arytmetyczą i średnia geometryczną ( w jednym programie) (brak odpowiedzi)
335. Jak napisać w postaci schematu blokowego ze specyfikacą algorytm który zwraca wszystkie liczby pierwsze mniejsze od liczby podanej przez użytkownika ? (brak odpowiedzi)
336. 11. W 10 elementowej tablicy D jest zapisanych losowo 10 nie powtarzających się liczb naturalnych z przedziału od 1 do 10. Napisz program wyświetlający informację w których elementach tablicy zapisane są liczy parzyste. (1)
337. Jak napisać program który podaje ilość cyfr w liczbie i podaje typ tej liczby [TP] (1)
338. Jak procedure napisac zeby program poakzywal tablice random ''of char'' ale rowniez trzeba uzywac integer????? ??????????????????????????????????? PROSZE O POMOC I Z GORY DZIEKUJE:-) <a href="http://www.czerwony-rynek.pl">Czerwony Rynek</a> (brak odpowiedzi)
339. Podaj odpowiednie zaokrąglenia liczb a.b i c. a=1214,537 b=374,043 c=989,(59) do czesci setnych a b c do części dziesiętnych a b c do jednosci a b c do dziesiantek a b c do setek a b c (1)
340. jak jest procedura do zamieniania kodu ASCII na znaki i druga na odwrót?? (1)
341. jak napisać program (we FREE PASCALU), który oblicza przekątną kwadratu, oblicza jego bok i pole powierzchni?? PROSZĘ o podpowiedzi... :) (1)
342. jak w TP ułozyc program do obliczania ukladu wspołzednych ax+by=c,ex+dy=f .Prosze pomocy. (brak odpowiedzi)
343. jak w TP ułozyc program do obliczania ukladu wspołzednych ax+by=c,ex+dy=f .Prosze pomocy. (brak odpowiedzi)
344. jak narysować okrąg w turbo pascalu? (1)
345. jak narysowac okrąg w okręgu (1)
346. Jak wyłączyć prawie całą klawiaturę tak aby działały tulko przyciski z klawiatury numerycznej (brak odpowiedzi)
347. jak zrobić za pomocą * literę B w górnej części ekranu,a w dolnej imię,nazwisko i klase (1)
348. Napisz program obliczający średnią artmetyczną trzech liczbz przedziału 1-100 (1)
349. Jak zrobić w TP grę Milionerzy. Mają losować się pytania i ma działać koło ratunkowe 50:50... (brak odpowiedzi)
350. jak napisać unit do programu z trybem graficznym? (brak odpowiedzi)
351. program zamienia wszystkie litery "a" na "A" oraz "b" na "B" (1)
352. JAK ZAPISAĆ PROGAM W PASCALU--ILE JEST PAR LICZB W LICZBIE 222-- PRZYKŁAD 10;11;12;13 itd (brak odpowiedzi)
353. Mam napisać mistrza klawiatury. Działa on w taki sposób iż w programie wyświetlona jest klawiatura i podświetlają się przyciski, które wciśniemy. To taki pogram jak zwykły typowy mistrz klawiatury. Ja mam problem z wyświetleniem klawiatury i podświetleniem znaków. Proszę o pomoc. (brak odpowiedzi)
354. Jak napisać w Pascalu program do interpolacji metodą Lagrane'a&#8217;a oraz metodą Newtona&#8217;a, liczba punktów oraz wartości funkcji wbudowane w program? (brak odpowiedzi)
355. Jak napisać w Pascalu programktóry narysuje mi z gwiazdek prostokąt ? (1)
356. Jak za pomocą pixeli narysować linie, albo elipse? Chyba we wszystkich nowych modułach graficznych jest tylko procedura, która rysuje pixel. I czy w ogóle przychodzi tu jakiś Administrator czy Moderator? (brak odpowiedzi)
357. Jak napisać program wyszukujący 10 kolejnych liczb parzystych? (brak odpowiedzi)
358. Jak napisać program wyszukujący 10 kolejnych liczb parzystych? (brak odpowiedzi)
359. JAK ZROBIE GWIAZDKE W TURBOPASCAL?? PROSZE O KONTAKT 7156150 GG LUB 669064362 (brak odpowiedzi)
360. LUDZIE! WŁAŹCIE NA | http://www.forum.programuj.com/ | (brak odpowiedzi)
361. Witam, jak zapisać do pliku tekstowego "wprzedjedz" z dwoma miejscami po przecinku?. Niestety, ten kod nie zapisuje do pliku. Na końcu na ekranie ma się wyświetlić wartość "zar" i to działa. program kroliki; var wpojedzeniu, rpojedzeniu, odrost, wprzedjedz, porcja, zar: Real; i:Byte; plik1: file of tekst; linia: tekst; const polana=30000; p=0.05; begin assign (plik1,nazwa1.txt); rewrite (plik1); porcja:=0.25*100; wpojedzeniu:=15000; for i:=1 to 32 do begin rpojedzeniu:= wpojedzeniu-porcja; odrost:=(polana-rpojedzeniu)*p; wprzedjedz:=rpojedzeniu+odrost; wpojedzeniu:=wprzedjedz - porcja; while linia<>'?' do begin linia:=wprzedjedz; readln(linia); writeln(plik1,linia); end; end; close(plik1); zar:= suma*100/polana; write('1 czerwca 2002 roku bedzie zarosniete ',zar:0:2,' % polany'); readln; end. (1)
362. Jak narysować poruszające się koło (1)
363. NAJLEPSZE FORUM O PROGRAMOWANIU W PASCALU! : http://www.forum.programuj.com/viewforum.php?f=25 : NIE TRAĆ CZASU! Jeżeli masz jakieś pytanie, napisz. Oczekiwanie na odpowiedź - do 24 godz! ::::::: (brak odpowiedzi)
364. NAJLEPSZE FORUM O PROGRAMOWANIU W PASCALU! : http://www.forum.programuj.com/viewforum.php?f=25 : NIE TRAĆ CZASU! Jeżeli masz jakieś pytanie, napisz. Oczekiwanie na odpowiedź - do 24 godz! ::::::: (brak odpowiedzi)
365. NAJLEPSZE FORUM O PROGRAMOWANIU W PASCALU! : http://www.forum.programuj.com/viewforum.php?f=25 : NIE TRAĆ CZASU! Jeżeli masz jakieś pytanie, napisz. Oczekiwanie na odpowiedź - do 24 godz! ::::::: (brak odpowiedzi)
366. NAJLEPSZE FORUM O PROGRAMOWANIU W PASCALU! : http://www.forum.programuj.com/viewforum.php?f=25 : NIE TRAĆ CZASU! Jeżeli masz jakieś pytanie, napisz. Oczekiwanie na odpowiedź - do 24 godz! ::::::: (brak odpowiedzi)
367. NAJLEPSZE FORUM O PROGRAMOWANIU W PASCALU! : http://www.forum.programuj.com/viewforum.php?f=25 : NIE TRAĆ CZASU! Jeżeli masz jakieś pytanie, napisz. Oczekiwanie na odpowiedź - do 24 godz! ::::::: (brak odpowiedzi)
368. NAJLEPSZE FORUM O PROGRAMOWANIU W PASCALU! : http://www.forum.programuj.com/viewforum.php?f=25 : NIE TRAĆ CZASU! Jeżeli masz jakieś pytanie, napisz. Oczekiwanie na odpowiedź - do 24 godz! ::::::: (brak odpowiedzi)
369. NAJLEPSZE FORUM O PROGRAMOWANIU W PASCALU! : http://www.forum.programuj.com/viewforum.php?f=25 : NIE TRAĆ CZASU! Jeżeli masz jakieś pytanie, napisz. Oczekiwanie na odpowiedź - do 24 godz! ::::::: (brak odpowiedzi)
370. mam taki dziwny blad. wszystko mi chodzilo normalnie w moim TP 7.0 po pewnym czasie mialem cos do zrobienia na nim i otwieral mi sie tak jakby w innej rozdzielczosci, jakos to pominolem, ze wyswietla mi sie normalnie poprzez otwarcie w oknie i wcisniecie alt+enter, ale mam taki problem, ze zaden program mi nie chce wyswietlac grafiki, pisze mi " Turbo Pascal version 7.0 Copyright (c) 1983,92 Borland International" w kazdej mojej pracy mi sie tak zrobilo (tylko w tych z zapotrzebowaniem grafiki. zrobilem program zegar analogowy, to dzwiek slysze, ale mam ten napis. jak zakoncze program to ekran robi sie rozmazany. prosze o szybka odpowiedz. opisalem problem najdokladniej jak moge. (2)
371. 1 Wykaż czy boki a,b,c stworzą trójkąt? 2 Ile jest lat przestępnych od roku R do dziś? Proszę o pomoc z tymi zadaniami (1)
372. Muszę napisac program w TP liczący pole pod całką metodą prostokątów. Czy ktoś wie jak to zrobić ewentualnie podać taki program? Proszę o szybką odpowiedż (chodz i moją ocenę z programowania:D) (brak odpowiedzi)
373. jak napisać program aby wyświetlal gwiazdki[*] w jednej lini (2)
374. Jak napisać/zrobić program taki: Fizyka ruch jednostajnie przyspieszony- obliczanie a-przyspieszenie, t-czas, v-prędkość, oczywiście że V oraz T wynosi 0. Prosty wzorem wpisuje A oraz T i żeby mi obliczyło V, i na odwrót, V i T wynosi A, Jak zrobić/napisać takie coś? Prosze o odp (2)
375. Jak zrobić schemat blokowy do programu który wylosuje 10 liczb z przedziału pd 0 do 100 potem wypisze z tych liczb liczby parzyste i potem je z sumuje? (brak odpowiedzi)
376. Jak napisać program obliczający liczbę pi z zadana dokładnością 1+1/4+1/9+...1/i^2+...=pi^2/6 (brak odpowiedzi)
377. co zrobić, by grafika napisana w dev-pascal lub free-pascal otwierała się w trybie pełnoekranowym ??? (2)
378. Jak właczyc TP 7.0? (brak odpowiedzi)
379. Jak zmienić folder docelowy zapisywania na dysk (brak odpowiedzi)
380. Bankomat wypłacają&#133;c gotówkę operuje banknotami o nominałach 100, 50, 20, 10 oraz monetami 5, 2 i 1 zł. Wyznacz najmniejszą&#133; możliwą&#133; ilość banknotów i monet potrzebną&#133; do wypłacenia określonej kwoty. Program ma po uruchomieniu poprosić o podanie kwoty do wypłaty a następnie wyświetlić odpowiednie ilości banknotów i monet. (brak odpowiedzi)
381. O co w tym biega ?? (brak odpowiedzi)
382. jak mam napisac program zawierajacy imie nazwisko adres? i wszystko w oddzielnej lini? (1)
383. Program, który pobierze od użytkownika liczbę, a następnie wyświetli w kolejnych liniach ekranu rosnącą liczbę gwiazdek od jednej podanej przez użytkownika, a następnie malejąco do jednej gwiazdki (brak odpowiedzi)
384. witam Mam taki problem próbuje zrobić program w Pascalu rysujący kopert dający efekt rysowania jej punkt po punkcie Nie wiem jak rozwiązać ten problem liczę na wasza pomoc pozdr (brak odpowiedzi)
385. Napisz program sprawdzający, czy wpisane słowo (napis) jest palindromem. Jest w stanie ktoś pomóc? proszę.. (brak odpowiedzi)
386. Jak napisać program który poprosi o podanie imienia i nazwiska (Podaj swoje imię i nazwisko: ) a następnie poda tylko imię (Twoje imię to: ). Proszę o szybką odpowiedź. Gdyby była taka możliwość prosił bym o gotowca. Albo napisany program na adres e-mail pehoslav94@o2.pl Z góry dzięki. (1)
387. 1. porządkowania czterech liczb od największej do najmniejszej 2. Obliczania potęgi dowolnej liczby o wykładniku naturalnym 3. Rozwiazywania równania liniowego 4. Zmiany liczb binarnych na dziesiętne 5. wuznaczania liczb fibonacciego (pierwsze dwa wyrazy ciagu są równe 1 kazdy nastepny jest suma dwóch poprzednich) 6. Generowania xx+yy losowych lidzb w tablicy i wykonywanie operacji sortowania ( gdzie xx dzień urodzin yy miesiąc urodzin) proszę o szybka odpowiedź jesli ktoś ma chęci chociaż na część zadanych pytań na e-mail pawlakstm@neostrada.pl (brak odpowiedzi)
388. 1. Porządkowania pięciu liczb od najmiejszej do najwiekszej 2. Znajdowania największego wspólnego dzielnika (NWD) dwóch liczb naturalnych ( algorytm euklidesa ) 3. Rozwiazywanie równania liniowego 4. Zmiany liczb dziesietnych na binarne 5. Obliczania potęgi dowolnej liczby o wykładniku naturalnym 6. Generowania xx+yy losowych liczb z tablicy i wykonywanuie operacji wykonywania maksimum ( gdzie xx - dzien urodzin yy miesiac urodzin) rozwiązania prosiłabym na adres e-mail tekla42@o2.pl (brak odpowiedzi)
389. napisa program który wczyta i posortuje uczniów, rekordy z informacjami o: imie, nazwisko, data urodzenia, numer w dzienniku, płeĆ, email, miasto, telefony (tablica 3 telefonoów). Zaumplementowac klase jako tablice 16 uczniow. Na stale (w kodzie) wprowadzic 5 uczniow. Program ma miec mozliwosc wprowadzenia kolejnych uczniow (az do 16), ma miec mozliwosc wyswietlania posortowane listy uczniow (wzgledem nazwisk). Ma posiadac menu: wprowadz ucznia, wyswietl liste uczniow (brak odpowiedzi)
390. potrzebuje domek ktory posiada: 2 okna , drzwi dach tujkatny komin z komina dym do drzwi idzie sciaszka w lewym gornym rogu promienieje slonce na okolo domku jest plot prosze szybko (brak odpowiedzi)
391. Potrzebuje kogos, kto moglby mi sprawdzic dlaczego nie moge otworzyc procedury. Bardzo prosze o pomoc na GG2632621 z gory dziekuje (brak odpowiedzi)
392. Jak napisać program obliczający średnią dwóch liczb z wykładnikiem ujemnym? (brak odpowiedzi)
393. Na czym polega sortowanie bąbelkowe w Pascalu? Z tego co się dowiedziałem to na poukładaniu np. liczb, w kolejności. Czy to prawda? Z góry dziękuje za odpowiedzi. (brak odpowiedzi)
394. Czy istnieje Pascal dla Win ce 2.11 pro dla procesora sh3? Jeśli tak proszę o pomoc. (brak odpowiedzi)
395. Skonstruuj program który pyta o sume, procent i czas oraz wykonuje obliczenia (brak odpowiedzi)
396. W trybie graficznym Turbo Pascala mam narysować z PIXELI linię przekątną ekranu. Ogólnie całe zadanie polegało na narysowaniu 4 linii (pionowa przez środek i pozioma przez środek oraz 2 przekątne). Dwie kreski pionową i poziomą zrobiłem bez trudu, natomiast przy przekątnej mam problem taki że jak rysuję to on mi robi przekątną kwadratu (a nie prostokąta jakim jest monitor) więc przekątna zaczynała się w rogu ale kończyła dużo przed rogiem przeciwległym. Moje pytanie brzmi: Jak zrobić aby program w trybie graficznym rysował mi przekątną przez cały ekran? (brak odpowiedzi)
397. jak zwolnic czas wyświetlania wyniku, żeby można było go zobaczyć bo jest tak szybki że nie da rady. (1)
398. Jak stworzyc sterowanie do gier tworzonych w module Graph w pascalu? prosilbym konkretny przyklad (brak odpowiedzi)
399. ffgcfcg (brak odpowiedzi)
400. Popraw program tak, aby w razie podania dwóch jednakowych liczb wyswietlił komunikat, stwierdzajacy, ze nie mozna wybrac wiekszej liczby. Pózniej zmien program tak, by prosił o trzy liczby i wybierał najwieksza z nich. (brak odpowiedzi)
401. mam kilka zadań do zrobienia z pascala, bardzo bym prosił o pomoc: 1. DAny jest ciąg {A} liczb całkowitych maksymalnie 10-cio elementowy. Utwórz ciąg {C} wykonując następujące sprawdzenia: -jeśli wartość elementu ciągu A jest większa od stojącego obok wskaźnika to zamień go różnicą elementu i wskaźnika i umieść w ciągu C. -jeśli wartość elementu ciągu jest mniejsza od stojącego obok wskaźnika to zamień go suma elementu i wskaźnika i umieść w ciągu C. -wydrukuj ciąg A i nowy ciąg C 2.Dane są tablice M-jednowymiarowa max 10-cio elementowa o elementach większych od zera i N-jednowymiarowa o elementach mniejszych od zera max 8 elementowa -wczytać rozmiary tablic oraz ich elementy -elementy nad przekątną w M zamienić zerami a pod przekątną jedynkami - utworzyć z M i N jednowymiarową tablicę K wpisując kolejno elementy z M i N oraz policzyć srednią arytmetyczną K -wydrukować M, N i K utworzoną, K zmodyfikowaną i średnią arytmetyczną 3.dana jest tablica A dwuwymiarowa, kwadratowa max 4*4 -wczytać rozmiar i elementy tablicy -obliczyć ilość elementów parzystych na przekatnej oraz sumę elementów <> 0 poza nia -obliczyć sume MAX przekątnej i MIN przeciwrpotokątnej [A] -sumę elementów głównej przekątnej i drugiej przekątnej A -wydrukować A, ilość elementów parzystych, ilość elementów =2 oraz obie sumy 4.Dana jest tablica A dwuwymiarowa, kwadratowa o elementach parzystych, max 5*5 oraz tablica B dwuwymiarowa kwadratowa o elementach wiekszych od 0 o rozmiarze takim jak A -wcztać elementy tablic -obliczyc sume elementów głównych przekątnych A i B -obliczyć różnicę sum przeciwprzekątnych A i B - obliczyć różnicę sum przeciwprzekątnych A i B -wydrukować: A i B, sumę elementów głównych przekątnych A i B, różnicę sum przeciwprzekątnych A i B Z góry dziękuję za pomoc (brak odpowiedzi)
402. funkcja która sprawdza czy istnieje plik o zadanej nazwie (brak odpowiedzi)
403. opracuj program który wykorzystując grafikę w pascalu rysuje na ekranie 3 dowolne figury geometryczne. (brak odpowiedzi)
404. mam plik tekstowy i chcę coś z niego usunąć lub dopisać. Jak to zrobić? (1)
405. Być może było już takie pytanie ale nie znalazłem odp. :) A więc: Jak zrboic aby np. kwadrat po wcisnieciu danego dlawisza przesunął się o kilka miejc do przodu lub w inna strone. Z pascalem nie mam wiekszych problemów jednakże proszę o szybką odp. :) (brak odpowiedzi)
406. Widziałem w programie Symulator Wirusa(jest on w Downlandzie na tej stronie) i mam 2 pytania. 1.Jak zrobić efekt ładowania ten co napoczątku? 2.Jak zrobić taki migający ekran? (4)
407. Napisz program który po napisaniu imienia pisze jaka to płeć? Z gory dzięki (1)
408. <b>lol</b> (brak odpowiedzi)
409. Jak zrobić rozwijane menu? Chodzi mi takie jak w programie Edytor_testów albo jak ktoś go nie ma to w turbo pascalu 7.0. ściągnąłem z neta kod źródłowy ale nie wiem co on oznacza. Ktoś wyjaśni? A ten kod to: Uses Objects,Drivers,Views,Menus,App; Type TAplikacja = object(TApplication) procedure InitMenuBar; virtual; end; procedure TAplikacja.InitMenuBar; var R : TRect; begin GetExtent(R); R.B.Y:=R.A.Y+1; MenuBar:=New(PMenuBar,Init(R,NewMenu( NewSubMenu('~M~enu',hcNoContext,NewMenu( NewItem('~P~ierwszy','F1',kbF1,cmNo,hcNoContext, NewItem('~D~rugi','F2',kbF2,cmNo,hcNoContext, NewItem('~T~rzeci','F3',kbF3,cmNo,hcNoContext, NewLine( NewItem('~K~oniec','Alt-X',kbAltX,cmQuit,hcNoContext,nil)))))),nil)))); end; Var Aplikacja : TAplikacja; Begin Aplikacja.Init; Aplikacja.Run; Aplikacja.Done End. (brak odpowiedzi)
410. siemka jest jakis sposob na to, by program nie wyswietlal wpisywanych cyfr?? moze zastepowac je jakimis gwiazdkami czy czyms takim, ale zeby sama cyfra nie pokazywala sie na ekranie (brak odpowiedzi)
411. Jak nazywa sie Pascal ? (brak odpowiedzi)
412. napisz program generujący i wyświetlający 20 liczb losowych z zakresu od 1 do 10 a następnie wypisujący ile jest liczb parzystych obliczający sumę tych liczb i ile jest piątek (brak odpowiedzi)
413. napisz program generujący i wyświetlający 20 liczb losowych z zakresu od 1 do 10 a następnie wypisujący ile jest liczb parzystych obliczający sumę tych liczb i ile jest piątek (brak odpowiedzi)
414. napisz program generujący i wyświetlający 20 liczb losowych z zakresu od 1 do 10 a następnie wypisujący ile jest liczb parzystych obliczający sumę tych liczb i ile jest piątek (brak odpowiedzi)
415. Witam.Jak napisać programy jako aplikacje SDI lub MDI: 1.podporządkowania trzech liczb(od największej do najmniejszej), 2.znajdowania największego wspólnego dzielnika (NWD)dwóch liczb naturalnych(aglorytm Euklidesa), 3.rozwiązywania równania kwadratowego, 4.zmiany liczb dzięsiętnych na binarne, 5.znajdowanie zera funkcji metodą połowienia przedziału, 6.generowania xx+yy losowych liczb w tablicy i obliczania średniej arytmetycznej(gdzie xx-dzień urodzin yy-miesiąc urodzin słuchacza,np.01.02 to 1+2=3 a więc program generuje 3 losowych liczb).Bardzo proszę o pomoc.Dziękuję. (brak odpowiedzi)
416. Witam.Jak napisać programy jako aplikacje SDI lub MDI: 1.podporządkowania trzech liczb(od największej do najmniejszej), 2.znajdowania największego wspólnego dzielnika (NWD)dwóch liczb naturalnych(aglorytm Euklidesa), 3.rozwiązywania równania kwadratowego, 4.zmiany liczb dzięsiętnych na binarne, 5.znajdowanie zera funkcji metodą połowienia przedziału, 6.generowania xx+yy losowych liczb w tablicy i obliczania średniej arytmetycznej(gdzie xx-dzień urodzin yy-miesiąc urodzin słuchacza,np.01.02 to 1+2=3 a więc program generuje 3 losowych liczb).Bardzo proszę o pomoc.Dziękuję. (brak odpowiedzi)
417. Witam jak opracować program, który wprowadza na ekran następujące figury X Dzięki!!!! xx x xxx xx xxxx xxx xxxxx xxxx xxxxx (brak odpowiedzi)
418. jak napisać program porządkujący dany ciąg liczb nie malejąco ze względu na wartość modołów proszę o odp. pilne (brak odpowiedzi)
419. Witam jak obliczyć i skonfigurować pierwiastek ? mam obliczyć i skonfigurować dwadzieścia pierwszych pierwiastków jak to zrobić proszę o pomoc (brak odpowiedzi)
420. Jak napisac automat do napoi ??? Bo mi sie nie udaje (brak odpowiedzi) N
421. 2Napisz program który będzie odczytywal liczby z pliku i zapisywal je do dwu roznych plikow oddzielnie parzyste oddzielnie nieparzyste (brak odpowiedzi) N

Zadaj własne pytanie...

Twoje pytanie:
 


Podpis: 

Wpisz wynik: trzy dodać pięć równa się (pisane cyfra)