Нужно объявить массив из 9 элементов как целочисленный . сложить первые три любые элементы массива . вывести значение суммы на экран . ( паскаль ! ) и каждую строчку обозначьте, то есть то что данная строчка обозначает .

Var 
A : array[1..9] of integer; // массив 9 элементов
summa, i : integer; // переменная для суммы
begin
for i:=1 to 9 do
A[i]:= random(100) // заполняем массив рандомными числами 
summa:= A[1] + A[2] + A[3] сложение трех элементов массива
writeln(summa); // вывод суммы
end.