Ответ:
47
Объяснение:
Задачу раскручиваем с конца от 25 вычитанием 1 и делением на 2 доходим до двойки. Потом наоборот, поднимаемся вверх, заполняя в скобках количество возможных вариантов получить данное число(по сути упрощённая в вычислениях рекурсия от 2 до 25).
Панель управления -> Центр управления сетями и общим доступом -> Свойства адаптера -> ПКМ по "Подключение по локальной сети" -> "Включить".
var
x, y, s: integer;
begin
readln(x, y);
s := (2*x + y) * (x-y);
writeln(s);
end.
<em>// PascalABC.NET 3.3, сборка 1549 от 17.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(17,-15,45);
a[:10].Println;
a[10:].Println;
end.
<u>Пример</u>
-8 23 16 11 -9 20 25 0 32 31
31 34 18 7 16 -6 -13