1) Дан массив целых чисел. Подсчитать сумму элементов с четными индексами.

2)Дан одномерный массив,состоящий из 20 элементов. Подсчитать количество элементов,превышающих по значению его среднее арифметическое.

Какие-то ошметки кода...

Это готовый алгоритм, который под все языки. Неужели сами не объявят класс и функцию, не подключат библиотеки?

1) int score = 0;for(int i = 0; i< arr.length(); i++){if ( arr[i] % 2 == 0){ score += arr[i];}2)int score = 0;for(int i = 0; i < 20; i++){score += arr[i];};score /= 20;int all = 0;for( int i = 0; i < 20; i++){if (score < arr[i]){all++};

// PascalABC.NET 3.2, сборка 1334 от 12.11.2016begin  var a:=ArrRandom(ReadInteger('n='),1,50);  Write('Элементы: '); a.Println;  if a.Length>1 then     Writeln('Сумма элементов с четными индексами равна ',a[1::2].Sum)  else    Writeln('В массиве нет элементов с четным индексом')end.Примерn= 13Элементы: 37 37 34 46 32 22 16 48 17 25 5 44 16Сумма элементов с четными индексами равна 222// PascalABC.NET 3.2, сборка 1334 от 12.11.2016begin  var a:=ArrRandom(20,1,50);  Write('Элементы: '); a.Println;  var m:=a.Average;  Writeln('Количество элементов, превышающих ср.арифм, равно ',    a.Where(x->x>m).Count)end.ПримерЭлементы: 9 6 14 2 17 31 18 41 20 2 32 16 44 5 30 29 7 5 32 1Количество элементов, превышающих ср.арифм, равно 8