Предмет: Информатика, автор: Аноним

Решите задачу 3(Паскаль 7 класс) пожалуйста.Только посторайтесь не сложным путем делать,а то учитель не поверит.))ДАЮ 32 БАЛА

Приложения:

Ответы

Автор ответа: petyaGavrikov
0
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
Автор ответа: petyaGavrikov
0
Пожалуйста
Автор ответа: Аноним
0
брат,реши плис http://znanija.com/task/18576216
Автор ответа: Аноним
0
2 задача
Автор ответа: Аноним
0
с этого листка
Автор ответа: Аноним
0
30 баллов
Похожие вопросы