Question

Для данного x вычислить значение функции: f(x)= {■((√(x+2 )  -5)/(  x)@2x^2  +〖(x-1)〗^2/|x|   ;  x<1)┤+ Cosx+lnx;x≥1  Решение написать на языке Pascal.

Answer 1

var x,y:real;
begin
writeln('Введите число:');
write(x);
y = 0;
if x>=1 then y:=(sqrt(x+2) - 5)/x + cos(x) + ln(x) else y:=2*x*x + (x-1)*(x-1)/abs(x);
writeln('Значение функции равно', у);
end.