Работа 3.4 Упр.13 Задание 1 ГДЗ Семакин 10 класс (Информатика)

P= (1-1/2^2)(1-1/3^2)*…*(1-1/n2), где n > 2.

Нужно вычислить произведение

$$P=\left(1-\frac{1}{2^2}\right)\left(1-\frac{1}{3^2}\right)\cdots\left(1-\frac{1}{n^2}\right), \quad n>2.$$

Удобно считать его в цикле, последовательно перемножая все множители от $$i=2$$ до $$i=n$$.

Программа накапливает значение произведения в переменной $$p$$, начиная с $$p=1$$. Затем в цикле для каждого $$i$$ вычисляется множитель

$$1-\frac{1}{i^2}$$

и он умножается на текущее значение $$p$$.

var n: integer;
p: real;
i: integer;
begin
  p := 1;
  writeln(‘введи n>2’);
  readln(n);
  for i := 2 to n do
    p := p * (1 — 1 / sqr(i));
  writeln(p);
  readln;
end.

Ответ

Программа вычисляет значение произведения $$P=\left(1-\frac{1}{2^2}\right)\left(1-\frac{1}{3^2}\right)\cdots\left(1-\frac{1}{n^2}\right)$$ для введённого натурального числа $$n>2$$.