помогите с паскалем. как работает компьютер в этой программе? метод пузырька, расположение по возрастанию
program z1;
var a:array[1..10] of integer;
i,j,k:integer;
begin
for i:=1 to 10 do begin a:=ramdom(20);
for j:=1 to 10 do
for i:=1 to 9 do
if a.a[i+1] then begin
k:=a;
a:=a[i+1];
a[i+1]:=k;
end;
for i:=1 to 10 do
write(a);
end.
не понятны конкретно эти строчки:
for j:=1 to 10 do
for i:=1 to 9 do
что такое j и почему i от 1 до 9