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

Задача

(x-1)(x-3)(x-7)*…*(x-63)/(x-2)(x-4)(x-8)*…*(x-64).

Подробный ответ

Вычисляем произведение числителя и знаменателя по циклу. В числителе берутся значения $$1, 3, 7, \dots, 63$$, то есть числа вида $$2^k-1$$, а в знаменателе — $$2, 4, 8, \dots, 64$$, то есть числа вида $$2^k$$.

Удобно завести две переменные: $$p1$$ — для числителя и $$p2$$ — для знаменателя. Затем в цикле последовательно перемножать нужные множители.

var x, p1, p2: real;
i: integer;
begin
  write(‘Vvedite X: ‘);
  readln(x);
  i := 1;
  p1 := 1;
  while i <= 63 do begin
    p1 := p1 * (x — i);
    i := 2 * i + 1;
  end;
  i := 2;
  p2 := 1;
  while i <= 64 do begin
    p2 := p2 * (x — i);
    i := 2 * i;
  end;
  writeln(‘Result = ‘, (p1 / p2):8:3);
end.