Var k,n,s,d,i,u,s1:integer;
a:array[1..20] of integer;
begin
randomize;
readln(k,n);
for i:=1 to 20 do
a[i]:=random(10);
<span>for i:=1 to n do
begin
s:=s+a[i];
inc(u);
end;
writeln( 'Среднее арифметическое в массиве = ', s/u );
</span>for i:=1 to k do
s1:=s1+a[i];
writeln('Сумма:',s1);
for i:=1 to 20 do
if a[i]<s/u then d:=d+1;
writeln('Количество:',d);
writeln('Массив:');
for i:=1 to 20 do
write(a[i],',');
end.
Вот делением на 2 знаю, а вот другими не пойму что)
а) 1111100
Для обозначения абсолютной ссылки применяется знак $.Например:=$A$3+$B$4.Знак $ фиксирует имя столбца и номер строки
Примеры переводов в разные сс:
(1) 0,101_2 = 0 * 2^0 + 1 * 2^-1 + 0 * 2^-2 + 1 * 2^-3 = 1/2 + 1/8 = 5/8 = 0.625_10
(2) 0,6_8 = 0 * 1 + 6/8 = 12/16 = 0.C_16
(3) 0.125_10 = 1/8 = 2^-3 = 0.001_2
(4) 0.4_16 = 4/16 = 2/8 = 0.2_8
Остальные переводы выполняются аналогично. Получившаяся таблица во вложении.
Посчитай количество символов в строке столько и будет байт
в данном случае 20
пробел тоже считается за символ