6+8=14 так как 6 кратно 2 и 8 кратно 2. нам нужна сумма этих чисел. сложили и получили 14
Program z1; const n = 15; Var a: array [1..n] of integer; i:integer; s:real;Begin for i:=1 to n do read(a[i]); for i:=1 to n do write (a[i],' '); s:=0; for i:=1 to n do s:=s+a[i]; s:=s/n; writeln; writeln('Сумма элементов = ',s);End.<span>
</span>
Надоело при копировании из блокнота вручную ставить пробелы. Бред.