var a:array of longint;
i,c,x,n,k:longint;
begin
read(n); //длина массива
a:= new longint[n];
for i:=0 to n-1 do read(a[i]);
read(c);//некоторое число С
for i:=0 to n-1 do
if a[i]>c then
begin
k+=1;
x+=a[i]
end;
writeln(x/k);//ответ на первый пункт
k:=0;
x:=0;
for i:=0 to n-1 do
if i mod 2=0 then
begin
k+=1;
x+=a[i];
print(a[i])//второй пункт
end;
writeln;
write(x/k)// третий пункт
end.
А какие элементы то? Последовательность разной может быть. Например 1, 2, 3, 4, 5, 6 - тут сумма элементов с четными индексами четная. 6, 5, 4, 3, 2, 1 - тут нечетная
Число 15 > 0
Прямой код 15 : 0000 1111
Число - 8<0
Прямой код: 0000 1000
Обратный код: 1111 0111
Дополнительный: 1111 1000
15 = 0000 1111
-8 = 1111 1000
15+(-8) =0000 0 111 = 7(в 10с/с)