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

Question

Информатика

Галюся

11 сентября, 06:50

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

+2

Ответы (1)

Знаете ответ?

Машута · Answer 1

Если тебе нужен код, то вот он:

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.