Ответы на вопрос:
Var i, n: integer; s: real; begin readln(n); s : = 0; for i : = 1 to n do s : = s + 1 + i / 10; writeln('s = ', s); end.
Популярно: Информатика
-
maksymr090620.07.2021 20:01
-
ника170028.04.2023 13:08
-
ДаНьКаЗнАеТ23.08.2022 22:34
-
lesnichka198014.07.2021 13:17
-
arina55620.05.2020 12:53
-
ВладимирЛенин114.10.2020 10:48
-
марина1111028.03.2021 22:17
-
margoschka0221.06.2022 15:55
-
Ангелина710203.05.2022 19:07
-
Maciel24.02.2022 12:38