Как записать формулу в паскале: (2n-1)/(2^n) с полным решением

const n=2;

var formula:real;

begin

formula:=(2*n-1)/Exp(n*Ln(2));

writeln (formula);

end.

var

  n, res : real;

begin

  read (n);

  res := (2 * n - 1) / (exp (n * ln (2)));

  writeln (res);

end.

Примечание: а в степени b = exp (b * (ln (a)); Если непонятно, то google к вашим услугам.