Нужна с составлением макроса в excel (100 )
нужна с написанием макроса в excel или хотябы идеей о том как его написать. такое: нужно в таблице по конкретному столбцу составить кнопку с макросом чтобы при нажатии на неё выводились все значения которые больше порога 65 000.
i, n: integer;
a, s, e: real;
function Factorial(n: integer): longint;
var
f, i: longint;
begin
f := 1;
for i := 1 to n do
f := f * i;
Factorial := f;
end;
function Power(x: real; n: integer): real;
var
i: integer;
p: real;
begin
p := 1;
for i := 1 to n do
p := p * x;
Power := p;
end;
begin
readln(e, n);
s := 0;
for i := 1 to n do
begin
a := Factorial(n) / Power(n, n);
if abs(a) < e then
s := s + a;
end;
writeln(s);
end.