Решить в паскале вычислить: у=1-1/1! +1/2! -1/3! +/n! .значение n задать вводом
251
432
Ответы на вопрос:
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.
Популярно: Информатика
-
ерикос17.12.2021 03:54
-
chardonayyyyyoyl8au08.12.2022 19:31
-
pushkina8208.04.2022 04:15
-
dashullya200130.05.2023 18:34
-
настюха2099831.01.2020 20:04
-
vishnevskayaya23.02.2021 20:00
-
coolkaruna32ya01.01.2022 06:53
-
Katerinkacat02.03.2022 15:42
-
dhvcn24.02.2020 16:27
-
linalevchuk1902.07.2021 00:32