Question

Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 4. Программа получает на вход количество чисел в последовательностич а затем сами числа. В последовательности всегда имеется число, кратное 4. Количество не превышает 1000. Введенные числа не превышают 30000. Программа должна вывести одно число - максимальное число и кратное 4. Входные данные:3, 8, 16, 11Выходные данные:16.​Паскаль

Answer 1

заводим переменную, которая будет отвечать за максимум, пусть это будет ans, изначально присвоим ей максимально маленькое значение, пусть -1000000000

затем запускаем цикл, который исполнится N(кол-во элементов посл-ти) раз

На каждой итерации вводим текущее число K(элемент посл-ти)

Если k % 4 == 0 (если остаток от деления k на 4 равен нулю), то ans = max(ans,k) (в ans записываем максимум из ans и текущего числа)

Выводим ans

Answer 2

Ответ:не знаю точно попробуй это:

var i,n,k,m:integer; begin write('n: '); readln(n); m:=0; writeln('Введите ',n,' чисел'); for i:=1 to n do begin read(k); if k mod 4=0 then inc(m) end; writeln(m); readln; readln end.

Answer 3

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

pascalCopy code
program MaxMultipleOf4;

var
  n, num, maxMultipleOf4: integer;

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

  // Инициализируем переменную для хранения максимального числа, кратного 4
  maxMultipleOf4 := 0;

  // Считываем числа и ищем максимальное число, кратное 4
  for var i := 1 to n do
  begin
    readln(num);
    if (num mod 4 = 0) and (num > maxMultipleOf4) then
      maxMultipleOf4 := num;
  end;

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

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