Реализации алгоритмов/Алгоритм Нарайаны: различия между версиями

Нет описания правки
(Исправление форматирования, поправки к коду)
}
 
int NarayanaNextPermutationnextPermutation (T *a, int n) {
int i, j, l;
/* Шаг № 1 */
type T = integer;
 
function NarayanaNextPermutationNextPermutation (var a: array of T; n: integer): integer;
var i, k, l: integer;
procedure SwapItems (index_1, index_2: word);
k := k - 1;
if k = -1 then
NarayanaNextPermutationNextPermutation := 0
else
begin
SwapItems(i, l)
end;
NarayanaNextPermutationNextPermutation := i
end
end;
===Вариант № 1===
<source lang="PHP">
function NarayanaNextPermutationnextPermutation ($a, $n) {
$out = $a;
// Шаг № 1
Анонимный участник