Как получить набор уникальных комбинаций к примере 4 из 20 ? и можно ли это сделать в pascal abc или в другой программе ?
181
350
Ответы на вопрос:
Var a,i: integer; begin for i: = 1 to 4 do begin a: =random(1,20); write(a,' '); end; end.
Популярно: Информатика
-
svelt0402.10.2022 09:31
-
tonia820.11.2022 20:02
-
orudcovamilana06.09.2020 20:40
-
khmelevaya08.07.2022 16:20
-
daniilznanija012.02.2022 08:27
-
allahakbar1062p0a3z009.08.2021 12:08
-
viktoria38802.10.2021 19:02
-
кукушка13925.12.2022 21:44
-
influenceee09.11.2022 01:25
-
Oks09922.03.2020 08:02