//PascalABC.NET 3.2
begin
var x := ReadlnReal('x =');
var s := 3*x + 29 - 10*x;
if s > 25 then write(s)
else write('?');
end.
2) 3. В отрицании дизъюнкция меняется на конъюнкцию
Первая задача: мы не можем получить числа, меньшие 6 (т.к. даже если использовать самые маленькие числа: 2 + 1 + 1 + 1 + 1 = 6) и больше 10 (т.к. 2 + 2 + 2 + 2 + 2 = 10)
Но все числа от 6 до 10 включительно получить можно:
6: 1111
7: 1112
8: 1122
9: 1222
10: 2222
Вторая:
11211