Ответы на вопрос:
Var n,s: integer; begin s: =0; readln(n); for n: = 1 to n do if n mod 5 = 0 then s: =s+n; writeln('s = ',s); end.
Это рандомный ответ будет, на него невозможно дать правильный точно ответ.Если я поставь лайк и подпишись!Не зря же
Популярно: Информатика
-
Тзх15.11.2020 18:40
-
lenahalezina09.11.2020 21:46
-
ttttt150999912.03.2023 06:43
-
Троцкий121.03.2022 22:38
-
Щебестан133728.02.2021 22:12
-
Sake11120.12.2021 23:49
-
EkaterinaZeyb25.07.2020 17:34
-
varvara12416.03.2021 10:03
-
gulnarakazimov21.08.2020 18:45
-
Chillin24.10.2022 23:14