var x,y:real;
BEGIN
readln(x);
if (x<=0) then
y:=-2*sqr(x)+x+1 else
y:=-2*sqr(x)+3;
writeln(y);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var x,y:real;
BEGIN
readln(x);
if (x<=0) then
y:=-2*sqr(x)+x+1 else
y:=-2*sqr(x)+3;
writeln(y);
end.