Для данного x вычислить значение функции: Пожалуйста со схемой и самой программой. Заранее спасибо.
Программа для решения задачи: var x,f:real; begin write('x=');readln(x); if x<=-3 then f:=9 else f:=1/(x*x+1);<br>writeln('f(x)=',f:5:3); end. Пример: x=-4 f(x)=9.000 Блок-схема - в прилагаемом файле.