Ответы на вопрос:
Program n1; var sum,i,n: integer; begin readln(n); sum: =0; for i: =2 to n do if i mod 2=0 then sum: =sum+i; writeln(sum); end.
Популярно: Информатика
-
Истар21.01.2020 15:22
-
IncolaRO05.03.2023 06:44
-
islamlg14.02.2022 12:44
-
ZORaSsa09.08.2020 13:08
-
nastyarudckina31.07.2022 11:00
-
Olga649123.06.2023 20:05
-
lika36019.07.2021 12:35
-
Сани5622.08.2021 18:33
-
Мотылёк6211.11.2022 16:31
-
proulechka19.11.2021 10:59