Подготовка к ЕГЭ и олимпиадам по информатике 2020 / Тренировочные варианты ЕГЭ

Вариант № EGE_INF_1801

Добавлен 13 октября 2017 г. в 1:51. Изменён 15 июня 2018 г. в 1:20.

1 2 3^Р 4 5 6 7 8 9 10 11^Р 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

Задание

Дан массив, содержащий 2018 целых чисел. Необходимо определить количество элементов этого массива, для которых истинно логическое выражение \(\left(A[i]\neq10\right)\rightarrow\left(3\cdot A[i]\geq9\right)\). Например, в массиве из 4-х элементов, равных соответственно 3; –2; 10; 0, имеется два числа — 3 и 10, для которых вышеуказанное логическое выражение истинно.

Исходные данные объявлены так, как показано ниже. Запрещается использовать не описанные переменные, но допускается не использовать некоторые из них.

Pascal

Копировать

const
  N = 2018;
var
  a : array [0 .. N - 1] of integer;
  i, m : integer;
begin
  for i := 0 to N - 1 do
    readln(a[i]);
  ...
end.

C++

Копировать

#include <iostream>
#define N 2018

int main() {
  int a[N], i, m;
  for (i = 0; i < N; i++)
    std::cin >> a[i];
  ...
  return 0;
}

Basic

Копировать

CONST N = 2018
DIM A(N - 1) AS INTEGER
DIM I, M AS INTEGER
FOR I = 0 TO N - 1
  INPUT A(I)
NEXT I
...
END

Python

Копировать

# допускается также использо-
# вание целочисленной
# переменной m
N = 2018
a = []
for i in range(N) :
  a.append(int(input()))
...

В качестве ответа необходимо привести фрагмент программы, который должен находиться на месте многоточия. Допускается решение на другом языке программирования. В этом случае укажите название языка и используемую версию. При этом необходимо использовать те же самые исходные данные и переменные, какие были предложены в условии.