Дана последовательность из n (2< =n< =100000) различных чисел. выписать в возрастающем порядке все целые числа находящиеся в интервале от минимального до максимального значения элементов этой последовательности, которые не находятся в данной последовательности.

230

413

Посмотреть ответы 2

Ответы на вопрос:

StrongA11

Информатика

4,5(59 оценок)

Var i,i_beg,i_end,k: longint; p: set of longint; begin writeln('вводите целые числа большие двух, конец ввода по числу 0'); i_beg: =1000000; i_end: =0; repeat read(k); if k< > 0 then begin if i_beg> k then i_beg: =k else if i_end< k then i_end: =k; include(p,k) end until k=0; writeln('числа, не входящие в последовательность: '); for i: =i_beg to i_end do if not (i in p) then write(i,' ') end. тестовое решение: вводите целые числа большие двух, конец ввода по числу 0 6 12 9 14 10 19 17 11 7 0 числа, не входящие в последовательность: 8 13 15 16 18