Написать программму для решения задачи (Pascal ABC). Вычислить значение функции FСмотри...

Question

Написать программму для решения задачи (Pascal ABC). Вычислить значение функции F
Смотри вложения

---

Comments

Ребят решите по-быстрей ))

Answer 1

Var
  F, x: real;

begin
  writeln('Введите х');
  readln(x);
  if x <= -3 then F := 9<br>  else F := 1 / (sqr(x) + 1);
  writeln('Значение функции: ', F)
end.