Question

Напишите программу, которая в последовательности натуральных чисел определяет максимальное однозначное число. Кроме того, если есть число 19, то выводит «Yes», если его нет, то выводит «No». Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0. (0-признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 10 000

Answer 1

Возможное решение:

var n,i,a,min: integer;

begin 

 readln(n);

 min:=30001

 for i:=1 to n do

    begin

      readln(a)

      if (a mod 10 = 4) and (a < min)

           then min:= a;

    end;

 writeln(min)

end.

Answer 2

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

pythonCopy code
max_one_digit = -1  # Максимальное однозначное число
has_19 = False  # Флаг для определения наличия числа 19 в последовательности

while True:
    num = int(input("Введите натуральное число (0 для завершения): "))
    
    if num == 0:
        break  # Прерываем ввод, если введено 0
    
    if 1 <= num <= 9:  # Проверяем, является ли число однозначным
        if num > max_one_digit:
            max_one_digit = num  # Обновляем максимальное однозначное число
    
    if num == 19:
        has_19 = True

if max_one_digit != -1:
    print(f"Максимальное однозначное число: {max_one_digit}")
else:
    print("В последовательности нет однозначных чисел")

if has_19:
    print("Yes")
else:
    print("No")

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

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

После завершения ввода программа выводит максимальное однозначное число (если оно было) и определяет, есть ли число 19 в последовательности.