Question

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

Answer 1

//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.