Помогите пожайлуйста с программой Паскаль (составить программу) у=|x| + 50 потом дробь и под ней ---р-а (это под корнем)

Н-да, с русским языком не лучше, чем с Паскалем.. .

var x,p,a:real;
begin write('x p a ? '); readln(x,p,a); writeln(abs(x)+50/sqrt(p-a):0:7): readln end.

Если, конечно, я правильно угадал.