Ответы на вопрос:
Вроде как вот так: program aasfa; var n,i: integer; k,z: real; begin writeln('введите n: '); readln(n); writeln('введите k: '); readln(k); z: =13; for i: =2 to n do z: =k/i+z; writeln(z); end.
Популярно: Информатика
-
Margogjf05.12.2020 17:29
-
Chchcjcujcj28.04.2020 09:37
-
evzhenko9910.12.2020 02:49
-
Котмяумяу12.03.2023 13:33
-
Raul02050720.09.2020 07:05
-
алинаарсенова04.08.2020 12:56
-
romazan402.07.2020 16:14
-
Dimkakrut17.01.2023 06:09
-
dreamnazym20.03.2022 00:40
-
КеламадинНазгуль19.04.2021 08:28