ďťż

Ładny brzuch

Jak posegregować liczby od największej do najmniejszej mając 15 liczb w zmiennych liczba1, liczba2 itd??


A nie da się to jakoś posortować w kontrolce edycji , TListBox itp.?

wally

jesli juz jestes zmuszony posiadac 15 ruznych zmiennych ktore sa i tak tego samego typu to zrob tak
- stwurz tablice 15 elementowa
przypisz do niej wartosci tych twoich zmiennych
posortuj tablice - mam nadzieje ze to umiesz a jak nie to 4p jest to opisane
przypisz pokolei wartosci z tablicy do miennych np:
zmienna1:=tab[0] itd.

podkreslam ze nie jest to najlepszy sposob (nie najszybszy)


A nie da się to jakoś posortować w kontrolce edycji , TListBox itp.?

wally


MOżna też sprawdzać z if

np.

if liczba 1 > liczba2 then
if liczba 1 > liczba 3 then
......
else
jeśli tak dojdzie do końca to wimy że 1 to największe.

Ale to dUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUżó bardzo pisdania :lol:
Użytkownik Matpien3 edytował ten post 19 kwiecień 2005, 14:58
Moja rada:
ZAMIAST ZMIENNYCH UZYJ TABLICY

Uzyj tablicy - i sortowanie np. bubble sort
A co do ListBoxa - pomysl beznadziejny :(

sortowanie babelkowe
sortowanie przez wstawianie
Sortowanie przez wymianę/wybór
Sortowanie szybkie
Sortowanie stogowe
Sortowanie przez zliczanie

I tak Szymek już po konkursie... :P

I też ja mam pytanie jak sprawdzić ilo cyfrowa jest liczba ???
Użytkownik blazej_x edytował ten post 20 kwiecień 2005, 21:08
function JakaDluga(Liczba: Integer): Integer; begin  Result := Length(IntToStr(Liczba)); end;

tak jak bełdzio powiedział:


sortowanie babelkowe
sortowanie przez wstawianie
Sortowanie przez wymianę/wybór
Sortowanie szybkie
Sortowanie stogowe
Sortowanie przez zliczanie

ja polecam sortowanie bombelkowe gdyż jest najprostsze

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •