Решите пж задачу и нарисуйте блок схему
Дано действительное x.Определить:
f(x)=6x^2+5x, если x>-2
x^2-8x+1, в остальных случаях
Var x,f:real;
Begin
Readln(x);
If x>-2 then f:=sqr(6*x)+5*x
else f:=sqr(x)-8*x+1;
Writeln(F(x) = , f);
End.
Оцени ответ
