Question

Помогите пожалуйста написать код в паскале на это

Answer 1

var

x,y : real;

begin

readln(x);

if x > 3 then

   y := x * x - 5

else if x <= 3 then

   y := x - 8;

writeln(y:5:2);

end.