Напишите программу нахождения значения выражения  y=(x^2-√xa):|a|. Борланд Паскаль.

program prim;uses crt;vary,x,a,modul,koren,kvad:real;beginwriteln('Решаем пример:');kvad:=sqr(x);koren:=sqrt(x*a);modul:=abs(a);y:=(kvad-koren)/modul;writeln(y);end.