25 / 25 / 5
Регистрация: 21.11.2013
Сообщений: 208
1

Рекурсия: вывести положительные элементы последовательности в прямом порядке, потом отрицательные - в обратном

01.12.2013, 21:38. Показов 2087. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Задача звучит так:
Вывести значения всех положительных элементов заданной числовой последовательности в прямом порядке. По завершению, с новой строки, вывести индексы отрицательных элементов в обратном порядке. Нумерация элементов начинается с единицы.(последовательностью считаются числа до первого числа 0)
Вход:
4 4 53 64 -53 243 -4 0
Выход:
4 4 53 64 243
7 5
0
Лучшие ответы (1)
01.12.2013, 21:38
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
01.12.2013, 21:38
Ответы с готовыми решениями:

Рекурсия: вывести сначала все положительные числа заданной последовательности, а потом все отрицательные
Задание написать на Си С клавиатуры вводится непустая последовательность ненулевых целых чисел, которая заканчуется нулем. Вывести на...

Рекурсия: вывести числовую последовательность сначала в прямом, а затем в обратном порядке
Написать программу, выводящую числовую последовательность из n элементов сначала в прямом, а затем в обратном порядке рекурсией(не...

Переписать данные массива в другой 2 раза: сначала все элементы идут в прямом потом обратном порядке
Из заданного массива переписать информацию в другой 2 раза таким образом: сначала все элементы идут в прямом порядке потом в обратном

2
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33073 / 21374 / 8211
Регистрация: 22.10.2011
Сообщений: 36,692
Записей в блоге: 9
01.12.2013, 22:35 2
Лучший ответ Сообщение было отмечено volvo как решение

Решение

Ну, по аналогии с предыдущей функцией же:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
function q(i : Integer) : char;
var x : integer;
begin
  q := #0;
  readln(x);
  inc(i);
  if x <> 0 then
  begin
    if X > 0 then
    begin
      write(X, '':1, q(i):0); X := 0;
    end
    else
    begin
      X := I;
      q(i);
    end;
    if X > 0 then write(X, '':1);
  end
  else writeln;
end;
 
begin
  q(0);
end.
1
25 / 25 / 5
Регистрация: 21.11.2013
Сообщений: 208
01.12.2013, 23:26  [ТС] 3
Ясно. Все оказалось проще, чем я думал. Спасибо огромное
0
01.12.2013, 23:26
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
01.12.2013, 23:26
Помогаю со студенческими работами здесь

Вывести в прямом порядке элементы массива и в обратном порядке - чётные элементы
Составьте программу, которая вводит с клавиатуры 8 целых неотрицательных чисел (каждое число — с новой строки отдельной командой «ввод»),...

Вывести элементы массива в прямом порядке и обратном
1. Вводится четное число N и массив из N целых чисел. Вывести элементы массива в прямом порядке и обратном.

Скопируйте отрицательные и положительные элементы массива А в массив В в обратном порядке
Скопируйте отрицательные и положительные кратные заданному числу элементы массива А в массив В в обратном порядке. Измените знак всех...

Рекурсия: вывести отрицательные числа из текстового файла в обратном порядке
Информация находится в текстовом файле и содержит положительные и отрицательные числа.Нужно вывести отрицательные числа в обратном порядке....

Положительные элементы переставить в обратном порядке, а отрицательные оставить на своих местах
есть рабочая программка,но не могу переделать нужно,чтобы положительные элементы переставлялись в обратном порядке,а отрицательные...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Почему могут не шифроваться русские символы в Java
Wired 17.02.2025
При разработке на Java нередко возникают сложности с шифрованием русских символов. Эта проблема особенно актуальна для разработчиков, создающих программное обеспечение для русскоязычной аудитории. . . .
Отличия ОС для x86_64 и ARM
Wired 17.02.2025
На данный момент сосуществуют две основные архитектуры процессоров - x86_64 и ARM. Эти архитектуры имеют принципиально разные подходы к организации вычислений и обработке данных, что накладывает. . .
Многопоточность в Python: как использовать Thread
bytestream 17.02.2025
Поток выполнения (thread) - это наименьшая последовательность инструкций, которая может управляться планировщиком операционной системы. Представьте себе, что ваша программа - это книга, а потоки -. . .
Как воспроизвести Race Condition в Python
bytestream 17.02.2025
В многопоточном программировании существует множество подводных камней, и одним из самых коварных является состояние гонки (Race Condition). Этот термин описывает ситуацию, когда результат выполнения. . .
Ошибка "node: --openssl-legacy-provider is not allowed in NODE_OPTIONS"
bytestream 17.02.2025
Каждый разработчик рано или поздно сталкивается с ситуацией, когда при запуске проекта Node. js неожиданно выскакивает ошибка "node: --openssl-legacy-provider is not allowed in NODE_OPTIONS". Это. . .
Ошибка pip Python "AttributeError­: module 'lib' has no attribute 'OpenSSL_add_al­l_algorit­hms'"
bytestream 17.02.2025
При разработке на Python частенько сталкиваешься с разными сюрпризами, но ошибка AttributeError: module 'lib' has no attribute 'OpenSSL_add_all_algorithms' - это что-то особенное. Знаете, это как. . .
Сообщение Play Store "You must complete the advertising ID declaration before you can release an app that targets"
bytestream 17.02.2025
Рекламный идентификатор - это уникальный, но восстанавливаемый строковый идентификатор для каждого устройства Android. Думаю, вы удивитесь, но даже если ваше приложение не показывает рекламу. . .
Отличия App Router от Pages Router в Next.js
bytestream 17.02.2025
Next. js прошел длинный путь развития, и одним из самых значительных изменений стало появление App Router - революционного подхода к организации маршрутизации в приложении. Этот новый способ пришел на. . .
Топ10 лучших фреймворков JavaScript для изучения в 2025
bytestream 16.02.2025
В современной веб-разработке JavaScript занимает особое место, являясь одним из наиболее востребованных языков программирования. По мере развития веб-технологий появляется все больше фреймворков,. . .
Temporal в JavaScript - новый формат даты и времени
bytestream 16.02.2025
В мире JavaScript скоро произойдет значимое событие - появление нового встроенного объекта Temporal, который призван полностью заменить устаревший объект Date. Это революционное изменение в работе с. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru