Предмет: Информатика,
автор: Аноним
Решите задачу 3(Паскаль 7 класс) пожалуйста.Только посторайтесь не сложным путем делать,а то учитель не поверит.))ДАЮ 32 БАЛА
Приложения:
Ответы
Автор ответа:
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
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
Автор ответа:
0
Пожалуйста
Автор ответа:
0
брат,реши плис http://znanija.com/task/18576216
Автор ответа:
0
2 задача
Автор ответа:
0
с этого листка
Автор ответа:
0
30 баллов
Похожие вопросы
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Английский язык,
автор: jkatsd
Предмет: Русский язык,
автор: lirrikTik
Предмет: Химия,
автор: abetanov90
Предмет: Химия,
автор: Настюхенсыя