Ревью кода - 9 На обработку поступает последовательность из 4 целых чисел. Известно, что вводимые числа по абсолютной величине не превышают 10^610
6
. Нужно написать программу, которая выводит на экран количество нечётных чисел в исходной последовательности и максимальное нечётное число. Если нечётных чисел нет, требуется на экран вывести «NO». Программист торопился и написал программу неправильно.

Найдите все ошибки в этой программе (их может быть одна или несколько). Известно, что каждая ошибка затрагивает только одну строку и может быть исправлена без изменения других строк.

Примечание. Обратите внимание, что требуется найти ошибки в имеющейся программе, а не написать свою, возможно, использующую другой алгоритм решения.
n = 4
count = 0
maximum = 999
for i in range(1, n + 1):
x = int(input())
if x % 2 != 0:
count += 1
if x > maximum:
maximum = i
break
if count > 0:
print(count)
print(maximum)
else:
print('NO')

По горизонтали
3. Знак, вместе с его смыслом
4. Вид логической операции
6. Конечный набор, отличных друг от друга знаков, используемых для кодирования
8. Язык программирования
9. Микросхема, которая обрабатывает информацию и управляет всеми устроуствами пк
12. Смена формы представления данных, выражения одного типа, через данные другого типа
14. Устройство для чтения и записи дисков
17. Устройство для вывода информации на бумагу или пленку.
По вертикали
1. Многоканальная линия связи, доступ к которой имеют несколько устройств 
2. Описание операции 
4. Программировнное электронное устройство для обработки числовых и символьных данных 
5. Группа файлов и папок, объединенных по какому-либо принципу 
7. Электронная схема, управляющая внешним устройством 
10. Число бит, который процессор обрабатывает за 1 операцию 
11. Устройство ввода 
12. Устройство ввода 
13. Устройство для связи двух компьтеров, с телефонной линии 
15. Составляющая часть информации 
16. Разъемы подключения внешних устройств 

var

 A: array [1..15] of Integer;

 i, Amin, Ai: Integer;

begin

 WriteLn ('Массив:');

 Randomize;

 for i := Low (A) to High (A) do begin

   A [i] := Random (100);          // заполнение массива случайными значениями

   Write (A [i], ' ');             // вывод для просмотра

 end;

 Amin := A [Low (A)];              // минимальное значение возьмем из первого элемента массива

 Ai := Low (A);                    // индекс минимального значения = 1

 for i := Low (A) + 1 to High (A) do begin  // цикл со второго элемента массива до последнего

   if A [i] < Amin then begin               // если найден элемент меньше минимального

     Amin := A [i];                         // изменяем его значение

     Ai := i;                               // и сохраняем номер

   end;

 end;

 Writeln;

 Writeln ('Минимальный элемент № ', Ai, ' равный ', A [Ai]);  // выводим минимальный элемент на просмотр

 A [Ai] := A [Low (A)] + A [High (A)];                        // изменяем на сумму первого и последнего

 Writeln ('Заменен на значение = ', A [Ai]);                  // и его новое значение на просмотр

end.