Ответ внутри вложенного файла
Поскольку возможен случай, когда даже 17 перчаток окажутся правыми, надо взять на одну больше, т.е. 18.
В подобных задачах ответ всегда большее из чисел плюс единица.
8364 простых числа....
denisx.ru/tech/prime-number/prime-numbers/first
по ссылке таблица до 100000.
копируем от 10007 до конца и в ексель. 836 столбиков умножаем на 10 и плюс 3. 8363 ошибся на один
//PascalABC.NET 3.2 сборка 1318
function MaxFrom3(a,b,c:integer):integer;
Var
max:integer;
begin
max:=a;
if max<b then max:=b;
if max<c then max:=c;
MaxFrom3:=max;
end;
function MinFrom3(a,b,c:integer):integer;
Var
min:integer;
begin
min:=a;
if min>b then min:=b;
if min>c then min:=c;
MinFrom3:=min;
end;