Паскаль. формирование массива длиной n элементов, зполняя его с клавиатуры, подсчет и вывод на экран количества символов из диапозона от а до я (кириллица вас -

Нашел 2 ошибки в 4- строке и 7- строке, объясняю на примере а=15, b=26
как я понял по данным задачи К больше или равно А то есть начальное значение S = A, вторую ошибку можно решить просто поменяв местами операторы 7-ой и 8-ой строки(чтобы сначала программа суммировала S=15+15 а потом уже 30+16,46+18...пока S<B а в задаче делается так 16+1,16+17, 30+18,...) в общем:
var a, b, s, k: integer;begin
read(a,b);
s := a;<
k := a;
while s < b do begins := s+k;<k := k+1;<end;writeln(k)end. 

если
a=15 b=36
ответ будет :15

С#:
        private static void Main()        {            int[] array = {2,2,2,3,4,4,6,6,6,6};
            for (var i = 0; i < array.Length; i++)                Console.Write($"{array[i]} ");            Console.WriteLine();
            var counter = 0;            for (var i = 0; i < array.Length - 1; i+=2)                if (array[i] % 2 == 0 && array[i + 1] % 2 == 0)                    counter++;
            Console.WriteLine($"Количество четных пар чисел в массиве: {counter}");        }