Question

Дан массив, содержащий 2019 положительных целых чисел, элементы которого не превышают 30 000. Необходимо найти наименьший элемент массива, кратный 4. После этого заменить все элементы, кратные 4, на найденное значение и вывести изменённый массив по одному элементу в строке. Например, для исходного массива из 5 элементов `112 4 27 95 148` программа должна вывести: ``` 4 4 27 95 4 ``` Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из описанных. | Паскаль | Python | | --- | --- | | `const N=2019;`
`var a: array [1..N] of longint;`
`i, k, m: longint;`
`begin`
` for i:=1 to N do readln(a[i]);`
` …`
`end.` | `a = []`
`n = 2019`
`for i in range(0, n):`
` a.append(int(input()))`
`…` | | Алгоритмический язык | C++ | | --- | --- | | `алг нач`
` цел N=2019`
` целтаб a[1:N]`
` цел i, k, m`
` нц для i от 1 до N`
` ввод a[i]`
` кц`
` …`
`кон` | `#include `
`using namespace std;`
`const int N=2019;`
`int main(){`
` int a[N];`
` int i, k;`
` for (i=0; i> a[i];`
` …`
` return 0;`
`}` | В качестве ответа приведите фрагмент программы, который должен находиться на месте многоточия.

Accepted Answer

Фрагмент программы (см. решение выше для каждого языка)

Answer

Идея решения: в первом проходе найти минимальный элемент, кратный 4, затем во втором проходе заменить все кратные 4 элементы на найденное значение и вывести результат.

**Решение на Паскале:**

```pascal
k := 30001;
for i := 1 to N do
begin
  if (a[i] mod 4 = 0) and (a[i] < k) then
    k := a[i];
end;
for i := 1 to N do
begin
  if (a[i] mod 4 = 0) then
    a[i] := k;
  writeln(a[i])
end;
```

**Решение на Python:**

```python
k = 30001
for i in range(0, n):
  if a[i] % 4 == 0 and a[i] < k:
    k = a[i]
for i in range(0, n):
  if a[i] % 4 == 0:
    a[i] = k
  print(a[i])
```

**Решение на алгоритмическом языке:**

```algo
k := 30001
нц для i от 1 до N
  если mod(a[i], 4) = 0 и a[i] < k то
    k := a[i]
  кц
нц для i от 1 до N
  если mod(a[i], 4) = 0 то
    a[i] := k
  кц
  вывод a[i]
кц
```

**Решение на C++:**

```cpp
k = 30001;
for (i = 0; i < N; ++i) {
  if (a[i] % 4 == 0 && a[i] < k)
    k = a[i];
}
for (i = 0; i < N; ++i) {
  if (a[i] % 4 == 0)
    a[i] = k;
  cout << a[i] << endl;
}
```

Задание №25ПрограммированиеЕГЭ по информатике