Задать вопрос
10 февраля, 08:19

Напишите программу в PaskalABC, которая в последовательности натуральных чисел определяет максимальное чётное число.

Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется чётное число. Количество чисел не превышает 1000. Введённые числа не превышают 30000. Программа должна вывести одно число-максимальное чётное число.

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

Входные данные: 3,10,99,42

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

+4
Ответы (1)
  1. 10 февраля, 08:34
    0
    Var

    N, A, M:word;

    Begin

    Read (N) ;

    M:=0;

    For N:=1 to N do

    Begin

    Read (A) ;

    if (A>M) and (A mod 2 = 0) then M:=A;

    End;

    Write (M)

    End.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Напишите программу в PaskalABC, которая в последовательности натуральных чисел определяет максимальное чётное число. Программа получает на ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы