Написать на языке Паскаль программу для вычисления функции при любом значении х.

sin 3,2+sqrt 1+x
y=--------------------------
|5|

var  x,y:real;begin  Write('x='); Read(x);  y:=(3.2*sin(x)+sqrt(1+x))/abs(5);  Writeln('y=',y)end.