Программу на паскале для выражения
y=x+3/корень из x

Попробуй. Должно работать.

var x, y: real;

begin

readln (x);

y:=x+3/sqrt(x);

writeln (y);

end.