Записать математическое выражение в Паскалях и вычислить их значение…

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.