Решите задачу 3(Паскаль 7 класс) пожалуйста.Только посторайтесь не сложным путем делать,а то учитель не поверит.))ДАЮ 32 БАЛА
Решите задачу 3(Паскаль 7 класс) пожалуйста.Только посторайтесь не сложным путем делать,а то учитель не поверит.))ДАЮ 32 БАЛА
Гость
Ответ(ы) на вопрос:
Гостьvar i,n:integer; a,d,p:real;
begin
write('n = '); readln(n);
p:=17;
d:=1;
for i:=1 to n-1 do
begin
d:=d*2;
a:=d/(5*i)/(2*i+1);
p:=p*a;
end;
writeln('p = ',p);
end.
Пример:
n = 4
p = 0.013815873015873
Не нашли ответ?
Похожие вопросы