Wystarczy sprawdzić najniższy bit liczby Jeżeli jest 1 , to liczba nieparzysta, inaczej liczba parzysta. W Pascalu dawno nie pisałem, ale to będzie coś w stylu IF ((liczba and 1) = 1) then nieparzysta else parzysta
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. Jestem kompletnie zielony w tym programie i prosze o pomoc a jest mi to bardzo potrzebne i mam takie polecenie : wczytaj liczbe calkowita i okresl czy jest liczba parzysta czy nieparzysta. Prosze o pomoc:)
jak wylosować dwie liczby w Pascalu tak aby się nie powtarzały, na rzadnym z miejsc?tzn. jak losujemy np 2 i 3 to zeby później już nie było 3 i2 ani znowu 2 i 3:)...pomóżcie.. Dodano po 11 Pomóżcie...we wtorek mam zaliczenie:(
hejka! mam troszke czasu i postanowilam napisac fajny programik , ale do jego realizacji jest mi potrzebny algorytm losowania 4 liczb, tak aby zadna z nich sie nie powtorzyla. raczej to nie jest trudne ale cos mi nie wychodzi:/,bede wdzieczna za pomoc.pa Zamykam. - arnoldziq
Pomoglibyście mi rozwiązać te zadania, mam problem z tymi tablicami ;/ 1.Wprowadź do jednowymiarowej tablicy 10 liczb rzeczywistych i wyprowadź na ekran największy i najmniejszy z nich. 2.Napisz program wprowadzający dane do tablicy dziesięcioelementowej i wyprowadź najpierw liczby parzyste, potem nieparzyste.
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...
1. Program, nie może się nazywać tak samo, jak jedna z procedur : [syntax=pascal]program dodaj_macierz; [...] Procedure dodaj_macierz(Var x,y,z:mac;w,k:byte); [...][/syntax]Bo otrzymasz błąd powtórzenia identyfikatora. 2. Skoro dane w macierzy mają być losowe od 0 do 10, to po co czytasz je z klawiatury ? [syntax=pascal]Procedure czytaj_macierz(Var...
napiszesz mi to poprawnie tak żeby wyświetlał liczby parzyste d:) bo muszę spadać do pracy ;widzę że będę miał co analizować dzięki pozdrawiam
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) then EXIT; . for i:=2 to L-1 do . . if L mod i...
Siema! Ogarniam procedury i funkcje w Pascalu. Zrobiłem program, który wyświetla wszystkie liczby parzyste od 2 do 222 przy użyciu procedury. I tu moje pytanie, który kod jest poprawny? Tzn. wszystkie te programy działają, ale jak to powinno w miarę profesjonalnie wyglądać? 1.[syntax=pascal]program liczby; uses crt; procedure petla; var i:byte; begin...
z tym 'break' działa, ale wyszedł jeszcze jeden problem. Ja te liczby co wprowadzam przetwarzam w różny sposób(szukam parzystych, minimalnej, maksymalnej, itp). Jak więc zrobić aby tego ostatniego 0 nie brało pod uwage?
Wreszcie napisałem program, czy mógłby ktoś sprawdzić czy ma tak wyglądać: [syntax=pascal] program Project1; {$mode objfpc}{$H+} var N: integer; wektor: Array of integer; procedure generator(N:integer); var i: integer; begin SetLength (wektor, N); randomize; for i:=0 to N-1 do begin (wektor[i]):=random(100)-50; end; end; procedure pokaz(N:integer);...
Witam jestem początkującym w turbo pascalu mam problem z tym oto programem: code: program sprawdz_parzystosc; uses crt; var x:real; begin writeln('Podaj x:') read(x); if x mod 2=0 then begin Writeln('Liczba',x,' jest parzysta'); end else begin writeln('liczba',x,' nie jest parzysta'); end end. Kompilacja bez problemu,...
Gdzie w tym zadaniu jest powiedziane, że tablica ma być dwuwymiarowa? Jednowymiarową tablicę też można w czterech wierszach wyświetlić. Odstępy między liczbami w każdym wierszu możesz oddzielić np. znakiem tabulacji (albo po prostu spacją " ") write(tablica[i][j],... { wartość na indeksie... }
Mam do napisania program na zaliczenie. Całość zadania brzmi : Losowe generowanie wektora wierszowego o zmiennym wymiarze, wyświetlanie wektora, suma elementów. średnia ujemnych , wyznaczanie liczb pierwszych oraz parzystych, potęgowanie wektora (każda następna liczna jest wykładnikiem poprzedniej A[i] A[i+1](to ma być indeksie górnym w A[i]), zapis...
Witam, chciałem podzielić się z kimś i przy okazji rozwiązać jedno zadanie z pascal'a. Zadanie jest złożone. Znam podstawy pascal'a ale to zadanie mnie przewyższa. Nie chce też żeby ktoś mi je rozwiązał bo wtedy niczego nie połapie. Zadanie jest takie: Napisać program tworzący 15 elementową jednowymiarową statyczną tablice liczb. Tablica powinna być...
Dodam jeszcze że wynik zbyt dokładny nie będzie bo zmienne x i y pochodzą z tego samego procesu. Generator może jeszcze jako tako przechodzić testy równomierności rozkładu czy inne dotyczące jednego rozkładu, ale zapewne wysypie się na teście niezależności próbek parzystych i nieparzystych. Dla dokładnych wyników należałoby użyć dwóch różnych generatorów...
Witam Moja propozycja jest taka: Jeśli jest nieparzysta ilość elementów to zrób parzystą ilość elementów poprzez dodanie do komórki tablica[ilosc+1]:=tablica[ilosc] oraz zwiększeniu ilości o 1. Tablice dodatkowe nie są ci wogóle potrzebne. Ty porównujesz dwa sąsiednie elementy w tablicy (1z2, 3z4, 5z6 itd.) Wystarczy że te dwa elementy ze sobą ewentualnie...
A wiec mam do zrobienia kilka zadan w TP, jestem poczatkujacym w tej dziedzinie dlatego prosiłbym o pomoc w napisaniu takich programów: 1) Wylosować 20 liczb i posortowac je metodą bąbelkową. 2) Na posortowanej wczesniej tablicy zastosowac wyszukiwanie binarne. 3) Napisz program zamieniający miejscami dwa wskazane wiersze tablicy dwuwymiarowej 4) Napisz...
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...
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...
„ ...mniejsza o to... ” no pięknie. ;-) Zobacz np. 12 rozdział w www.dspguide.com. Albo Próbki umieść w tablicy X w następującej kolejności: 0,2,4,...,n-2,1,3,...n-1 (parzyste w części RE procedure oddsort(ncap:integer; var y:longvector); //w miejscu sortuje ciąg, tab by uzyskać 0,2,4,...,n-2,1,3,...n-1 var tcap, t, j, k:integer;...
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...
Nie moge dokończyć algorytmu strassena w pascalu, oto kod źródłowy: !!!!!!!!!!!!!!!!!!!!!BARDZO PROSZĘ O POMOC!!!!!!!!!!!!!!!!!!!!! PROGRAM Strassen; TYPE X1=ARRAY Dodano po 4 Chodzi mi o to żeby np. w takim wierszu: p Dodano po 1 .........poprostu jak zrobić zamiast + żeby była procedura dodawania, zamiast * procedura mnożenia....... :-)
ma być jedno hasło tylko na stronę główną np szkoła nr 4 w xxxxx wykonał xxxx rok szkolny 2009/2010 a później będę pisał program Dodano po 12 ta 1 ramka to strona tytułowa ma sie ona pokazac tylko raz w programie po czym gdy podasz haslo prawidłowe przejdzie do menu(2 ramka i to menu ma sie powtarzac ) program w11 uses crt; Const var x,a,b,c,s,s1:real;...
liczby parzyste liczby pascal wpisać liczby parzyste
gasną światła skoda fabia transmisja bezprzewodowy tylny lampa sprinter
Karcher HDS 995 - Wymiana głowicy na zamiennik Komputer wyłącza się po wymianie Intel i5-7400 na i5-9400
