Anonymní profil Pasc – Programujte.com

Ahoj,berieme na informatike Bubble sort ,chápem ako funguje aj implementácií,kedy ide vonkajsi cyklus dlzkaPola-1 a zaroven aj vnutorny cyklus ide po dlzkaPola-1 .Teraz vsak mam implementaciu,kedy ide vnutorny cyklus iba po dlzkaPola-i kde i je riadaca premenna vonkajsieho cyklu.Z akého dovodu to fuguje aj takto,v čom spočíva ta logika? Ďakujem
 

program sa;
uses crt;
var pole:array [1..10] of integer;
    i,j:integer;
    temp:integer;

begin
clrscr;
randomize;
for i:=1 to 10 do pole[i]:=random(50);
writeln('Tvoje pole je ');
for i:=1 to 10 do write (pole[i],' ');


for i:=1 to 9 do begin
    for j:=1 to 10-i do begin
        if pole[j]<pole[j+1] then begin

              temp:=pole[j];
              pole[j]:=pole[j+1];
              pole[j+1]:=temp;
        end;
   end;
end;

writeln;
writeln('Zotriedene pole');
for i:=1 to 10 do write(pole[i],' ');


 readln;
 end.