Вычислить алгебраическое выражение S=3x+29-10x.
Если сумма больше 25, то вывести ее на экран, в противном случае
вывести на экран текст:" ? ".

//PascalABC.NET 3.2begin  var x := ReadlnReal('x =');  var s := 3*x + 29 - 10*x;  if s > 25 then write(s)  else write('?');end.