Выбери верно записанную программу на языке программирования Паскаль. Программа для нахождения суммы элементов массива. (Количество элементов в массиве — 24 var i, s:integer; begin clrscr; for i:=1 to -8 do begin write('a[', i, ']='); read(a[i]); end; s:=0; for i:=1 to -8 do s:=s+a[i]; writeln('s=', s); readkey end. uses crt; var a:array[1..24] of integer; i, s:integer; begin clrscr; for i:=1 to 24 do begin write('a[', i, ']='); read(a[i]); end; s:=0; for i:=1 to 24 do s:=s+a[i]; writeln('s=', s); readkey end. uses crt; var a:array[1..-8] of integer; i, s:integer; begin clrscr; for i:=1 to -8 do begin write('a[', i, ']='); read(a[i]); end; s:=0; for i:=1 to -8 do s:=s+a[i]; writeln('s=', s); readkey end.