Запишите без пробелов команду, которая пропущена в данном алгоритме сортировки массива по убыванию методом пузырька.
p:=false;
while p=false do
begin
...
for i:=1 to n-1 do
if a

<a
then begin
p:=a;
a:=a;
a:=p;
end;
end;