Два игрока, Петя и Ваня, играют в следующую игру1). Перед игроками лежит куча камней. Игроки ходят по очереди, первый ход делает Петя. За один ход игрок может добавить в кучу 1 камень или 5 камней. Например, имея кучу из 10 камней, за один ход можно получить кучу из 11 или 15 камней. У каждого игрока, чтобы делать ходы, есть неограниченное количество камней. Игра завершается в тот момент, когда количество камней в куче становится не менее 47. Победителем считается игрок, сделавший последний ход, т. е. первым получивший кучу, в которой будет 47 или больше камней.
В начальный момент в куче было S камней, 1 ≤ S ≤ 46. Выполните следующие задания, в каждом случае обосновывая свой ответ.
4) Укажите значение S, при котором у Вани есть выигрышная стратегия, позволяющая ему выиграть первым или вторым ходом при любой игре Пети, однако у Вани нет стратегии, которая позволит ему гарантированно выиграть первым ходом. Для указанного значения S опишите выигрышную стратегию Вани. Постройте дерево всех партий, возможных при этой выигрышной стратегии Вани.
program r;
var a:array[0..8] of integer=(-6,7,45,-12,2,7,-15,0,64); l,i,sum:integer;
begin;
for i:=0 to 8 do
if a[i]>0 then begin;
sum:=sum+a[i];
l:=l+1;
end;
for i:=0 to 8 do
writeln('A[',i,'] = ', a[i]);
write('Сумма положительных элементов равна ',sum,', а из количество ',l);
end.
Второе:
program t;
var d:array [0..40] of integer; l,x:integer;
begin;
for x:=0 to 40 do begin;
d[x]:=45*x+15;
if d[x] mod 2 = 1 then l:=l+1;
end;
write('Кол-во нечётных элементов ',l);
end.
Третье:
program y;
var p:array [0..25] of real; k:integer; avg:real;
begin;
for k:=0 to 25 do begin;
p[k]:=7*k+3*k/15;
avg:=avg+p[k];
end;
avg:=avg/26;
write('Среднее значение элементов массива ', avg);
end.