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.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
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.