Вопрос Помогите написать программу в паскале, пожалуйста, очень нужно

[qq1]

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

 

[dvj_snake]

Гдеж тебя учат Я паскаль учил лет 25 назад Он никому уже не нужен

 

[ZJLoNIX]

Помочь написать или написать за вас? Ну раз в вопросе вы просите помощи, тогда помогаю. Для того чтобы считывать вводимые данные используйте - Readln (chislo); Создаете цикл while (counter8<2) в котором 1. Сравниваете число с 8, и если да увеличиваете "счетчик восьмерок" - counter8 на единицу. 2. Берете остаток от деления на 2 и если он равен нулю значит четное число, увеличиваем количество на 1 if chislo mod 2=0 then inc(kolvo) 3. Выводите kolvo