Ввести число.Если оно неотрицательное,вычесть из него 50,в противном случае прибавить к нему 100

Ввести число.Если оно неотрицательное,вычесть из него 50,в противном случае прибавить к нему 100
Гость
Ответ(ы) на вопрос:
Гость
Если тебе нужен код, то вот он:  var     x : real;  begin     write('x = ');readln(x);     if x > 0        then             x := x - 50        else             x := x + 100;      writeln('result : x = ',x:0:2);  end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы