Даю 40 баллов(в тот раз не туда нажал) Помогите пожалуйста с номером 4(7 класс Паскаль),желательно не очень сложно решить,а то не поверят
Приложения:
Ответы
Ответ дал:
0
Ответ дал:
0
а там ведь когда вводишь 1 должно быть 32,а тут нет
Ответ дал:
0
исправьте пожалуйста
Ответ дал:
0
var i,n:integer; a,p:real;
begin
write('n = '); readln(n);
p:=32;
for i:=1 to n-1 do
begin
a:=(2+2*i+1)/(2*i+1);
p:=p*a;
end;
writeln('p = ',p);
end.
Пример:
n = 5
p = 1.17333333333333E+002
begin
write('n = '); readln(n);
p:=32;
for i:=1 to n-1 do
begin
a:=(2+2*i+1)/(2*i+1);
p:=p*a;
end;
writeln('p = ',p);
end.
Пример:
n = 5
p = 1.17333333333333E+002
Приложения:
Вас заинтересует
2 года назад
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад