program n_3_1
var s,i: integer
a:array[1..10] of
integer;
begin
s:=0
randomize
for i:=1 to 10 do
begin
a[i]:=random(100)
write (a[i],' '),
s:=s+a[i]
end
writeln('s=',s)
end


вопросы
1 определить имя масива
2узнать тип элементов массива
3 какой переменной обозначены индексы элементов массива
4кол-во элементов в даннома масиве
5как обозначается текущий элемент масива
6есть ли отрицательные элементы в данном массиве
СРОЧНО ПОМОГИТЕ ПРОШУ ДАМ 29 БАЛОВ !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

1 определить имя массива - a2 узнать тип элементов массива - integer (целый)3 какой переменной обозначены индексы элементов массива - i4 кол-во элементов в данном массиве - 105 как обозначается текущий элемент массива - a[i]6 есть ли отрицательные элементы в данном массиве - нет (элементы массива - это числа из диапазона [0,99]