стереть
Класс
8 9 10 11
Нужно авторизоваться
Нужно авторизоваться
Нужно авторизоваться
Нет аккаунта?
При наличии аккаунта на платформе можно
Введите больше 6 символов
Проблемы со входом?
Введи последние 4 цифры номера, с которого
поступит звонок. Трубку брать не нужно.
Повторный звонок через
сек.
Добро пожаловать!
Зарегистрируйся и получи Демо мастер-группы на 10 дней по любимым предметам бесплатно.
Добро пожаловать!
Как тебя зовут?
Введите не меньше 2 символов
Привяжем номер телефона
Введите не меньше 2 символов
Привяжем номер телефона
Повторный звонок через
30 сек.
Теперь нужно подтвердить номер - введи последние 4 цифры номера, с которого поступит звонок. Трубку брать не нужно
Введите не меньше 2 символов
Придумаем пароль
Почти закончили! Теперь нужно создать надежный пароль
Введите не меньше 2 символов
Немного о тебе
В какой класс ты переходишь?
Укажи, какие предметы будешь или хочешь сдавать
Введите не меньше 2 символов
На почту 12345@mail.ru отправлена ссылка для сброса пароля.
OK
Информатика

Задача по теме: "Программирование Последовательность чисел"

Информатика
Задание 15 Программирование Последовательность чисел
Подсказка
За подсказку ты получишь лишь половину баллов
Использовать
Автор
Крылов С.С., Чуркина Т.Е. Информатика основной государственный экзамен. Москва: Издательство "Национальное образование", 2023. — 144 с. Материалы публикуются в учебных целях
Просмотры
989
banner-img

Напишите программу, которая для последовательности натуральных чисел определяет порядковый номер первого четного члена последовательности. Нумерация членов в последовательности начинается с единицы. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется четное число.

Количество чисел не превышает 1000. Введённые числа не превышают 30 000.

Программа должна вывести одно число: порядковый номер первого четного члена последовательности.

Пример работы программы:

Входные данные Выходные данные

5

101

9

7

18

14

4
Решение

Решение:

Для решения задания напишем программу на языке Pascal, которая будет проверять введенные значения на правильность условия:

var n, k, a: integer;
f: boolean;
begin
  readln(n);
  f:=true;
  k:=0;
  while (f) and (k < n) do
  begin
    readln(a);
    if (a mod 2 = 0) then f:= false;
    k:= k+1;
  end;
  writeln(k)
end.


На экзамене это задание принесло бы тебе 2/2 баллов.

Сообщение об ошибке

Расскажите, в каком месте допущена ошибка, мы как можно быстрее её исправим. Спасибо за обратную связь!

Здравствуйте!

Выберите информацию о себе ниже

pay-success-img

Оплата прошла успешно!

pay-un-success-img

Оплата не прошла

Попробуйте снова