Вычислить значение выражения

@GoldenFox51 · Регистрация: 22.08.2017

Студворк — интернет-сервис помощи студентам

Даны действительные числа a₁, a₂, ..., a_n и b₁, b₂, ..., b_n. Вычислить (a₁ + b_n) * (a₂ + b_n-1) * ... * (a_n + b₁).

@Puporev · 22.08.2017, 12:44

Создаете 2 массива типа real, и считаете

Pascal

1
2
3

p:=1;
for i:=1 to n do
p:=p*(a[i]+b[n-i+1]);

@Comrade2017 · 29.08.2017, 09:23

Pascal

program ffff;
 uses crt;
 var
  k,n,i:integer;
  a,b:array[1..100] of integer;
 begin
  clrscr;
  n:=1;
  for i:=1 to 2 do
  read(a[i]);
  for k:=1 to 2 do
  read(b[k]);
  for i:=1 to 2 do
   for k:= 2 downto 1 do
    n:=n*(a[i]+b[k]);
  write(n); 
 end.

@JuriiMW · 30.08.2017, 06:49

Comrade2017, ваша программа в корне неверна!
Во-первых, данные массива ограничены всего двумя значениями, а не n.
Во-вторых, считается для n=2 вроде правильно: $https://www.cyberforum.ru/cgi-bin/latex.cgi?({a}_{1}+{b}_{2})*({a}_{1}+{b}_{1})*({a}_{2}+{b}_{2})*({a}_{2}+{b}_{1})$
А уже при n=3 уже не получается!

@GoldenFox51 0 / 0 / 0 Регистрация: 22.08.2017 Сообщений: 2
		1
	Вычислить значение выражения 22.08.2017, 11:48. Показов 616. Ответов 3 Метки нет (Все метки) Даны действительные числа a₁, a₂, ..., a_n и b₁, b₂, ..., b_n. Вычислить (a₁ + b_n) * (a₂ + b_n-1) * ... * (a_n + b₁). 0

@JuriiMW 5059 / 2633 / 2346 Регистрация: 10.12.2014 Сообщений: 9,997
	30.08.2017, 06:49	4
	Comrade2017, ваша программа в корне неверна! Во-первых, данные массива ограничены всего двумя значениями, а не n. Во-вторых, считается для n=2 вроде правильно: $https://www.cyberforum.ru/cgi-bin/latex.cgi?({a}_{1}+{b}_{2})({a}_{1}+{b}_{1})({a}_{2}+{b}_{2})*({a}_{2}+{b}_{1})$ А уже при n=3 уже не получается! 0

Опции темы