var
a : array [1..1000] of integer;
i, n, sum : integer;
begin
read (n);
for i := 1 to n do read (a[i]);
sum := 0;
for i := 1 to n do
if i mod 2 = 0 then inc (sum, a[i]);
writeln (sum);
end.
Память — устройство, предназначенное для хранения информации.
Все, что требуется от компьютерной памяти, — это сохранять один бит информации так, чтобы потом его можно было извлечь.
Память бывает внутренняя и внешняя. Внутренняя память находится внутри компьютера и предназначена для хранения программ и их данных в процессе работы ЭВМ. Внешняя память предназначена для долговременного и энергонезависимого хранения программ и данных.
Внутренняя память подразделяется на оперативную и постоянную.
Оперативная память (RAM, random-access memory) служит для хранения программ и данных, с которыми работает процессор в данный момент. На оперативную память накладываются жесткие ограничения по скорости чтения и записи информации. Современные типы оперативной памяти не могут сохранять свое содержимое после выключения питания компьютера.
Постоянная память (ROM, read-only memory) служит для хранения программ, которые должны быть доступны компьютеру сразу после включения, еще до загрузки операционной системы. В постоянной памяти хранится программа первоначального тестирования, BIOS (базовая система ввода-вывода) компьютера. На отдельных микросхемах ROM, размешенных на платах расширения (видеокартах, сетевых адаптерах), хранятся BIOS этих плат.
var
M:array[0..100]of integer;
i,k,n:integer;
begin
k:=0
randomize;
write('введите кол-во элементов массива');
read(n);
for i:=1 to n do
begin
M[i]:=random (30);
if i mod 2 =0 then k:=k+M[i]
else write ('Четных элементов нет');
writeln ('Сумма четных элементов', k);
end;
end.