двумерные массивы Опции

[pre-dawn-haze]

Составить схему алгоритма и программу определения суммы всех четных чисел массива К={kj}, j=1,m, m - число элементов в массиве К (m≤60). Вывести на экран найденное значение суммы, а также все четные числа и их адреса.


не пойму как задать массив
как ограничить
m - число всех элементов?

[Lapp]

не пойму как задать массив
как ограничить
m - число всех элементов?

Это неравенство, m<=60, просто говорит о том, какой величины массив тебе нужно заводить. Гарантируется, что входные данные (если массив будет вводиться с клавы или из файла) никогда не превысят 60 чисел.

const
  m= 60;

var
  a: array[1..60] of integer;
  i,s: integer;

begin
  write('enter total number of elements: ');
  readln(n);
  for i:=1 to n do a[i]:= Random(100);
  s:= 0;
  for i:=1 to n do
    if not Odd(a[i]) then begin
      s:= s+a[i];
      writeln('a = ',a[i],'  at  i = ',i);
    end;
  end;
  writeln('sum of even elements is ',s);
  readln
end.

Тут я использовал заполнение массива случайными числами.