Дан одномерный массив целых чисел. заменить все четные числа в массиве 0.

Const   n = 20; var   x: array[1..n] of integer;   i: integer; begin   randomize;   writeln('*** исходный массив ***');   for i : = 1 to n do   begin       x[i] : = random(101) - 50;       write(x[i]: 4);   end;   writeln;   writeln('*** результирующий массив ***');   for i : = 1 to n do   begin       if (x[i] mod 2) = 0 then x[i] : = 0;       write(x[i]: 4);   end; end. тестовое решение: *** исходный массив ***   -4  -8  42  18  -4 -19 -35  21  19  32 -45  45 -43 -22 -17 -12  11    9 -47  37 *** результирующий массив ***     0    0    0    0    0 -19 -35  21  19    0 -45  45 -43    0 -17    0  11    9 -47  37

Не могу посмотреть фотограффию

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

2)Сплошная тонкая√√√√√√√√√√√√√√√