• 99 баллов
    Вводится последовательность из Nнатуральных чисел. Необходимо определить наименьшее натуральное число, отсутствующее в последовательности.
    Формат входного файла
    В первой строке указано число N, 0 Формат выходного файла
    Вывести наименьшее число, отсутствующее в последовательности.
    Пример

    question img

Ответы 6

  • Ошибка времени выполнения: Файл 'C:\inetpub\wwwroot\WDE PascalABC_NET\Users_Data\UnRegUsers\pyzqldngk20psggapy2qfuhk\input.txt' не найден.
  • или это просто??
  • В директории с программой необходимо создать два файла - input.txt и output.txt
  • спасиибо
  • дождите не уходитеесть еще подобное задание
  • var i,n,k:integer; A: array of integer; // Динамический массив flag:boolean;begin Assign(input,'input.txt'); Assign(output,'output.txt'); Reset(input); //input и output - зарезервированные слова в PascalABC Rewrite(output); Readln(n); SetLength(A,n+1); for i:=1 to n do   read(A[i]); close(input); flag:=true; i:=1; while (flag and (i<n)) do  begin   inc(i);   if (abs(A[i-1]-A[i])<>1)    then begin     flag:=false;     k:=i;    end;  end; if not (flag)  then writeln(A[k-1]+1)  else  if A[1]>1 then writeln(A[1]-1);close(output);end.
    answer img
    • Автор:

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

Войти через Google

или

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

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

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