Взять 15 шашек и провести с товарищем следующую игру: каждый из двух играющих по очереди берет шашки; за один раз можно брать одну, две или три шашки; проигрывает тот, кто берет последнюю шашку. Рассчитать, сколько шашек должен брать каждый раз первый игрок, чтобы всегда выигрывать.

//В ответ запиши числа, соответствующие твоему ответу, через пробел

Первый должен брать столько шашек, чтобы оставалось вначале 13 шашек, затем 9, затем 5, затем 1.

Объяснение:

Я извиняюсь если что-то не верно

2, 3, 6, 18, 108

каждый член последовательности начиная с третьего равен произведению двух предыдущих:

2 * 3 = 6

3 * 6 = 18

6 * 18 = 108

program prim2; uses crt; var i, n, r: integer; a: array[1.. 10000] of integer; begin clrscr; randomize; write ('число элементов '); readln(n); for i: =1 to n do begin {получаем случайные числа и выводим их на экран.} a[i]: =random(45)-22; write(a[i],' '); end; {в полученном массиве меняем соседние элементы.} i: =1; {пока i< =n-1.} while i< =n-1 do begin {меняем значения соседних элементов. } r: =a[i]; a[i]: =a[i+1]; a[i+1]: =r; {увеличиваем индекс на два.} inc(i,2); end; {распечатываем измененный массив.} for i: =1 to n do write(a[i],' '); readkey; end.