Функция перестановок букв с Pascal на С.

@Repak5 · Регистрация: 18.10.2009

Author24 — интернет-сервис помощи студентам

Здравствуйте всем. Помогите пожалуйста начинающему программисту на C. У меня есть процедура(функция) на Pascal которая выводит все возможные перестановки символов в слове и считает их количество. Вот собственно и она:

Pascal

Procedure Perest(C,S:String; Var Sch:LongInt); {Процедура выводит на экран}
Var I: Byte; {Счетчик цикла}                   {возможные перестановки и их}
                                                                    {количество.}
    Temp, Cons, Res : String;  {Буфер, буфер, результат}
 
Begin
        if Length(S) = 1
        Then Begin
                  Res := C+S;
                  Sch:=Sch+1;
                  Write(Res,' ');
             End
        Else Begin
                  For I := 1 To Length(S) Do
                  Begin
                       Temp := S;
                       Delete(Temp,I,1);
                       Cons := C + S[I];
                       Perest(Cons,Temp,Sch);
 
                  End;
             End;
 
 
End;

Помогите ПОЖАЛУЙСТА переписать её на язык C. Я еще не понял как передать строки в функцию и работать с ними в ней((( Помогите очень прошу! Заранее спасибо.

Добавлено через 1 час 43 минуты
А на вашем форуме вообще есть пользователи?

Добавлено через 1 час 3 минуты
Ну что? кто-нить что-нить знает? Или тут нет разбирающихся людей?

@odip · 22.03.2010, 10:41

Просто тут никто не любит Pascal

@Repak5 · 22.03.2010, 19:30 **[ТС]**

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

Просто тут никто не любит Pascal

Так я прошу переписать на Си а не на Паскаль...

Добавлено через 4 минуты
Хорошо тогда попрошу по другому: Помогите написать рекурсивную функцию которая выводит все возможные перестановки шахматных фигур(2 ладьи, 2 коня, 2 слона, ферзь и король) на первой линии шахматной доски. Помогите пожалуйста. Это нужно на Си.

Добавлено через 4 часа 41 минуту
Вопрос решен! Ответ в ветке Почему возникает переполнение стека???

@easybudda · 22.03.2010, 19:53

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

Вопрос решен!

Ну и славненько!

@odip 7175 / 3234 / 81 Регистрация: 17.06.2009 Сообщений: 14,164
	22.03.2010, 10:41	2
	Просто тут никто не любит Pascal 0

@Repak5 2 / 2 / 1 Регистрация: 18.10.2009 Сообщений: 14
	22.03.2010, 19:30 [ТС]	3
	Сообщение от odip Просто тут никто не любит Pascal Так я прошу переписать на Си а не на Паскаль... Добавлено через 4 минуты Хорошо тогда попрошу по другому: Помогите написать рекурсивную функцию которая выводит все возможные перестановки шахматных фигур(2 ладьи, 2 коня, 2 слона, ферзь и король) на первой линии шахматной доски. Помогите пожалуйста. Это нужно на Си. Добавлено через 4 часа 41 минуту Вопрос решен! Ответ в ветке Почему возникает переполнение стека??? 0

@easybudda Модератор 12458 / 7482 / 1753 Регистрация: 25.07.2009 Сообщений: 13,762
	22.03.2010, 19:53	4
	Сообщение от Repak5 Вопрос решен! Ну и славненько! 0