F(x) =x²-3x+9 если x≤3 = (1)/(x²+6) если x больше 3Решите функцию в программе pascal и составьте блок схему
F(x) =x²-3x+9 если x≤3
= (1)/(x²+6) если x>3
Решите функцию в программе pascal и составьте блок схему
Гость
Ответ(ы) на вопрос:
ГостьProgram s123;
Var x,y:real;
Begin
Writeln('F(x) =x²-3x+9 если x≤3, F(x)=(1)/(x²+6) если x>3');
Writeln('Введите значение переменной x');
Readln(x);
If (x<3) or (x=3) Then y:=sqr(x)-3*x+9 Else y:=1/(sqr(x)+6);
Writeln('F(x)=',y);
End.
Не нашли ответ?
Похожие вопросы