Question

Помогите пожалуйста с информатикой!

Массив задан следующим образом:
Const N=10;
Var m : array[1..N] of integer;
Найти значение максимального элемента и поместить его в переменную max.

Answer 1

Ответ:

var max: integer;

max := m[1];

foreach i: integer in m do

     if (max < i) then max := i;

Пример: