Даны действительное число A, натуральное число N. Вычислить: 1/а + ... + 1/asqr (2n)

Question

Информатика

Пимен

29 октября, 20:33

Даны действительное число A, натуральное число N. Вычислить: 1/а + ... + 1/asqr (2n)

+5

Ответы (1)

Знаете ответ на вопрос?

Ена · Answer 1

var i, n, a, p: integer;

begin

writeln ('Vvedi N: ') ;

readln (n) ;

writeln ('Vvedi A: ') ;

readln (a) ;

p : = 1;

for i : = 0 to sqr (n) do

begin

p : = p * (a - n) ;

n : = n * 2;

end;

writeln (p) ;

readln;

end.

Даны действительное число A, натуральное число N. Вычислить: 1/а + ... + 1/a*sqr (2*n)

Даны действительное число A, натуральное число N. Вычислить: 1/а + ... + 1/asqr (2n)