Question

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

Answer 1

Ответ:

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

var

  a: array [1..20] of integer; // Создаём массив из 20 элементов

  max: integer; // и переменную для хранения максимального значения

begin  

 for var i := 1 to 20 do      

 begin

     a[i] := random(0, 200); // Заполняем натуральными числами

     write(a[i] + '  ');     // Выводим на экран для проверки программы

 end;

 foreach i: integer in a do // Проходим по элементам массива

    if (i.ToString().Length = 2) and (i mod 2 = 0) then // Если 2хзн и чёт,то

         if (max < i) then max := i;  // Если макс меньше, то макс=новый

 

 writeln('максимальное четное двузначное число: ' + max);

end.

Answer 2

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

Вот условие для работы программы:

1. Программа работает с последовательностью натуральных чисел.
2. В последовательности есть хотя бы одно четное двузначное число.

И вот программа на Python, которая выполняет описанную задачу:

pythonCopy code
# Инициализация переменной для хранения максимального четного двузначного числа
max_even_two_digit = -1

# Ввод последовательности чисел (пользователь вводит числа по одному, пока не введет 0)
while True:
    num = int(input("Введите число (или 0 для завершения): "))
    
    if num == 0:
        break
    
    # Проверка на четность и двузначность
    if num % 2 == 0 and 10 <= num < 100:
        if num > max_even_two_digit:
            max_even_two_digit = num

# Вывод результата
if max_even_two_digit != -1:
    print("Максимальное четное двузначное число:", max_even_two_digit)
else:
    print("В последовательности нет четных двузначных чисел.")

Эта программа будет принимать числа от пользователя до тех пор, пока не будет введено число 0. После ввода программы, она определит и выведет наибольшее четное двузначное число из введенных чисел.