Нада число представить двоичными триадами 45107(8)
100 101 001 000 111, затем с<span>права налево разбить на двоичные тетрады по 4 разряда и записать алфавитом 16сс
0100 1010 0100 0111=4А47</span>
Ответить не могу а подсказать удовольствием
гипертекст — текст, сформированный с помощью языка разметки, потенциально содержащий в себе <u>гиперсылки</u>
Var x:array [1..10] of integer; i:integer;
begin
for i:=1 to 10 do begin
x[i]:=i*2;
write(x[i],' ');
end;
end.
Решение показано в прилагаемом файле. Формулы в таблице:
в столбце G: =СУММ(B7:F7)
в столбце H: =ЕСЛИ(G7>=$B$1;"прошёл";"не прошёл")
в ячейке B2: =СЧЁТЕСЛИ(G7:G23;">="&$B$1)
в ячейке C3: =СЧЁТЕСЛИ(G7:G23;"<"&$B$1)
Var
v:array[1..10]of integer;
f:real;
i:byte;
a,b,c,d,min,k:integer;
begin
for i:=1 to 10 do
v[i]:=random(20)-10;
readln(d);
min:=v[1];
b:=0;
for i:=1 to 10 do begin
if v[i]<0 then begin
b:=b+1;
end;
if v[i]>min then
a:=min;
end;
k:=0;
for i:=1 to 10 do begin
if v[i]<d then
k:=k+1;
end;
c:=k;
writeln('наименьший элемент =', a);
writeln('количество отрицательных элементов =', b);
writeln('количество элементов меньших d =', c);
f:=c+(a+b)/(a*b+1);writeln(f);
end.<span>
</span>