<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadlnString.MatchValues('[аА]').Count.Println
end.
<h2>Пример</h2>
А роза упала на лапу Азора
8
2 числа записывают в порядке неубывания, то есть в порядке возрастания, или 2 числа равны. Числа:2512, 2518, 2524 не подходят уже по этому критерию. Max сумма трех десятичных цифр = 27(9+9+9). Число 2828 не подходит. Остались числа: 2425, 1225, 1825, 123. Рассмотрим последнее число 123. Сумма первых 3 его цифр равна 1, т.е первые три цифры 100, третья цифра 0 должна в сумме с двумя другими цифрами дать 23, но сумма 2 цифр меньше или равна 18, поэтому такого числа нет.
Остались 2425 1225 1825
Ответ:3
Задумайте число,прибавте 12,вычеслите 6 и вычеслите 6.Какое число получилось?
Эл. там только положительный заряд, пр. все зряды
Х+у=61
у+а=94
а+х=53
складываем
2х+2у+2а=208
х+у+а=208\2
х+у+а=104
общее количество знакомых
тогда
х=98,104-98=6
у=150,150-104=46
а=130,130-104=26
6+46+26=78
человек есть знакомых общих
тогда ответ будет
104-78=26
Ответ-----26 человек