Program sortujący przez wstawianie pomożcie:(

	B O A R D
	» Board » Zadaj pytanie » Archiwum » Szukaj » Stylizacja

M E N U

» Nowości

» Archiwum

» Recenzje / Testy

» Board

» Rejestracja

Szukaj @ TwojePC

	OBECNI NA TPC
	» Holyboy 09:44 » Lucyferiu 09:42 » jablo 09:38 » biEski 09:37 » Logic-3 09:36 » Sebek 09:33 » rooter666 09:31 » DYD 09:30 » Dexter 09:30 » rrafaell 09:28 » Liu CAs 09:28 » JE Jacaw 09:27 » PaKu 09:24 » Kenny 09:21 » Katoda Lt 09:19 » Kenjiro 09:16 » ligand17 09:15 » NimnuL 09:14 » ulan 09:09 » emigrus 09:02 Dzisiaj przeczytano 41102 postów, wczoraj 25974 Szybkie ładowanie jest: włączone.

ccc

A R C H I W A L N A W I A D O M O Ś Ć

Program sortujący przez wstawianie pomożcie:( , borg18 22/11/06 21:56
Mam zrobic taki programik, najlepiej aby program pytał o jakies liczby a potem je sortował, tylko jak to zrobic? ja jestem dętka z pascala pomozcie
Tu mam jakis początek, ma to byc za pomocą tablic i procedur?
program sortujacy;
uses crt;
type tablica:=array[1..n] of real;
var
tab:tablica;
procedure sort (var tab:tablica; N:integer);
var
begin

end;
begin

end.

https://programy.net.pl - duża dawka
programów ;)

Dzizzz , DJopek 22/11/06 22:02
Mogę wiedzieć gdzie studiujesz/uczysz się? Bo chyba pomyliłeś szkoły przy wyborze, to już nie wiem który Twój post na podobny temat, lepiej zmienić szkołę/uczelnię niż się tak męczyć IMO.
1. studiuje na infie , borg18 22/11/06 22:08
  i nie praw mi tu kazań, to ze nie miałem nigdy pascala oprócz liceum a teraz mam to nie powod do....lepiej pomoż a nie..:P
  https://programy.net.pl - duża dawka
  programów ;)
  1. a kogo obchodzi ze nie miales , kubazzz 22/11/06 22:11
    student medycyny tez pewnie nigdy wczesniej nie mial interny.
    poza tym jezyk to tylko jakas tam skladnia do zapisania algorytmu. nie wykrecaj sie nieznajomoscia TP:))
    swoja droga rzeczywiscie chyba studia pomyliles.
    SM-S908
  2. co to jest "infa" ? Bo chyba nie informatyka. , Bart 23/11/06 00:31
    Jeżeli to uczelnia Państwowa to bądź tak miły i nie marnuj naszych podatków. Jeżeli prywatna to przelej jeszcze trochę kasy - może nie będziesz musiał robić takich straszliwie trudnych rzeczy nie związanych z Twoimi zainteresowaniami i wymagających myślenia.
    Co dziś znaczy słowo "studiuje", ano proszę Państwa gówno znaczy.
    1. moze , tommi 23/11/06 00:40
      pomylilo mu sie z "amfa" :))))
      Śmiech to najlepsze lekarstwo na
      wszystko, no może z wyłączeniem biegunki.
    2. studiuje na , borg18 23/11/06 00:40
      Akademii Pedagogicznej w Kr kolego i nie mow mi ze to marna uczelnia czy jakim cudem sie tam znalazłem, to ze mam problem z pascalem to nie znaczy że jest tak ze wszystkim jestem na 2 roku z czego połowa ludzi odpadła na pierwszym tak więc....
      https://programy.net.pl - duża dawka
      programów ;)
      1. hmm , 0r8 23/11/06 02:15
        z czego 99% to i tak debile.
        to, ze polowa odpadla - bardzo niewiele znaczy.
        widze , borg18 23/11/06 08:14
        ze na Twojej uczelni 99% to debile
        https://programy.net.pl - duża dawka
        programów ;)
      2. Problem masz nie z pascalem, tylko ze swoją głową. , Bart 23/11/06 09:58
        To nie jest problem z pascalem !
        Ty zgubiłeś się na poziomie algorytmu a nie języka !
        Spis poleceń, procedur i składnię znajdziesz wszędzie !
        To na uczelni jako literaturę podali Ci www.twojepc.pl ? ;)
        Na forach powinno się rozwiązywać problemy, a nie odwalać robotę za leniwych nieuków.
        Tragedia proszę pana.
      3. chłop(cz)ie , Chrisu 23/11/06 13:17
        u mnie uczniowie piszą to po 2 miesiącach nauki. I nie pytają się co i jak tylko biorą algorytm i heja... Jeśli poszedłeś na te studia by "coś" skończyć to nie życzę Ci źle, ale niech jak najszybciej Cię wyleją...
        /// GG# 1 110 10 10 11 100 10 \\\
2. ja bym się lepiej zapytał , john565 22/11/06 23:01
  co to za uczelnia że na niej co rusz pascala męczą, a pytanie LOL, zresztą z borgiem to tak zawsze
  f*ck
3. hehehe ja tez bylem na infie i zmienilem po roku :) , Nazgul 23/11/06 08:44
  prawde mowisz ;))) teraz sie nie mecze. pozdr i <piwko>
  people can fly, anything
  can happen...
  ..Sunrise..
use google 0_o , Pietka 22/11/06 22:09
http://pl.wikipedia.org/...owanie_przez_wstawianie
Jezu , borg18 22/11/06 22:13
czy tu już nie mozna nikogo prosic o pomoc? to na wikipedi widziałem ale juz sobie jakos poradziłem masakra dzięki!! Pedagogami to nie bedziecie
https://programy.net.pl - duża dawka
programów ;)
1. hmm , macol 22/11/06 22:59
  "Pedagogami to nie bedziecie"
  
  a Ty informatykiem :P
  ja chce 100% jasne tpc
2. a ponadto , john565 22/11/06 23:03
  to 'Panie Jezu', szacunku trochę
  f*ck
3. nie przejmuj się , celt 22/11/06 23:25
  znam gorszych informatyków (którzy już skonczyli informatykę :)
  Pascal to shit jakich mało, dla mnie też była to czarna magia. Ciekawe bo C/C++ (nawet asembler) już nie :)
  Everything should be made as simple as
  possible, but no simpler
  1. LOL , john565 22/11/06 23:41
    Z całym szacunkiem LOL, LMAO LOL
    f*ck
    1. nawet , celt 22/11/06 23:45
      nie wiesz jakie lamy studiuja/studiowały na PG na informie :)
      Everything should be made as simple as
      possible, but no simpler
    2. aha , celt 23/11/06 16:28
      z tym Pascalem to nie były jakieś tam dyrdymały np. sortowanie (bo nawet samemu można wymyślić do tego algorym). Ja wymiekłem przy tworzeniu jakieś tam aplikacji która miała być wypożyczalnia kaset (taka mini-baza danych z obsługą) i w tym sensie byla to czarna magia - bo nie wiadomo bylo jak sie za to zabrac a internet wtedy jeszcze kulał :)
      Everything should be made as simple as
      possible, but no simpler
      1. Ja w Pascalu napisalem baze danych z interfejsem dla biblioteki... , Barts_706 25/11/06 10:51
        ...wypozyczenia, encje czlowiek-ksiazka, wszelkie mozliwe sercze i interfejs w znakowej semigrafice. Od tej pory oficjalnie nienawidze Pascala.
        
        No ale coz, pani od cwiczen na pierwszym roku nie znala innego jezyka. Na dobitke ja to zrobilem, oddalem, dostalem piec, a potem kolesie wszczeli bunt, ze za trudne, i wiekszosc nie musiala takich koshmarow potem robic. Argh, argh.
        
        A pisze to na dowod, ze w Pascalu tez sporo mozna.
        _______________________________
        
        http://jawnesny.pl
polecam na przyszłość , recydywista 22/11/06 23:46
http://www.algorytm.org/

i dobrze radzę, lepiej weź się za naukę, kup sobie Cormena "Wprowadzenie do algorytmów" i Wirtha "Algorytmy+struktury danych=programy" i czytaj, czytaj, czytaj
Computers are useless. They can only
give you
answers.
jak by ktos mogł mi pomoc na gg , borg18 23/11/06 00:05
podajcie numerek bo mam problem jeden lub napiszcie otorz chce aby program je sortował ale zeby prosił o wypisanie liczb przeze mnie a potem je posortował:
to dostałem od jednego z Was:)
program sortowanie;
uses crt;
const n=10;
var x,i,j,k,z : integer;
a : array[1..n] of integer;
begin
clrscr;
randomize;
for i:=1 to n do
a[i]:=random(100);

writeln('tablica przed sortowaniem ');
for i:=1 to n do
write(a[i],'; ');
readln;

for i:=1 to n-1 do
begin
k:=i;
for j:=i+1 to n do
if a[k]>a[j] then k:=j;
z:=a[i];
a[i]:=a[k];
a[k]:=z;
end;
writeln('tablica po sortowaniu ');
for i:=1 to n do
write(a[i],'; ');
readln;
end.

Trzeba pokasować te randomy i napisac poprzez writeln zeby podał libczy które chce posortować moze być konkretna liczba lub ile da, jak to zrobić? wiem ze to trzeba wstawić pod a[i]=... tylko jak zrobic zeby program zapamietał tam po kolei liczby a nie wszystko jako jedną....
pomożcie
https://programy.net.pl - duża dawka
programów ;)
1. rotfl , macol 23/11/06 00:24
  osmieszasz sie ;)
  
  Ja nie zamierzam pomoc Ci w zostaniu dyplomowanym "informatykiem" i proponuje innym zastanowic sie czy na prawde warto Ci w tym pamagac.
  
  Radze wziac sie porzadnie za nauke a nie za quake / coda czy inne gry, lub zmienic kierunek studiow.
  ja chce 100% jasne tpc
2. hmm , 0r8 23/11/06 02:16
  "otorz".
  
  ooo qwa, dawno nic mnie tak nie polozylo :D
3. na jakiej , celt 23/11/06 07:17
  uczelni studiujesz informatyke, jeśli można spytać?
  Everything should be made as simple as
  possible, but no simpler
4. hmm , bartek_mi 23/11/06 10:02
  zlituje sie
  
  readln
  dzisiaj jest jutrzejszym wczoraj
Akademii Pedagogicznej , RusH 23/11/06 08:24
bo ci co nic nie potrafia ide uczyc ...
I fix shit
http://raszpl.blogspot.com/
hmm nie rozumiem niektórych osób , Carmamir 23/11/06 12:46
co się go tak uczepiliście ?

Widziałem lamowate pytania osób które niby w bankach administrują po studiach i jakoś nikt nie pisał że informatykiem to on nie jest itp...

Jeśli nie umiecie odpowiedzieć na pytanie to przynajmniej nie obrażajcie kogoś.
No to się wkopałem...
1. hmm , macol 23/11/06 13:22
  dlaczego sie uczepilismy?
  1. on jest studentem i powinien sie tego nauczyc a nie dac komus do odwalenia robote
  2. poniewaz jest na 2 roku i do tego czasu powinien miec juz podstawowe pojecie o algorytmach i technikach programowania
  3. zadane pytania sa naprawde trywialne i obnazaja totalne brak wiedzy i checi poznania czegos przez pytajacego
  4. poniewaz nie chcemy aby pojawiali sie kolejni tacy "informatycy", o ktorych Ty juz wspomniales
  5. poniewaz z wiedzy tego "studenta informatyki" smial sie moj znajomy, ktory jest po filologii a komputery to tylko jego hobby :P
  6. robimy to dla jego dobra, bo po co ma sie meczyc teraz czy kiedys pozniej w pracy - pokazujemy mu, ze chyba pomylil sie przy wyborze drogi zycia
  
  A skad wiesz, ze nie potrafimy odpowiedziec na pytanie ? Dla mnie nie stanowi ono problemu, choc z pascalem mialem ostatni raz stycznosc ok 9 lat temu a ogolnie nie programuje juz od 4 lat. Jak juz napisalem wczesniej, nie chce odpowiedziec dlatego, ze chce aby on sie zabral do pracy lub sie zastanowil nad zmiana kierunku studiow.
  ja chce 100% jasne tpc
  1. Gosciu , borg18 23/11/06 16:46
    pascala miałem 3 lata temu więc sobie raduj też mogłem "zapomnieć" paru rzeczy bo tylko takie miałem - podstawowe. jak jesteś taki dobry to sie pochwal a nie krytykuj innych, widze że Ci sie nie chce" może nie umiesz już"? wydaje mi sie że wszyscy tu udają "co to ja nie jestem" a żaden nie pomoże, uważam sie za dobrego studenta a to że Pascala musze nadrobić to nie znaczy....zastanowcie się nad sobą albo jak coś Wam nie odpowiada to poprostu nie zaglądajcie na post i już
    https://programy.net.pl - duża dawka
    programów ;)
    1. hehe , macol 23/11/06 17:06
      "więc sobie raduj" raduje sie, a jakze ;)
      
      "moglem zapomniec paru rzeczy" ;) lol No to trzeba sobie przypomniec :P Bo wczytywanie znakow, zmienne, petle i tablice to sa podstawy, i to nie tylko w pascalu.
      
      a jak tam idzie z a[i] aby sie nie wpisywala ta sama liczba ?
      
      Dobra ja juz koncze bo z kazda wypowiedzia coraz bardziej sie pograzasz ;)
      ja chce 100% jasne tpc
    2. przypomnienie sobie skladni , kubazzz 23/11/06 17:27
      pascala to jest gora pol godziny, jesli miales amnezje powypadkowa.
      nooo chyba, ze ktos nie ma pojecia o konstruowaniu algorytmow, albo jest to jego pierwsze zetkniecie z masta-hacka-programming ;)))
      SM-S908
  2. nio myślę że nie każdy to wie , Carmamir 23/11/06 23:54
    który oburza się świętym gniewem na kogoś kto zadaje z pozoru łatwe dla niego pytanie ;)
    No to się wkopałem...
2. przejrzyj archiwum i posty pana borga , john565 23/11/06 14:01
  widac nie śledzisz wogule forum
  f*ck
  1. w ogóle , sakooL 23/11/06 14:50
    123
    1. no ale z pascalem to ja problemu nie mam , john565 23/11/06 17:15
      bynajmniej w tak błachym zagdanieniu
      f*ck
      1. błahym , Barts_706 25/11/06 10:52
        hehehe
        _______________________________
        
        http://jawnesny.pl
  2. może po prostu nie zwracałem uwagi , Carmamir 23/11/06 23:55
    poza tym nie mam czasu by siedzieć na TPC tyle czasu ile bym chciał... Korzystam z chwil lenistwa takich jak ta teraz ;)
    No to się wkopałem...
3. hmm nie rozumiem tych co się czepiają tych niektórych , Bart 23/11/06 16:31
  Mogę piętnować GŁUPOTĘ ? - mogę - to piętnuję.
  1. heh no to , Carmamir 23/11/06 23:57
    ja jeśli mogę to tępię tych co tępią :P Każdy musi mieć co tępić nieprawdaż ?
    
    Jako że nie potrafię napisać w 1min tego programiku, nie zgadzam się z tępiącymi borga to przynajmniej pomyślałem potępie tych co tępią bym miał swoje miejsce w tym poście :->
    No to się wkopałem...
masz i nie płacz dzieciaku , psikoota 23/11/06 18:41
program sortowanie;
const zakres = 99;
var
Liczby:array [1..zakres] of integer;
i,j,k,n:integer;

procedure czytaj;
begin
writeln('Program sortuje dane metoda bembenkowa');
write('Podaj ilosc liczb: '); read(n);
for i:=1 to n do
begin
write('Liczba ',i,' = '); read (Liczby[i]);
end;
end;

procedure pisz;
begin
writeln('Oto posegregowane lole:');
for i:=1 to n do
begin
write(liczby[i],' ');
end;
readln
end;

begin
czytaj;
for i:=2 to n do
for j:=n downto i do
begin
if Liczby[j-1] > Liczby[j] then
begin
k:=liczby[j-1];
Liczby[j-1]:=Liczby[j];
Liczby[j]:=k;
end;
end;
pisz;
readln
end.
Nie dla debili i troli.
1. na szczęscie jakos , borg18 23/11/06 19:32
  sam do tego doszedłem bo miałem to na dzisiaj ale dzieki staruszku:P
  https://programy.net.pl - duża dawka
  programów ;)