Const
n = 30;

var
a: array[1..n] of integer;
i, s: integer;

begin
Randomize;
Writeln('Исходный массив');
s := 0;
for i := 1 to n do
begin
    a[i] := Random(101) - 50;
    Write(a[i], ' ');
    if ((i mod 2) = 1) and ((a[i] mod 2) = 0) then s := s + a[i]
end;
Writeln(#13#10, 'Сумма найденных элементов ', s)
end.

Тестовое решение:
Исходный массив
49 -39 -17 6 24 38 20 50 6 -36 -4 -7 -31 41 -8 20 32 49 -48 -47 50 48 -41 -44 -26 -11 9 38 -24 -34
Сумма найденных элементов 22

0 0

4 года назад

Какова максимальная продолжительность звукозаписи в минутах на диске емкостыо 700 Мб, если частота дискретизации 32000, разрядно

Евгений19832017

Продолжительность звучания вычислим по формуле:
t=N/b*f
где t- время звукозаписи (сек.),N- Объем диска (бит),b- разрядность (бит),f- частота дискретизации (Гц или 1/сек.)
t=(700*1024*1024*8)/16*32000=11468,8 сек
t=191,15 мин.

0 0

4 года назад

Сложить числа: 1) 223,28+427,548 2)3B3,616+38B,416

Андрей1895 [25]

11011111.01000111101+110101011.10001100010
1110110011.01100001011+1110001011.01000001011
как то так, В это Шестнадцатиричная

0 0

4 года назад

Приведите примеры:Отношение между двумя объектами-......Отношение между объектом и множеством объектов-.......Отношение между дв

AgentTus [14]

Между двумя объектами: Андрей сын Ивана
Между объектом и множеством объектов: диск является носителем информации
Между двумя множествами объектов: колеса входят в состав автомобиля

0 0

4 года назад