Пример программы на Pascal:

program RandomArray;
var
n: array$$\mathrm{1..6}$$ of integer;
i, sum: integer;
begin
Randomize;
// Заполняем массив случайными числами от -5 до 8
for i := 1 to 6 do
begin
n$$i$$ := Random$14$ - 5; // генерируем число от 0 до 13 и вычитаем 5
end;
// Выводим первоначальный массив на экран
writeln${}^{\prime }Первоначальныймассив{:}^{\prime }$;
for i := 1 to 6 do
begin
write(n[i], ' ');
end;
writeln;
// Сортировка массива по возрастанию
for i := 1 to 5 do
begin
for j := 1 to 6-i do
begin
if n$$j$$ > n$$j+1$$ then
begin
n$$j$$ := n$$j$$ + n$$j+1$$;
n$$j+1$$ := n$$j$$ - n$$j+1$$;
n$$j$$ := n$$j$$ - n$$j+1$$;
end;
end;
end;
// Выводим отсортированный массив на экран
writeln${}^{\prime }Отсортированныймассив{:}^{\prime }$;
for i := 1 to 6 do
begin
write(n[i], ' ');
end;
writeln;
// Считаем сумму элементов массива
sum := 0;
for i := 1 to 6 do
begin
sum := sum + n$$i$$;
end;
writeln${}^{\prime }Суммаэлементовмассива{:}^{\prime },sum$;
end.

Программа сначала заполняет массив n случайными числами от -5 до 8, затем выводит его на экран, сортирует массив по возрастанию, выводит отсортированный массив и вычисляет сумму элементов массива.