Var n,i,s:integer; a:array [1..20] of integer; begin readln (n); s:=0; for i:=1 to n do begin readln(a[i]); if i mod 2=0 then s:=s+a[i]; end; writeln(s); end. Объясню. Если индекс элемента массива четный, то этот элемент прибавляется ка сумме и выводится.
Использовать Чертежник алг МИМ нач опустить перо сместиться на вектор(0.75,3) сместиться на вектор(0.75,-3) сместиться на вектор(0.75,3) сместиться на вектор(0.75,-3) поднять перо сместиться на вектор(1,0) опустить перо сместиться на вектор(0,3) сместиться на вектор(0,-3) сместиться на вектор(1.5,3) сместиться на вектор(0,-3) поднять перо сместиться на вектор(1,0) опустить перо сместиться на вектор(0.75,3) сместиться на вектор(0.75,-3) сместиться на вектор(0.75,3) сместиться на вектор(0.75,-3) кон
1 Наименьшим элементом изображения на графическом экране является пиксель.
2 Цвет пикселя на экране монитора формируется из следующих базовых цветов: красного, синего, зелёного.
3 Компьютерная программа может управлять работой компьютера, если она находится в оперативной памяти.
4 Полный путь к файлу имеет вид C:\BOOK\name_may_1.ppt. Расширение этого файла: .ppt
5 В какой строке единицы измерения информации расположены по возрастанию? Г бит, байт, килобайт, мегабайт, гигабайт.
6 Алфавит двоичной системы счисления: 0, 1.
7 Для пяти букв латинского алфавита заданы их двоичные коды, эти коды представлены в таблице: А В С D E 000 01 100 10 011 Определить что закодировано в 01 10 100 011 000 В) BDCEA
n,i,s:integer;
a:array [1..20] of integer;
begin
readln (n);
s:=0;
for i:=1 to n do
begin
readln(a[i]);
if i mod 2=0 then s:=s+a[i];
end;
writeln(s);
end.
Объясню. Если индекс элемента массива четный, то этот элемент прибавляется ка сумме и выводится.