Question

На ввод подается N неотрицательных целых чисел. Программа находит количество чисел, оканчивающихся на 6 и минимальное число, кратное 2. Вывести "нет", если чисел, подходящих к условиям нет. По абсолютной величине числа менее 30000.

Answer 1

program krat2_kolokon6;

uses crt;

var

i,min,kol,n,x:integer;

begin

min:=30000;

kol:=0;

read(n);

for i:=1 to n do

begin

read(x);

if x mod 10 =6 then kol:=kol+1;

if (x<min) and(x mod 2=0) then min:=x;

end;

writeln;

if (min=30000)and(kol=0) then

write('Нет')

else

begin

writeln('Минимальный четный элемент=',min);

writeln('Количество чисел, оканчивающихся на 6=',kol);

end;

readln;

end.

Answer 2

Для решения данной задачи вам следует написать программу на выбранном вами языке программирования. Ниже приведен пример решения на языке Python:

pythonCopy code
def find_numbers(input_list):
    count_ending_with_6 = 0
    min_multiple_of_2 = float('inf')

    for num in input_list:
        if num % 10 == 6:
            count_ending_with_6 += 1
        if num % 2 == 0 and abs(num) < abs(min_multiple_of_2):
            min_multiple_of_2 = num

    if count_ending_with_6 == 0 or min_multiple_of_2 == float('inf'):
        return "нет"

    return count_ending_with_6, min_multiple_of_2

# Ввод чисел через пробел
input_numbers = list(map(int, input().split()))

# Проверка абсолютной величины чисел
for num in input_numbers:
    if abs(num) >= 30000:
        print("Число должно быть менее 30000 по абсолютной величине.")
        exit()

result = find_numbers(input_numbers)
if result == "нет":
    print("нет")
else:
    count_ending_with_6, min_multiple_of_2 = result
    print(count_ending_with_6)
    print(min_multiple_of_2)

Вы можете запустить этот код, и на ввод предоставить N неотрицательных целых чисел, разделенных пробелами. Программа выдаст количество чисел, оканчивающихся на 6, и минимальное число, кратное 2, удовлетворяющих условиям. Если таких чисел нет, программа выведет "нет".