Найдите ошибку, ибо выдает он всегда, что спортсмен не проходит, даже если сумма 100,а общее количество 60.! в массиве хранится информация о , полученных спортсменом-десятиборцем в каждом из десяти видов спорта. для выхода в следующий этап соревнований общая сумма должна превысить некоторое известное значение. определить вышел ли данный спортсмен в следующий этап соревнований. const m=10; var a: array[1..m] of byte; i, k: byte; s: integer; begin writeln('введите информацию о видов спорта'); for i: =1 to m do begin write(' ',i,'-й вид спорта: '); readln(a[i]); end; begin s: =0; s: =s+a[i]; write('введите общее количество по 10 спорта: '); readln(k); end; \ if s> k then writeln('спортсмен проходит в следующий тур') else writeln('спортсмен не проходит в следующий тур'); end.