ну если будит так то:
1 ход. первый берёт 3 яблока второй тоже 3.
2 ход. первый берёт 2 яблока второй 3.
3 ход. первый берёт 3 яблока второй 2.
и последний ход. первый берёт 3 яблока а второй проигрывает.
X:=random(11);
<span>x:=random(13);
</span><span>x:=-10 + random(26);
</span>x:= 10 + <span>random(6);
</span>Целые случайные числа из промежутка [0; n] генерирует функция random(n +1).
Целые случайные числа из промежутка [a; b] вычисляются с помощью выражения x:= a + random(b - a + 1);
<span>ниже описаны шаги
1- D:\Фото\Соревнования\
2- </span><span>D:\Фото\
3- </span><span>D:\Фото\Тренировки\
4- </span><span>D:\Фото\Тренировки\Баскетбол\.
ответ 4</span>
1.
Repeat
read(c);
if c in ['a',сама тут все перечисли:),'y'] then inc(k1);
if c in ['b',сама тут все перечисли:),'z'] then inc(k2);
Until c='.';
только не забудь описать переменные, обнилить их и вывести)