:напишите программу на паскале: дано действительное число x. вычислить: x - x³/3! + x^5/5! - x^7/7! + x^9/9! - x^11/11! + x^13/13! проходим циклы, с заданным числом повторений. учитель сказал, что здесь нужны итерационные циклы. , буду ). только напишите, если можно, полностью программу.
173
216
Ответы на вопрос:
Var i,j: integer; f,st,x,s: real; begin write('x = '); readln(x); for i: = 1 to 7 do begin st: =1; for j: = 1 to 2*i-1 do st: =st*x; f: =1; for j: = 1 to 2*i-1 do f: =f*j; if i mod 2 = 1 then s: =s+st/f else s: =s-st/f end; writeln('s = ',s) end.
Популярно: Информатика
-
вор928.01.2022 09:04
-
SoniaSS0920.06.2022 04:21
-
SKYScraRPharaon17.01.2022 14:23
-
anatolibikov126.08.2021 18:19
-
ПолныйPizdec28.01.2023 07:53
-
Sergo1234567891019.10.2022 13:43
-
яидиот234509.06.2021 11:58
-
visnevskay117.05.2021 23:14
-
IHannahI13.07.2021 00:34
-
baget97ozu06u28.07.2021 19:02