• Дана последовательность целых чисел, оканчивающаяся числом
    −1. Необходимо определить, присутствует ли в последовательности хотя бы одна пара одинаковых «соседних» чисел. Число
    −1 членом последовательности не является.

    Например:

    1
    2
    3
    4
    5
    -1
    NO

Ответы 2

  • Спасибо,но мне кажется нет)(надо на Python)
    • Автор:

      ernie0xqv
    • 5 лет назад
    • 0
  • var a1, a2: integer;    f: boolean;begin  f := false;  a1 := -1;  writeln('Введите члены последовательности, -1 для окончания ввода:');  repeat    write('? ');    readln(a2);    if a1 <> - 1 then f := f or (a1 = a2);    a1 := a2  until a2 = -1;  if f    then write('YES')    else write('NO');  readlnend.Так?
    • Автор:

      twig
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years