a po co record? wystarczy typ. Ponadto - widzę niezgodność typów tablicy z n i for n:=z to n do - zagrożenie pętlą nieskończoną! uzywasz tej samej zmiennej po obu stronach. nie ja uzywam tylko przerobilem ten program co byl, autor powinien sam popracowac - ja podpowiadam....
A czy kolega rozumie w ogóle zadanie? Masz znaleźć takie trójki liczb, których suma... czyli sprawdzamy 1+1+1 = 3 - OK 1+1+2 = 4 - :( 1+1+3 = 5 - OK 1+1+... 1+1+19 = 21 - :( 1+2+1 = 4 - :( czyli masz stworzyć de facto tablicę (jesli już chcesz takową) o szerokości 3 i długości wynikającej z kombinacji liczb, a następnie wyznaczać sumę i sprawdzać, czy...
program tablica; uses crt; var t:array[1..10] of integer; i:integer; begin clrscr; writeln ('Wpisz 10 liczb'); for i:=1 to 10 do readln (t[i]); writeln('liczby podzielne przez 2 to '); for i:=1 to 10 do begin if t[i] mod 2 =0 then writeln(t[i]); end; readln; end; tak wygląda...
Nic nie jest na tyle doskonałe, aby nie można było tego ulepszyć ;) Mnie się zdaje, czy tu powinny być dwie pętle - znajdowanie czynnika i porównanie go ze wszystkimi elementami tablicy? Ty porównujesz pierwszy czynnik z pierwszym elementem tablicy, drugi z drugiem itd... Raczej pozbawione sensu...
Ponizej przedstawiam program ktory sam napisałem w Dev-Pascalu brakuje mi jednak tylko pare elementów. Otóż chodzi mi aby do niego dodac nastepujące elementy: W ostatnim polu pierwszej tablicy ma być zapamiętana suma wszystkich poprzednich wartości w tablicy. W ostatnim polu drugiej tablicy ma być zapamiętany iloczyn dziesiątych części wszystkich poprzednich...
i ja się dołączam: program tablice; var x,y: byte; //współrzędne kom. w tabeli min, max: integer; //wartości max i min tab: array[1..4,1..4] of integer; //tablica suma: array[1..4] of integer; //tablica sum kolumn suma2: integer; //na potrzeby średniej sr: real; //średnia begin randomize; //dzięki temu losowane...
bez randomize jest ,żebym miał te same liczby dzięki za pomoc z przekątnymi w końcu skumałem zrobiłem z nieparzystymi - luknij program tablice; uses CRT; var T :array niby ok tylko czemu sprawdza mi tylko 3 wiersz a te 2 pierwsze nie ?? jak dam np. for j:=1 to 3 do if (i mod 2)=0 then T to mi sprawdza 2 wiersz i ewent. zamienia na 0 tak jak powinno...
Witam! Dopiero zacząłem przygodę z Pascalem i mam problem z pewnym zadaniem. " Napisz program rozkładania dowolnej liczby na liczby pierwsze, który po wczytaniu liczby z klawiatury wyprowadzi komunikat - liczba pierwsza/liczba złożona - stosownie do sytuacji. Wykorzystaj pętlę while". Z góry dziękuję za wszelką chęć pomocy :) Obrazki wstawiamy wg
Działa tak jak chciałem a czy da rade zrobić żeby zrobić taką pętle żeby podać do programu 10 liczb i te liczby będą zapisane w pliku tekstowym w postaci binarnej jeden pod drugim: (plik.txt) np: 10100110 10101100 10101010 01101011 coś takiego pętle już zrobiłem ale zapisuje tylko jedną liczbę binarna w notatniku [syntax=pascal]program postac_binarna;...
Witam, mam napisać algorytm który w liczbie zakresie 1-100 wykaże wszystkei liczby podzielne przez 7,8,9. Program ma być zrobiony w pascalu. Wie ktoś jak zrobić taki program?
Czy może ktoś pomóc mi w kwestii programowania w Pascalu?? Chodzi o słowny zapis wczytanej liczb(y) całkowitej Zamykam. - arnoldziq
witajcie. potrzebuje program, który po wczytaniu n liczb naturalnych do tablicy, losuje dwie z nich, dodaje i mnoży za pomocą procedur. z zapisem samej tablicy, dodawania i mnożenie dam sobie rade, ale te losowanie jest nie do zgryzienia.
Witam, potrzebuje pomocy z programem który ma pobierać od użytkownika liczby do momentu podania liczby całkowitej. Oto mój program.. program onn; uses crt; var a:integer; i:integer; reszta:integer; pomoc:integer; begin clrscr; i:=2; writeln('podaj a'); // wczytywanie a read(a); while (a mod i=0) do // program...
Nie moge poradzić sobie ze zrobieniem programu ,Licze na wsza pomoc. zad Dany jest plik dane.dat a w nim ciag liczbowy . W zalozeniu tego ciagu liczby powinny byc na przemian parzyste i nieparzyste. a)napisac procedure sprawdzające czy liczby sa ulozone na przemian b) napisac procedure ktora przepisze z pliku liczby nieparzyste do tablicy a i zad 2...
program osi; var t:array[1..10] of integer; n:array[3..100000] of longint; x:array[-100000000..100000000 ... of integer; begin end. co tu jest nie tak ?
Mam takie zadanie napisac w pascalu ale ja niewiem jak jestem początlującyi niezabardzo jeszcze znam sie w tym weście mi ludzie pomórzcie proszę : 1. Napisz program z elementami typu znakowego dla tablicy jednowymiarowej złożonej z 4 wlementów. 2.Oblicz częstość występowania wybranej litery w tekscie.
Witam-mam takie zadanie do zrobienia"program zapisujacy slownie liczbe z przedzialu 1000...9999"i trzeba to napisac w pascalu-robil moze ktos cos takiego kiedys?prosilbym o pomoc-dopiero zaczynam programowac i mam z tym spory problem.Jezeli ktos moglby pomoc bylbym wdzieczny.pozdrawiam
Witam. mam problem z programem, którego treść brzmi: Tablica 12 elementowa - elementy typu integer a) losowanie generowanie elementów tablicy b) wyświetlanie tablicy c) Funkcja - średnia elementów d) Funkcja - średnia parzystych e) Fumkcja - obliczanie ile jest elementów z przedziału (-5,5) f) normalizacja tablicy g) potęgowanie tablicy ( każda następna...
witam, jak w pascalu policzyc ile jest roznych elementow w tablicy jednowymiarowej (wektorze)? np tab Temat zamykam. - arnoldziq
Witam. Mam napisać dwa programy w Pascalu i nic mi nie wychodzi :( Wyśmiejecie mnie pewnie bo to banalka dla programistów no ale.... PROSZĘ O POMOC. Program 1. Program ma wyświetlić wszyskie liczby do 100 od wprowadzonej. Czyli wprowadzę np 56 to wyświetli 57 58 59 ..i tak do ... 99. (z wykozystaniem pętli FOR) Program 2. TO samo co w programie 1 ale...
Witam, mam spory problem. Wiem, ze podobne topic juz byly ale nie bardzo potrafie z nich skozystac przy tablicy dwu-wymiarowej. Chodzi mi o wsatwienie liczb do tablicy dwu-wymiarowej, tak aby liczby nie powtarzaly sie w zadnej kolumnie i wierszu. Mecze sie z tym problem juz sporo czasu. Bardzo prosze o pomoc, a najlepiej o kod zrodlowy. Zamykam. - arnoldziq...
Jeszcze jedno proste spostrzeżenie, longint czyli 2^31, pierwiastek z tego to 46344, potencjalne podzielniki nie będą większe niż ta liczba i co ważne same będą liczbami pierwszymi, jest ich nie wiele, około trzech czterech tysięcy, może warto zebrać taką tablicę (przyśpieszenie kilkukrotne)
To w takim razie tak, musisz wrócić do rozwiązania z tablicą. Chodzi tu o dwie proste sytuacje: Pierwszą, jeżeli kilkukrotnie kopiujesz i wklejasz ten sam kod po czym modyfikujesz poszczególne kopie. Drugią jest pisanie "identycznego" kodu parokrotnie. Nie tylko masz więcej kodu do ogarnięcia, ale też ryzykujesz przeoczeniem jakiejś zmiany którą powinieneś...
Zastosuj pętlę w pętli, pierwsza pobiera kolejne wartości z pierwszej tablicy, druga "przelatuje" po tablicy drugiej i porównuje wartość. W pierwszej możesz użyć "for" a w drugiej "while".
Witam Proszę o pomoc w zadaniu: Muszę w Pascalu napisać program, w którym na początku program pyta o wielkość tablicy ... liczby:(array[1..x, 1..y] of integer; ... a następnie wprowadzam dane do tablicy. I ostatni krok to liczby te muszę do siebie dodać lub odjąć. koniec zadanie pierwszego. Następne zadanie już sobie poradzę analizując to pierwsze....
Jeśli dobrze zrozumiałem, musisz za każdym (poza pierwszym) losowaniem liczby sprawdzać czy nie znajduje się już w tablicy, i w zależności od wyniku tego sprawdzenia powtarzać losowanie lub nie.
Po pierwsze jaki język c++, delphi, pascal, asm co my wróżki!!!! Jak w c++ poszukaj info o funkcji random, rand, randomize
Witam, otóż posiadam dwie tablice liczb całkowitych. Potrzebuję jakieś nakierowanie, gdyż do jednej losuję z pewnego zakresu liczby, znajduję minimum... Teraz potrzebuję te minimum wpisać do drugiej tablicy(wskaźników) tyle razy(bez powtarzania sie wartosci), aby ona była posortowana od najmniejszego do największego. [syntax=delphi]for j:=1 to 10 do...
Witam, w szkole na zaliczenie mam zadanko z Pascala. Nie byłem na wszystkich zajęciach stąd wiedza jest troche ograniczona (niestety taka praca). Zadanie mam takie : program ma przeczytać 10 liczb, policzyć liczby ujemne i dodatnie, a nastepnie wypisać te których jest więcej. Drugie zadanie (nieobowiązkowe) mam takie: macierz dwuwymiarowa 3x4, program...
Witam serdecznie, potrzebuję zrobić program w pascalu, który będzie liczył wartości tylko zero-jedynkowe w dodatku LOGICZNIE. Wiem jak funkcjonują poszczególne bramki etc. Ale nie wiem jak zdefiniować by program np liczył and z dwóch liczb binarnych. Czyli po dodaniu dla przykładu 0001 and 0110 poda wynik. Na tej samej zasadzie nand, nor, or i xor....
czyli jesli ponumerowana tablica od 1 do 5 to pole 2,2 ; 2,4 ;4,2;4,4 przekatne juz wyliczone teraz zostalo mi do wybrania minimalnej liczby w nieparzystych wierszach i maksymalnej w parzystych kod to <code> program Project2; {$APPTYPE CONSOLE} uses SysUtils; var tab : array [1..20,1..20] of integer; stosunek,suma1,suma2,i,j,w : integer ; Begin...
Witam. Potrzebuję programu, a oto jego parametry: - musi zsumować liczby z 5 tablic (pierwsze musi poprosić o wpisanie 5 dowolnych liczb, dopiero potem je zsumuje) - musi "segregować" rosnąco liczby (od najmniejszej do największej) - wynik wygląda następująco: "Suma liczb to: #, a ich kolejność w porządku rosnącym to #" Na razie wymęczyłem tyle: Proszę...
ale ja zrzęda jestem, do wszystkiego muszę się przyczepić (szczególnie kiedy na czymś się znam) O!!!! jest pierwszy (w dwu wątkach o tym samym) kawałek kodu który robi to co ma robić, choćiaż ;) to -1 "magiczna liczba" a co jeśli chcemy losować także ujemne liczby? lepiej już BREAK (szkoda że nie zadziała - przy tak napisanych pętelkach dam rozgrzeszenie...
Dzięki za pierwszą część programu trochę ją przerobiłem bo chodziło mi bardziej o coś takiego [syntax=pascal] program ja; USES CRT; VAR tab:array[1..20] of integer; n,m,i:integer; BEGIN clrscr; randomize; m := 20; n := 59; for i:=1 to 20 do tab[i] := Random(n-m+1)+m; for i:=1 to 20 do writeln(tab[i]); readln; END. [/syntax] a jak teraz wstawić wybieranie...
Skleiłeś jakieś 3 fragmenty kodu i w ogóle nie wiesz, co one robią. Skoro wkleiłeś:[syntax=pascal] for i:=0 to 4 do memo1.lines.add(IntToStr(t[i]));[/syntax... to ile liczb ma się wyświetlać, jak nie 5? Jak podajesz w edicie 4, to tylko 4 pierwsze liczby są losowane od 0 do 99 (a nie 100) - czemu piąta miałaby też być wylosowana? Na piątym miejscu w...
Minimalna i maksymalna liczba Wejście W pierwszej linii wejścia znajduje się jedna liczba całkowita n (1 <= n <= 10000), która oznacza liczbę uczniów w klasie. W kolejnej linii znajduje się n liczb całkowitych (z przedziału od 1 do 1000), które oznaczają wyniki kolejnych pomiarów. Wyjście Na wyjściu należy wypisać kolejno wzrost najniższego i...
Witam Potrzebuje zrobić program który będzie podanych przez ze mnie liczb policzy mi średnia arytmetyczna i harmoniczna. Z ta pierwsza sobie poradziłem ale z tą druga już się mecze od paru dni. :cry: Mozę któryś z kolegów rzucił okiem na mój kod i doradził gdzie mam błąd. //Srednia Harmoniczna sumaH:=1/StrToFloat(ListBox1.Items[0]);/... wczytanie pierwszej...
Witam, mam do napisania program, ktory w pierwszej kolejnosci losuje 10 roznych,mogacych sie powtarzac liczb, nastepnie gdy uzytkownik wpisze jedna musi wyskoczyc na ktorym miejscu ta liczba sie znajduje. Program po czesci jest napisany, ale brakuje mi tej ostatniej informacji. np, gdy uzytkownik wpisze 5, a zostaly wylosowane liczby w kolejniosci 2,5,3,4,1,0,5,2,1,9...
Niestety nie mam czasu pisać gotowych algorytmów dla ciebie :( wielkosc - max ilosc ludzi wpisanych tu masz przykład sortowania bąbelkowego najprostrzego dla jednej tablicy musisz dodać pytanie wg czego chcesz sortować i wtedy zamiast tablica dajesz naprzykład Nazwisko i sortują nazwiska musisz odrazu sortować resztę czyli przestawić wartości w innych...
zrobic tablice stringow i do niej wpisac tekst z pliku na poczatku wyswietlic pierwsze 24 linie zrobic zmienne przechowujace od ktorej linii do ktorej linii wyswietlac, po nacisnieciu np. strzalki w dol zwiekszyc obie zmienne i wyswietlic ponownie tekst, po nacisnieciu strzalki w gore zmniejszyc obie zmienne i wyswietlic ponownie tekst, mozna tez obsluzyc...
Witam, czy może mi ktoś pomóc w narysowaniu schematu blokowego tych 2 programów? Pozdrawiam serdecznie i z góry dziękuję. program 1: Program Zgadywanka; uses crt; var pr,li,a,b,x:integer; c:char; label new,zle; begin new: clrscr; randomize; li:=random(70+1)+10; pr:=0;a:=10; b:=80; repeat pr:=pr+1; writeln('Podaj...
program sortowanie; uses crt; var tab:array po pierwsze primo to kod pisz w znacznikach CODE. po drugie primo to strasznie pogmatwany ten twój kod. domyślam się, że chcesz zrobić sortowanie w kolejności rosnącej. Program Sortowanie; uses crt; var T:array[1..20] of integer; //wyswietlanie zawartosci tablicy na ekranie Procedure PokazTab;...
zad1. tu mialem problem z wyprowdzeniem danych z pliku, bo jak bede mial dane to reszte pewnie policze przeciez wszystko napisalem w poprzednim poscie! poczytaj mana/helpa o funkcjach ktore Ci wskazalem i nie powinno byc problemu. zad.2 , zad1 -mam jeszcze problem z wywplaniem pliku program.exe plik gdyz nie do koncza rozumien wskazniki, a w ksiązce...
Kolega z Łodzi to coś słyszał ale nie do końca pamięta. Nie zaśmiecam sobie pamięci tego typu szrotem. Algorytm na poczekaniu wyczytałem z sufitu. Ponieważ jest "bardzo szybki" może być użyteczny przy wszelkiego rodzaju konwersjach liczba/łańcuch zwłaszcza w układach wyświetlania wielkości fizycznych, gdzie w procesie kalibracji możemy wyliczyć i wpisać...
Pytanie czy odpowiedź musi nastąpić po idealnym interwale czasowym. Ile bajtów sterujących może nadejść naraz / w krótkim czasie Wykonałem analizator widma. Jest to analizator oparty o potrójną przemianę częstotliwości i zawiera dwie pętle PLL. Ramka przychodząca od analizatora może składać się maksymalnie z 240 bajtów. Ilość tych bajtów i tak oblicza...
Dzięki za zainteresowanie się tematem andy1955. Właśnie wczoraj się dowiedziałem, że do mojego sterownika można po konwersji wgrywać programy napisane w C++ (lub jakimś C). Dzięki temu wiem o co Ci chodzi. Chcę również powiedzieć, że problem rozwiązałem podobnie do Ciebie, tylko że używając jedynie zasobów sterownika. Nie jest to takie straszne obszerne(przy...
Widzę że to chyba kontynuacja innego tematu. Najpierw odpowiem na konkretne punkty, tzn. jak bym to kodował, a potem dorzucę parę uwag. 1. Musisz mieć podaną listę wierzchołków, powinna być skończona i albo możliwa do przeliczenia (jeżeli np. używa się zawsze tablicy 2x1000 i ustala się że po ostatnim "legalnym" wierzchołku występuje dana o specjalnej...
liczby pierwsze pascal tablica pascal pierwsze liczby pascal
windows update naprawa wyświetlacz podróbka iphone częstotliwości radiowe policja
digital multimeter miernik oscyloskop dt5200
Serwis pompy ciepła Nulite - jak znaleźć? Bosch KGN vs Bosch KGVH – różnice, No Frost, Low Frost, HydroFresh, oznaczenia modeli
