Question

Пожалуйста помогите!!!
Написать в тетради программу нахождения арифметического выражения по правилам языка программирования:
((a+b)**2/(1+a/(ba^2-√b))

Answer 1

Var
   a,b:real;
Begin
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
WriteLn('(a+b)*2/(1+a/(ba^2-√b)) = ',(a+b)*2/(1+a/(b*a*a-Sqrt(b))))
End.