Помощь - Поиск - Пользователи - Календарь
Полная версия: Последовательность
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Zundell
Форумчане помогите плиз!Задача следующая:
Дана последовательность чисел Ai(i=1..n)!н-натуральное.
Получить две последовательности Bj и Ck.
В Bj должны войти числа больше числа P1 в Ck числа меньше P.Обе последовательности разложить по убывающей.
klem4
Что конкретно не получается ? Не понятен алгоритм или что ?

FAQ : Массивы, матрицы
FAQ: Методы сортировок
Zundell
С сортировкой все понятно..это не проблема...небольшие непонятки с тем как разбить данный массив(последовательность) на 2 массива удовлетворяющих условию!
klem4
j := 0;
k := 0;
for i := 1 to n do
if a[i] > P1 then begin
inc(j);
b[j] := a[i]
end
else if a[i] < P then begin
inc(k);
c[k] := a[i];
end;
Zundell
Огромное спасибо)
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.