Тем что там запрос, а там вопрос,ооочень глупо)
Раздели предметы на группы по три если есть лишние предметы то выбери в начале игры первый ход и закрась лишний предмет
есле нет лишних предметов то выбери второй ход
дополняй ход другого игрока до четырех предметов
Вот вставь проверь там напишет при каких значениях
var x, L, M,i,i1: integer;
begin
for i:=0 to 1000 do
begin
i1:=i;
L:=0;
M:=0;
while i1 > 0 do
begin
L:=L+1;
if M < i1 then
begin
M:= (i1 mod 10) * 2;
end;
i1:= i1 div 10;
end;
writeln(L);
write(M);
end;
readln;
end.<span>
</span>
1) 361*2=722<=<=7
Ответ: *2<=<=
2) 497<=49*2=98*2=196*2=392*2=784<=<=7*2=14
Ответ: <=*2*2*2*2<=<=
3)167*2*2*2*2*2=5344<=<=<=5*2=10
Ответ: *2*2*2*2*2<=<=<=*2
Просто введи код в язык программирования Poscal - тебе и выдаст ответ.
Ну в данном случае S=31.