Pascal !!! Паскаль !!! Пожалуйста, выполните задание в паскале и если не сложно , то можете нарисовать блок-схему .
Приложения:
Ответы
Ответ дал:
0
Ответ:
var
x,p:real;
i:integer;
begin
x:=0.01;
p:=1;
for i := 1 to 15 do
begin
p:=p * (1 - arctan(x/sqrt(1-sqr(x)))) / (2+sqrt(x));
x:=x+0.0253;
end;
writeln(p:0:20);
end.
Объяснение:
Приложения:
Похожие вопросы
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад