я никогда не пользовался функцией RandomRage, поэтому не сразу заметил.
Вот ответ на вопрос. Функция возвращаяет результат
ОТ и
ДО указанных значений, но
НЕ включая их. Соответственно, чтобы из CheckSet удалить все значения, надо делать
c1:=RandomRange(0,6);