Такую надо состовлять самому!А вот простой алгоритм для аких случаев по этой проге вроде-
program jfe3;
const n=10; {Это будет кол-во элементов массива}
var a:array [1..n] of integer; i,s:integer;
begin
for i:=1 to n do begin
a[i]:=random(100); {элемент выбирается случайно от 0 до 100}
s:=s+a[i]; {Когда эл. присвоился, его значение плюсуется к общ сумме}
end;
for i:=1 to n do
writeln(a[i],' '); {показать сам массив}
writeln(s); {показать сумму}
readln; {чтобы окно сразу не закрывалось} END.
1)1. Анализ задачи, поиск решения, выбор/разработка оптимального алгоритма
2. Составление/анализ выходных выходных данных для алгоритма
3. Составление/анализ данных для промежуточных вычислений
4. реализация алгоритма на языке программирования
5. тестирование программного кода и сопоставление выходных результатов с поставленой задачей
2) описание задачи математическим языком, в виде формул, зависимостей, закономерностей, последовательностей, понятий
3) поэтапная покомпонентая построчная проверка программного кода с целью осознания того что код работает
так как задумано. Тест это операция над объектом, программой, позволяющая проверить правильность работы