Question

Дана не пустая последовательность чисел заканчивающаяся нулем. Найти максимум.

Answer 1

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 program cnt; var x,n,k:integer; begin n:=1;    {nomer elementa posledovatelnosti} k:=0;     {kolichestvo chetnyh elementov s nomerami,kratnym 5}writeln('введите число'); repeatbeginreadln(x); if(x mod2=0)and(n mod5=0)then inc(k); n:=n+1; end; until x=0; writeln('k=',k); readln; end.
За это 5 получил!

Answer 2

Для нахождения максимума в данной последовательности чисел, нужно последовательно сравнивать каждый элемент с текущим максимумом и обновлять максимум, если текущий элемент больше.

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

1. Инициализируем переменную `максимум` значением первого элемента последовательности. 2. Создаем цикл, который будет выполняться до тех пор, пока не встретится ноль. 3. Внутри цикла считываем очередной элемент последовательности. 4. Сравниваем считанное число с текущим максимумом. 5. Если считанное число больше текущего максимума, обновляем значение переменной `максимум`. 6. Переходим к следующему элементу последовательности. 7. Повторяем шаги 3-6 до тех пор, пока не встретится ноль. 8. Возвращаем значение переменной `максимум`.

Пример кода на языке Python:

sequence = [3, 5, 9, 2, 7, 0]  # Пример последовательности чисел

maximum = sequence[0]  # Инициализация максимума значением первого элемента

for num in sequence:
    if num == 0:
        break
    if num > maximum:
        maximum = num

print("Максимум:", maximum)

В данном примере последовательность чисел `[3, 5, 9, 2, 7, 0]` заканчивается нулем, и максимумом является число `9`.