var
arr:array[1..1000] of integer;
i,N:integer;
max:integer;
begin
max:=1;
write('Укажите кол-во эл-ов - ');
read(N);
for i:=1 to N do//Присваивание и вывод массива
begin
arr[i]:=1+random(100);
write(arr[i],' ');
if arr[i]>max then max:=arr[i];
end;
writeln;
writeln('Максимальный эл-т - ',max);
for i:=1 to N do//Увеличение чет. эл-ов
begin
if arr[i] mod 2=0 then arr[i]:=arr[i]+max;
write(arr[i],' ');
end;
end.
Объяснение:
Аналоговый сигнал — сигнал данных, у которого каждый из представляющих параметров описывается функцией времени и непрерывным множеством возможных значений. различают два пространства сигналов — пространство L (непрерывные сигналы), и пространство l (L малое) — пространство последовательностей.
Протсранство l (L малое) есть пространство коэффициентов Фурье (счётного набора чисел, определяющих непрерывную функцию на конечном интервале области определения), пространство L — есть пространство непрерывных по области определения (аналоговых) сигналов.
При некоторых условиях, пространство L однозначно отображается в пространство l (например, первые две теоремы дискретизации Котельникова).
Аналоговые сигналы описываются непрерывными функциями времени, поэтому аналоговый сигнал иногда называют континуальным сигналом. Аналоговым сигналам противопоставляются дискретные (квантованные, цифровые). Примеры непрерывных пространств и соответствующих физических величин:
прямая: электрическое напряжение
окружность: положение ротора, колеса, шестерни, стрелки аналоговых часов, или фаза несущего сигнала
отрезок: положение поршня, рычага управления, жидкостного термометра или электрический сигнал, ограниченный по амплитуде
различные многомерные пространства: цвет, квадратурно-модулированный сигнал.
a, n, i, sum, c, min: integer;
begin
sum := 0;
c := 0;
min := 10001;
read(n);
for i := 1 to n do begin
read(a);
sum := sum + a;
c := c + 1;
if(a < min) and (a mod 4 <> 0) then min := a;
end;
if(sum mod 4 = 0) and (min <> 10001) then begin sum := sum - min; c := c - 1; end;
if(sum mod 4 = 0) then begin write(0); exit; end;
writeln(c, ' ', sum);
end.