Ребят решите пример под номером 3)))на языке паскаль!) спасибо)!

uses Crt;
  var x, F: real;
begin
 ClrScr;
 Write ( X = ); ReadLn (x); 
if x<=2 then   F:=-sqr(x)+4*x+5
          else     F:= 1/(sqr(x)+4*x+5);
WriteLn ( F(,x:6:2,) =, F:6:3);
WriteLn;
ReadLn;
end.


Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку