Помогите решить в Паскале Вычислить: у=1-1/1!+1/2!-1/3!+...1/n!.Значение n задать вводом

Ответы:

AYZHAN DMITRIEVA

29-12-2011 21:34

var n,i:integer; s:real;begin s:=1; readln(n); for i:=1 to n do if i mod 2 = 1 then s:=s-i*ln(2) else s:=s+i*ln(2); writeln(s);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя ИРА ТАРАНОВА

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Помогите решить в Паскале Вычислить: у=1-1/1!+1/2!-1/3!+...1/n!.Значение n задать вводом» от пользователя ИРА ТАРАНОВА в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!