Given an array. Determine the number of elements greater than the sum of all elements in the array and print their numbers.

program zz1;
const n = 10; // set the number of elements in the array
var i, k, s: integer; // set variables of integer type
m: array [1..n] of integer;
begin
for i: = 1 to n do // get n random numbers and write them into an array
m [i]: = random (256);
for i: = 1 to n do // display the resulting array on the screen
write (m [i], ”);
writeln; // go to a new line to display the response
for i: = 1 to n do
s: = s + m [i];
for i: = 1 to n do
if m [i]> s then begin k: = k + 1; write (i, ”); end;
if k = 0 then write (‘there are no such elements’) else write (‘number of found elements =’, k);
end.