Последовательность чисел

[manchester_alan]

Дана последовательность чисел. И сначала вводится n, который отличается от элементов последовательности. Теперь нужно найти все пары элементов последовательности в интервале между которыми находится n. (без массива, через while желательно)...

Попытался как-то так...

           double n, a, a1;
            double c,c1;
 
            c = 0;
            c1 = 0;
            Console.Write("n=");
            n = Convert.ToDouble(Console.ReadLine().Replace('.', ','));
 
            Console.WriteLine("Последовательность:");
 
            a = Convert.ToDouble(Console.ReadLine().Replace('.', ','));
 
            a1 = Convert.ToDouble(Console.ReadLine().Replace('.', ','));
 
            if ((n >= a1 && n <= a) || (n >= a && n <= a1))
            {
                c1 = a;
                c = a1;
            }
 
            while (a != 0)
            {
                a = Convert.ToDouble(Console.ReadLine().Replace('.', ','));
                if (a == 0) { break; }
                if ((n >= a1 && n <= a) || (n >= a && n <= a1))
                {
                    c1 = a;
                    c = a1;
 
            Console.WriteLine();
            Console.WriteLine("Пара ");
            Console.WriteLine(c);
            Console.WriteLine(c1);
            Console.WriteLine();
                }            
            }
 
            Console.ReadLine();

Хотелось бы, чтобы выводил каждую возможную пару, но он как-то выборочно выводит...

[Serge_Bliznykov]

Нужно или сохранять последовательность чисел или смириться с тем, что

он как-то выборочно выводит

Хотя, возможно, есть решение через использование рекурсии.
Но цикл while не поможет сохранить предыдущие значения.
А ещё, возможно, Вы забыли про какие-то ограничения, может, список значений упорядочен...


p.s. конвертация строки в вещественное число у Вас не очень корректна.
если сменить настройки локального разделителя в Windows (или запустить программу на другом компьютере, с другими настройками) - будут ошибки.
Посмотрите в сторону использования NumberDecimalSeparator

[manchester_alan]

Сообщение от Serge_Bliznykov

Хотя, возможно, есть решение через использование рекурсии.
Но цикл while не поможет сохранить предыдущие значения.
А ещё, возможно, Вы забыли про какие-то ограничения, может, список значений упорядочен...
[/I]

нее просто вот такое задание... Например, вывести в строку можно, но по заданию нельзя использовать string... И вот как вариант, чтобы через переменные он вывел все пары...?

[evg_m]

Теперь нужно найти все пары СОСЕДНИХ (?) элементов последовательности в интервале между которыми находится n.

var a,b,n: integer;
read(n);
read(a);
if a<>0 then read(b) else b:=0;
while (b<>0) 
  if a<n<b then write(a,b)
  else if a>n>b then write(b,a)
  else ;
  a:=b; read(b);
end;

P.S. это не код, это алгоритм записанный на ПСЕВДО понятном языке.