Page 23 - пособие_merged_Neat

Поиск максимального (минимального) среди всех элементов массива,
удовлетворяющих некоторому условию

Фактически, эта задача является объединением двух предыдущих, но с одним
«подвохом».

Допустим, нужно найти наибольшее среди всех четных чисел, входящих в массив
произвольных натуральных чисел.

Мы знаем, что условие «четности» на языке Паскаль можно записать так: x mod 2=0.
Значит, найти все четные элементы массива мы сможем. Но как среди них найти
наибольший?

Прием, которым мы воспользовались в задаче 5, здесь может привести к ошибке.
Например, на первом месте в массиве будет стоять НЕЧЕТНОЕ число, которое окажется
больше всех четных. Здесь переменной max лучше присвоить начальное значение,
заведомо меньшее всех элементов массива. Например, если наш массив составлен из
натуральных чисел, то присвоить max значение -2. Если после окончания программы
значение max останется таким же, это будет означать, что в массиве нет четных чисел.
Если же они будут, max изменит значение.

22