Question

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

Answer 1

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

Answer 2

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

Answer 3

на PacalABC

Answer 4

PascalABC