Question

Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, оканчивающееся на 4. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 4. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число — минимальное число, оканчивающееся на 4. На паскале, уровень 9 класса школы.

Answer 1

Я точно не знаю,но наверное правильно

Answer 2

Конечно, вот пример программы на языке Pascal, которая решает данную задачу:

pascalCopy code
program MinNumberEndingWith4;

var
  n, i, num, minNumEndingWith4: integer;

begin
  // Вводим количество чисел в последовательности
  readln(n);

  // Инициализируем минимальное число оканчивающееся на 4 большим значением
  minNumEndingWith4 := 30001;

  // Читаем числа и ищем минимальное число, оканчивающееся на 4
  for i := 1 to n do
  begin
    readln(num);
    if (num mod 10 = 4) and (num < minNumEndingWith4) then
      minNumEndingWith4 := num;
  end;

  // Выводим результат
  writeln(minNumEndingWith4);
end.

Программа сначала вводит количество чисел в последовательности. Затем она считывает числа по одному и проверяет, оканчивается ли число на 4 и является ли оно минимальным среди тех, что оканчиваются на 4. После обработки всех чисел программа выводит минимальное число, оканчивающееся на 4.

Обратите внимание, что данная программа предоставляет только основу решения. В реальном задании для школы также может потребоваться обработка ошибок, добавление комментариев и т.д.