Вопрос, который вызвал трудности
Вычислить: (1+sin0,1)(1+sin0,2)*...*(1+sin10). (программа Паскаль)
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
var
result,index:real;
begin
index:=0.1;
result:=1+sin(index);
while index<=10 do
begin
index:=index+0.1;
result:=result*(1+sin(index));
end;
Writeln(result:4:25);
end.
result,index:real;
begin
index:=0.1;
result:=1+sin(index);
while index<=10 do
begin
index:=index+0.1;
result:=result*(1+sin(index));
end;
Writeln(result:4:25);
end.