Записать выражение в паскалях и вычислить их значение при а=2; в=3 а+в/a^2-b(под корнем); |a|-a+b/a-b

 program qq; 
var a,b:integer; s:real; 
begin 
writeln('Введите число а'); 
readln(a); 
writeln('Введите число b');
readln(b);
s:=sqrt(a+(b/a*a)-b); 
writeln('S=',S); 
end.