если средний 5 то всего их 9
Const n=10;
var a:array[1..n] of integer;
k,i:integer;
begin
Randomize;
for i:=1 to n do begin
a[i]:=random(9)+2;
write(a[i],' ');
end;
writeln;
k:=0;
for i:=1 to n do
if a[i] mod 2 = 0 then k:=k+1;
writeln('Четных: ',k,' нечётных: ',n-k);
end.
Пример:
<span>2 2 4 7 9 10 9 4 5 4
Четных: 6 нечётных: 4</span>
Ответ:
27(16)=2*16+7*1=32+7=39 в 10
42(8)=4*8+2*1=32+2=34 в 10
110000(2)=1*2^5+1*2^4=32+16=48 d 10
Ответ: 34
Объяснение: