Как получить набор уникальных комбинаций к примере 4 из 20 ? и можно ли это сделать в pascal abc или в другой программе ?
Как получить набор уникальных комбинаций к примере 4 из 20 ? и можно ли это сделать в pascal abc или в другой программе ?
Ответ(ы) на вопрос:
var a,i:integer;
begin
for i:= 1 to 4 do begin
a:=random(1,20);
write(a,' ');
end;
end.
Не нашли ответ?
Похожие вопросы