Question

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

Answer 1

program one;
var
x,y:real;
begin
write('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.

Answer 2

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

Answer 3

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

Answer 4

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