Форум программистов, компьютерный форум CyberForum.ru

Перестановки чисел. Программа с рекурсией. - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ структура стек http://www.cyberforum.ru/cpp-beginners/thread414407.html
struct Stack //объявление структутры стека { int info; //информационная часть элемента, например int Stack *next; //адресная часть - указатель на следующий элемент } *start; void push(Stack *tmp, int element) //добавление в начало стека { Stack *curr, *prev; int count = 0;
C++ Найти простой множитель Найти простой множитель, который в разложении элементов линейного массива встречается чаще всего. Если таких множителей несколько, вывести все. http://www.cyberforum.ru/cpp-beginners/thread414400.html
C++ умножение разных систем счисления
нужно написать программу для умножения чисел по основанию 8 и 4 в ответе должен быть в в системе по основанию 4
Работа с формой в VS 2008 C++
Добрый день. В программировании я не опытен и с формами в студии работать не приходилось, а тут пришлось. MS Visual Studio 2008, запнулся на одном из шагов. Вот я создал форму с помощью Toolbox. В файле .h у меня появился namespace, класс формы, "задавание" всех элементов из тулбокса. Далее я в файле .cpp создал функцию WinMain. И вот что дальше делать не понимаю. Для начала мне достаточно...
C++ Как задать криволинейный замкнутый контур по точкам методом кубической интерполяции? http://www.cyberforum.ru/cpp-beginners/thread414385.html
В с++ я новичок, полазив по форумам, я нашел некотрые коды, но они либо не работают, либо выдают не то что нужно. Не мог бы мне кто-нибудь объяснить как задавать контур по точкам с помощью кубической интерполяции?
C++ Строка С++ имеется строка s1 скопировать 2 3 4 симв в строку s2 Добавлено через 34 секунды пОМОГИТЕ СПАСИБО ЗАРАНЕЕ подробнее

Показать сообщение отдельно
swetlana1
Сообщений: n/a

Перестановки чисел. Программа с рекурсией. - C++

22.12.2011, 12:26. Просмотров 959. Ответов 0
Метки (Все метки)

Люди, кто может, помогите пожалуйста!!!!
Нужно написать программу с РЕКУРСИЕЙ на си.
Вот само задание:

Дано n различных натуральных чисел. Нужно напечатать все перестановки этих чисел.


Или можете хотя бы перевести код этой программы с паскаля на си.


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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
PROGRAM Perestanovka; 
TYPE t_array=array [1..100] of byte; 
     t_set=set of byte; 
 
 Procedure WritePer (const r:t_array; n:byte); 
 Var y:byte; 
 Begin 
  for y:=1 to n do 
  write (' ',r[y]); 
  writeln 
 End; 
 
 Procedure Per (var r:t_array; m:t_set; n,i:byte); 
 Var x:byte; 
 Begin 
  for x:=1 to 255 do 
      if x in m then begin 
         r[i]:=x; 
         if i=n then WritePer (r,n) 
                else Per (r,m-[x],n,i+1) 
                     end 
 End; 
 
VAR r:T_array; 
    m:T_Set; 
    n,i,a,j:byte; 
Begin 
 i:=1; 
 m:=[]; 
 writeln ('Vvedite moshnost mnozestva'); 
 readln(n); 
 writeln('Vvedite mnozestvo'); 
 for j:=1 to n do begin 
     readln(a); 
     m:=m+[a] 
                  end; 
 Per(r,m,n,i); 
 readln 
END.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru