Вводится последовательность из N положительных целых чисел. Найти
наименьшее число среди чётных элементов последовательности.

А := Массив случайных чисел(их количество = N)Б := A[0]цикл i (от 1 до N):  если остаток от деления A[i] на 2 (вроде - mod в паскале) = 0 то:    если A[i]< Б то:      Б := A[i]Вывод(Б)