Как получить набор уникальных комбинаций к примере 4 из 20 ? и можно ли это сделать в...

Question

Как получить набор уникальных комбинаций к примере 4 из 20 ? и можно ли это сделать в pascal abc или в другой программе ?

Comments

это не функция random?

Answer 1

Var a,i:integer;
begin
  for i:= 1 to 4 do begin 
    a:=random(1,20); 
    write(a,' ');
  end;
end.

Comments

выдает 4 случайных числа в диапазоне от 1 до 20, как ты и просил

---

на PacalABC

---

PascalABC