МНЕ С ИНФОРМАТИКОЙ!!

Вычислить сумму элементов массива, значения которых больше X.

Question

Информатика: МНЕ С ИНФОРМАТИКОЙ!! Вычислить сумму элементов массива, значения которых больше X.

Камила1э · Answer

var a:array[1..10] of integer;

x, i, s:integer;

begin

s:=0;

for i:=1 to 10 do a[i]:=random(100);

readln(x);

for i:= 1 to 10 do

if a[i] > x then s:= s + a[i];

write(s);

end.

Объяснение:

Как я понял размер массива условен.