javascript:var n = prompt("Введите n:"), массив = [], чётных = 0; for (let сч = 0; сч < n; сч++) массив.push(parseInt(prompt("["+сч+"]:"))); alert(массив + "\n" + (массив.reduce(function (пр, тек) { if (тек % 2 == 0) { чётных++; return пр + тек; } else return пр; }, 0) / чётных));
var a:array of integer;
n,i,s,k:integer;
begin
write('Введите количество элементов массива: ');
readln(n);
a:=new integer[n];
for i:=0 to n-1 do read(a[i]);
write ('Массив: ');
for i:=0 to n-1 do write(a[i],' ');
writeln;
for i:=0 to n-1 do
if a[i]mod 2 = 0 then
s:=s+a[i];
k:=k+1
end;
writeln('Среднее арифметическое чётных элементов массива равно: ',s/k:0:3)
end.
javascript:var n = prompt("Введите n:"), массив = [], чётных = 0; for (let сч = 0; сч < n; сч++) массив.push(parseInt(prompt("["+сч+"]:"))); alert(массив + "\n" + (массив.reduce(function (пр, тек) { if (тек % 2 == 0) { чётных++; return пр + тек; } else return пр; }, 0) / чётных));
var a:array of integer;
n,i,s,k:integer;
begin
write('Введите количество элементов массива: ');
readln(n);
a:=new integer[n];
for i:=0 to n-1 do read(a[i]);
write ('Массив: ');
for i:=0 to n-1 do write(a[i],' ');
writeln;
for i:=0 to n-1 do
if a[i]mod 2 = 0 then
begin
s:=s+a[i];
k:=k+1
end;
writeln('Среднее арифметическое чётных элементов массива равно: ',s/k:0:3)
end.