Написать программу которая вычисляет переменную d по формуле: d=2a+5(a+b)/a+3b
Var a,d,b:real; begin read (a,b); d:=(2*a+5*(a+b)) / (a+3*b); writeln( d); end.