Вычислить: (1+sin0,1)(1+sin0,2)*...*(1+sin10). (программа Паскаль)

Постоянный пользователь нашего ресурса написал нам почту в 5:22 с просьбой предоставить развернутый ответ на его вопрос. Наши эксперты отнесли этот вопрос к разделу Разное. Для ответа был привлечен один из опытных специалистов, который занимается написанием студенческих работ.

Цитируем вопрос ваш вопрос

Вычислить: (1+sin0,1)(1+sin0,2)*...*(1+sin10). (программа Паскаль)

Разбор вопроса и ответ на него

Раздел 'ЕГЭ (школьный)', к которому был отнесён этот вопрос является не простой рубрикой. Для подготовки ответа на вопросы из этой рубрики специалист должен обладать широкими познаниями в различных научных областях. Однако в нашей компании таковые имеются.

Вы спрашивали:

Вычислить: (1+sin0,1)(1+sin0,2)*...*(1+sin10). (программа Паскаль)

Конечно этот ответ может полностью не раскрыть тему вопроса, но мы постарались сделать его максимально полным. Предлагаем ознакомиться с мнением эксперта по этой теме:

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.

К нам на почту приходит много вопросов. Мы стараемся отвечать на все. Однако вы должны понимать, что большая загруженность увеличивает время ответа. Сейчас среднее время ответа равно 14:2.