Перечислить все вложения множества {1..k} в {1..n}

@romadr · Регистрация: 22.01.2011

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

За огромное спасибо, помогите разобраться с заданием и написать программу:

Перечислить все вложения (функции, переводящие разные элементы в разные) множества {1..k} в {1..n} (предполагается, что k ≤n).

@Puporev · 23.01.2011, 07:44

Очень уж туманно и почти не по-русски написано...
Может что-то типа генерации подмножеств из N по К нужно?
Тогда глянь эту программу.

Pascal

uses crt;
const n1=20; {Максимальная размерность множества!}
type vector=array[1..n1] of integer;
var k,n,i,j:integer;
        a,p:vector;
{рекурсивная процедура генерации очередного подмножества}
procedure cnk(m,l:integer);
var i:integer;
begin
  if m=0 then begin
   for j:=1 to k do write(p[j]:4); {Здесь - обработка комбинации}
   writeln;
  end
  else
  for i:=l to n-m+1 do {цикл по возможным индесам для выбора
                            первого из m элементов}
  begin
   p[k-m+1]:=a[i];
   cnk(m-1,i+1)
  end;
readln
end;
 
begin
  writeln ('Подмножества из N по K');
  writeln ('Введите N,K:');
  read(n,k);
  for i:=1 to n do
    a[i]:=i; {данный массив может быть заполнен произвольно}
  cnk(k,1);
end.

@romadr · 24.01.2011, 20:24 **[ТС]**

Кто нибудь напишите пожалуста пример вывода моей программы, если гнапример n=4 а k=3

@Puporev · 24.01.2011, 20:33

romadr, Так запусти мою программу, введи n=4, k=3 и сам увидишь.

@romadr · 24.01.2011, 20:55 **[ТС]**

ааа, она решает задачу чтоли) тогда огромное спасибо. Я думал это просто пример алгоритма

@romadr 0 / 0 / 0 Регистрация: 22.01.2011 Сообщений: 4
		1
	Перечислить все вложения множества {1..k} в {1..n} 22.01.2011, 23:38. Показов 1250. Ответов 4 Метки нет (Все метки) За огромное спасибо, помогите разобраться с заданием и написать программу: Перечислить все вложения (функции, переводящие разные элементы в разные) множества {1..k} в {1..n} (предполагается, что k ≤n). 0

@romadr 0 / 0 / 0 Регистрация: 22.01.2011 Сообщений: 4
	24.01.2011, 20:24 [ТС]	3
	Кто нибудь напишите пожалуста пример вывода моей программы, если гнапример n=4 а k=3 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	24.01.2011, 20:33	4
	romadr, Так запусти мою программу, введи n=4, k=3 и сам увидишь. 0

@romadr 0 / 0 / 0 Регистрация: 22.01.2011 Сообщений: 4
	24.01.2011, 20:55 [ТС]	5
	ааа, она решает задачу чтоли) тогда огромное спасибо. Я думал это просто пример алгоритма 0