Помогите вычислить в паскале
Добрый день! Только 3 задание интересует?
Program DS;vars,x,y: real;beginwriteln('введите переменные x,y');readln(x,y);s:=sqrt(x+y)/sqr(x);writeln('Ответ = ',s:2:2);end.