Ответы на вопрос:
Var n,s,k: real; begin read(n); s: =0; for k: =1 to n do s: =s+n/(n+1); write(s); end.
Program xxx; uses crt; var n,i: integer; b: real; begin readln(n); for i: =1 to n do begin b: =b+(i/(i+1)); end; writeln(b); end.
1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, 233, 377, 610, 987, 1597, 2494, вариантов записать огромное количество, но если нужно с минимальным количеством слагаемых, то: 2013=1597+377+34+5
Популярно: Информатика
-
Дага7204.05.2020 08:06
-
Элеонора33556401.06.2022 18:27
-
wolf13579112.05.2023 08:32
-
Whitecat11102.10.2021 08:23
-
zholdashev07.04.2023 05:59
-
Tipaniktuta10.12.2020 17:50
-
юлияlike130204.04.2021 08:44
-
даха14431.08.2020 05:12
-
Bakeneko7707.08.2022 02:45
-
Сметана01131.05.2020 14:34