Question

For k:=1 to n doНапишите программу, которая в последовательности натуральных чисел определяет максимальное четное число. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется чётное число. Количество чисел не превышает 1000. Введенные числа не превышают 30000. Программа должна вывести одно число - максимально чётное число.

Answer 1

Program p12;
type tab=array[1..1000] of 1..30000;
var t:tab;
i,max,n:integer;
begin
readln(n);
for i:=1 to n do
readln(t[i]);
for i:=1 to n do
if(t[i] mod 2=0) and (t[i]>max) then max:=t[i];
write(max);
end.

Answer 2

Для решения данной задачи можно использовать следующий алгоритм:

1. Вводим переменную max_even и инициализируем ее нулем. Эта переменная будет хранить максимальное четное число из последовательности.

2. Вводим переменную n и считываем количество чисел в последовательности.

3. Запускаем цикл от 1 до n (включительно), где переменная k будет принимать значения от 1 до n.

4. Внутри цикла считываем число num.

5. Проверяем, является ли число четным и больше текущего значения max_even. Если условие выполняется, то присваиваем переменной max_even значение num.

6. После окончания цикла выводим значение переменной max_even.

Ниже приведена программа на языке Python, реализующая описанный алгоритм:

# Ввод количества чисел в последовательности
n = int(input())

# Инициализация переменной max_even
max_even = 0

# Цикл для считывания чисел и поиска максимального четного числа
for k in range(1, n+1):
    # Ввод числа
    num = int(input())
    
    # Проверка на четность и больше ли оно текущего max_even
    if num % 2 == 0 and num > max_even:
        max_even = num

# Вывод максимального четного числа
print(max_even)

Программа считывает количество чисел в последовательности, а затем считывает сами числа. После этого программа выводит максимальное четное число из последовательности.