Question

дано действительное число х.
там написано 2-х,х<0
0, х≥0
Помогите с Паскалем ,пожалуйста ...​

Answer 1

var x,f: real;

begin

writeln('введите x');

readln(x);

if x<0 then f:=2-x;

if x>=0 then f:=0;

writeln(f);

end.