jak powinien wygladać program porządkujący w kolejności od najmniejszej cztery dowolne liczby?

2007-01-02 22:31:29, Łukasz
UWAGA: Pytanie nie zostało jeszcze sprawdzone przez administratora..!

2007-01-03 19:10:07, username
for i:=1 to 4 do
begin
if tab[i]<tab[i+1] then
begin
x:=tab[i];
tab[i]:=tab[i+1];
tab[i+1]:=x
end;
end;

2007-01-04 13:47:59,
UWAGA: Odpowiedź nie została jeszcze sprawdzona przez administratora..!
a co jeszcze przed tym powinno być? bo nie kapuje tego pascala. a "tab" rozpoznaje jako bląd, nie wiem czemu.

2007-01-07 12:42:57, username
UWAGA: Odpowiedź nie została jeszcze sprawdzona przez administratora..!
progra m4_sor;
var tab:array [1..4] of integer; {tab to tablica ;p, nie zdeklarowales jej, dlatego wywalilo error}
x:integer;
i:boolean;
begin
for i:=1 to 4 do
begin
readln(tab[i]); {wczytujemy wartosci do tablicy}
end;

[i tu program, ktory wczesniej podawalem]

end.

{-------------opis----------------------}
Petla sprawdza czy liczba przypisana 'tab[i]' (i sie zmienia w petli) jest wieksza o 'i' (tj. nastepnej tablicy) jezeli tak jest, nie dzieje sie nic, jezeli natomiast jest mniejsza to zamieniaja sie miejscami...

Udziel odpowiedzi na powyższe pytanie...

::: działy ::::