Pascalabcнапишите программу,используя массив ,которая вычисляет сколько чисел превосходят 10 напишите программу, используя массив, которая вычисляет сумму чисел больше 14 значения для проверки 10,15,12,13,7,8,11,14,17,20

1. 
var A: array [1..10] of integer;
i, sum, k: integer;
begin
for i:=1 to 5 do
read(A[i]);
sum:=0;
k:=0;
for i:=1 to N div 2 do
sum:=sum+A[i];
k:=k+1;
writeln('Среднее арифметическое первой части=', sum/k);
sum:=0;
k:=0;
for i:=5 to 10 do
sum:=sum+A[i];
k:=k+1;
writeln('Среднее арифметическое второй части=', sum/k);
end.

2. const: N={количество элементов массива}; 
var A: array [1..N] of integer;
i, sum, k: integer;
begin
for i:=1 to N do
read(A[i]);
sum:=0;
k:=0;
for i:=1 to (N div 2) do
sum:=sum+A[i];
k:=k+1;
writeln('Среднее арифметическое первой части=', sum/k);
sum:=0;
k:=0;
for i:=(N div 2) to N do
sum:=sum+A[i];
k:=k+1;
writeln('Среднее арифметическое второй части=', sum/k);
end.
 

Задача на динамическое программирование. Советую почитать поподробнее на эту тему в интернете. Подобные задачи для изучения: платная лестница, кузнечик, последовательность Фибоначчи.
#include <iostream>
#include <cmath>
using namespace std;
int main()  {
   int n;   
   cin >> n;   
   int height[n];   
   for(int i=0; i<n; i++)       
      cin >> height[i];    
   int energy[n];   
   for(int i=1; i<n; i++)
   energy[i] = energy[i-1] + abs(height[i]-height[i-1]);
   cout << height[n-1];
   return 0;
}