Вычислить сумму тех элементов массива A(10) числовые значения которых принадлежат...

Question

Вычислить сумму тех элементов массива A(10) числовые значения которых принадлежат полуинтервалу i<=A[10]<=i+1

Answer 1

Program a1;
var i, S : integer;
a array [1....10] of integer;
begin
for i:=1 to do 5;
i<=A[10]<=i+1;<br />writeln('a[i]=, ');
for i:=1 to 5 do if i<0 then S:=S+ a[i] writeln(S) end