1). Дан массив из n элементов (n >= 4). Подсчитать среднюю арифметическую второго и предпоследнего элемента массива. 2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.

Var a:array[1..50000] of integer;
n,i,p:integer;
sr:real;
begin
readln(n);
p:=1;
for i:=1 to n do begin
read(a[i]);
p*=a[i];
end;
sr:=(a[2]+a[n-1])/2;
writeln(Среднее ар. - ,sr:2:1, произведение - ,p);
end.