Ответы на вопрос:
Const n = 15; var i, s: integer; a: array[1..n] of integer; begin s : = 0; for i : = 1 to n do begin write('a[', i, ']='); readln(a[i]); if i mod 2 = 1 then s : = s + a[i]; end; writeln(s); end.
Популярно: Информатика
-
kulikovamascha22.12.2022 22:09
-
radion200519.01.2022 08:27
-
MIRROR0000020.01.2021 05:10
-
bogussasa725.12.2021 00:12
-
vovastrebkov16112.05.2023 00:03
-
КсюшаГретт11.02.2023 04:04
-
EeOneGuy199713.05.2021 16:11
-
тимаинна02.11.2022 05:01
-
Alia17818.02.2020 01:54
-
basarabbozya25.11.2022 23:13