ОТВЕТ1: ходы А=+1, Б=х2.
для 1 игрока: >=N/2 ( ходит Б)
для 2 игрока: >=(N/2)-1, если первый сходит А. N/4 <= x < N/2, если первый сходит Б. Объединяем промежутки: (N/2)-1 ( ходит Б)
ОТВЕТ2: например (N/2)-2
какой код??? код вычесления квадратного корня? Скелет? или калькулятор? больше информации
VB у меня нет, поэтому на своей форме пропишите для любой кнопки код процедуры АААА(), а вторую процедуру разместите в любом доступном модуле, хоть в той же форме.
Не знаю, как Вы планируете вводить текст, я его просто присвоил в программе для контрольного прогона.
Sub aaaa()
Dim s As Stringr
s = "THIS IS THE GREATEST TEST STRING AND ALL K/G CHARACTERS NEED TO BE KILLED"
DeleteChar s, "G"
DeleteChar s, "K"
MsgBox s
End Sub
Sub DeleteChar(ByRef s As String, c As String)
'Удаляем из строки s символ c
Dim k As Integer
Do
k = InStr(s, c)
If k > 0 Then s = Left(s, k - 1) + Right(s, Len(s) - k)
Loop While k > 0
End Sub
Тестовое решение:
THIS IS THE REATEST TEST STRIN AND ALL / CHARACTERS NEED TO BE ILLED
1. Всякая записанная речь (литературное произведение, сочинение, документ и т. п., а также часть, отрывок из них).
2. В лингвистике: письменная или звучащая речь, которая внутренне организована и относительно закончена
// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
begin
SeqRandom(ReadInteger('n='),1,99).Println
end.
<u><em>Тестовое решение:</em></u>
n= 30
8 39 37 3 4 57 33 31 44 12 32 80 14 19 73 64 81 82 36 6 48 12 84 81 6 66 36 51 40 69