Презентация на тему робототехника в современном мире не менее 10 слайдов
141
464
Ответы на вопрос:
Var x, s: real; i, n: integer; begin readln(x, n); s : = 1; for i : = 1 to n do s : = s + sin(i * x) / i; writeln(s); end. //или //pascalabc.net 3.1 сборка 1219 begin var x : = readreal('x ='); println( range(1, readinteger('n =' aggregate(1.0, (s, r)-> s + sin(r * x) / r) ); end.
Популярно: Информатика
-
Rinana129811.03.2022 17:16
-
daniil32614.07.2022 08:23
-
Everiya1526.12.2021 04:01
-
6e3yMHbIu118.06.2023 10:04
-
nazmiburkanova720.05.2020 05:23
-
alskyuq21.03.2021 20:06
-
hehdsfg119.10.2021 21:13
-
АуTист06.11.2020 02:09
-
Clook202329.11.2021 06:37
-
Валерия55544423.07.2020 00:12