Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/4: Рейтинг темы: голосов - 4, средняя оценка - 5.00
yuliadaa
0 / 0 / 0
Регистрация: 25.01.2015
Сообщений: 6
1

Рекурсия, выведите все нечетные числа последовательности, сохраняя их порядок

01.02.2015, 11:30. Просмотров 792. Ответов 6
Метки нет (Все метки)

Дана последовательность натуральных чисел (одно число в строке), завершающаяся числом 0. Выведите все нечетные числа из этой последовательности, сохраняя их порядок.

В этой задаче нельзя использовать глобальные переменные и передавать какие-либо параметры в рекурсивную функцию. Функция получает данные, считывая их с клавиатуры. Функция не возвращает значение, а сразу же выводит результат на экран. Основная программа должна состоять только из вызова этой функции.

Никак не могу усвоить рекурсия, помогите, пожалуйста.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.02.2015, 11:30
Ответы с готовыми решениями:

Переписать четные числа в файл g, а нечетные - в файл h, сохраняя при этом порядок.
Дано файл f из целых элементов. Переписать четные числа в файл g, а нечетные -...

Записать в массив сначала все положительные числа, затем все остальные, сохраняя порядок
Привет.Помогите решить данную задачу;( Дан массив из N целых чисел. Записать...

Поместить положительные числа первого массива во второй, отрицательные - в третий, сохраняя порядок следования
Дан массив A размера N. Сформировать два новых массива B и C: в массив B...

Все элементы, не равные нулю, переписать (сохраняя их порядок) в начало, а нулевые элементы – в конец массива
Задан одномерный массив. Все его элементы, не равные нулю, переписать (сохраняя...

Преобразовать файл, удалив нечетные числа. Порядок следования четных чисел сохранить
Всем привет! Помогите пожалуйста решить!Кому не трудно объясните как все...

6
vint-81
охотник
1009 / 533 / 650
Регистрация: 29.09.2014
Сообщений: 1,083
01.02.2015, 11:57 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
function vivod:integer;
var a:integer;
begin
 readln(a);
  if a<>0
   then 
    begin 
     vivod();
     if odd(a) then write(a,' ');
    end
   else writeln('нечетные');
end;
begin
 vivod()
end.
0
volvo
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
26368 / 17692 / 7005
Регистрация: 22.10.2011
Сообщений: 31,138
Записей в блоге: 6
02.02.2015, 00:20 3
Лучший ответ Сообщение было отмечено volvo как решение

Решение

vint-81, просили же, в том же порядке, а не в обратном:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
function f : string;
var X : integer;
begin
  f := '';
  readln(X);
  if X <> 0 then
  begin
    if odd(X) then write(X, ' ', f()) else write(f())
  end
end;
 
begin
  f()
end.
2
yura1092
0 / 0 / 0
Регистрация: 03.12.2015
Сообщений: 5
04.12.2015, 12:57 4
А можно этот код на С++? Буду благодарен!
0
volvo
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
26368 / 17692 / 7005
Регистрация: 22.10.2011
Сообщений: 31,138
Записей в блоге: 6
04.12.2015, 13:22 5
Этот код на С++ не переводится, уже пробовали. Все равно выводит числа в обратном порядке, а не в прямом.
0
yura1092
0 / 0 / 0
Регистрация: 03.12.2015
Сообщений: 5
04.12.2015, 14:09 6
Я уже сделал)
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#include <stdio.h>
 
 
void simpleFunction() 
{
    int x;
    l1:
    scanf ("%d", &x);
    if (x == 0) return;
    if (x & 1) printf ("%d", x);
    goto l1;
}
int main()
{
    simpleFunction();
    return 0;
}
0
volvo
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
26368 / 17692 / 7005
Регистрация: 22.10.2011
Сообщений: 31,138
Записей в блоге: 6
04.12.2015, 14:20 7
Это не рекурсия, если что
0
04.12.2015, 14:20
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.12.2015, 14:20

Заменить все нечетные элементы последовательности на нули
задан массив из 15 случайных элементов из диапазона -15 до 10 замените все...

Записать в файл все четные числа, а затем - все нечетные
1.Дано файл целых чисел f. Переписать компоненты файла f в файл g так, чтобы...

В файл g записать все четные числа из файла f, а в h все нечетные.
Организовать файл последовательного доступа f, состоящий из N целых чисел....


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru