Question

Составить программу на Паскале! Работа несложная для информатика. Буду благодарен!!!

Answer 1

##

var x := ReadReal;

var y := if x <=5 then Sqrt((5 - x) / (x * x + 1)) else (12 * x - 1) / (2 * x);

Print(y)