Дано х. Вычислите у, если:
Запрограммируйте на любом языке) Пожалуйста

спасибо большое) Паскаль?

да. а на каком надо?

на Паскале пойдет) огромное спасибо

program one;varx,y:real;beginwrite('Vvedite  X=>');Readln(x);if x>2 then y:=1/(x*x+4*x+5) else y:=x*x+4*x+5;Writeln ('Y=',Y);end.