Написать и отладить программу PROG3_2, решающую следующую зада- чу: Даны целое положительное число N и вещественное число a. Найти ( на скриншоте) В задаче знак П означает произведение (по аналогии со знаком «сигма», означающе...
Написать и отладить программу PROG3_2, решающую следующую зада-
чу: Даны целое положительное число N и вещественное число a. Найти ( на скриншоте)
В задаче знак П означает произведение (по аналогии со знаком «сигма»,
означающем сумму). Для решения задачи предварительно составьте на бу-
маге систему тестов для различных (небольших) значений N и a
Гость
Ответ(ы) на вопрос:
ГостьТест:
n=4, a=2
i=1: p = 2/1+1 = 3
i=2: p = 3*(4/3+1) = 3*2.3333 = 6.9999
i=3: p = 6.9999*(8/6+1) = 16.3329
i=4: p = 16.3329*(16/10+1) = 42.4655
var n,i,s:integer; a,st,p:real;
begin
write('n = ');readln(n);
write('a = ');readln(a);
p:=1; s:=0; st:=1;
for i:=1 to n do
begin
st:=st*a;
s:=s+i;
p:=p*(st/s+1);
end;
writeln('П = ',p);
end.
Пример:
n = 4
a = 2
П = 42.4666666666667
Гостьvar
a, p: real;
i, n, temp: integer;
begin
readln(a, n);
temp := 0;
p := 1;
for i := 1 to n do
begin
temp := temp + i;
p := p * (1 + exp(i * ln(a)) / temp);
end;
writeln(p);
end.
Не нашли ответ?
Похожие вопросы