В любой системе счисления число 10 равно основанию этой системы счисления.
Поэтому 10(2)+10(8)+10(10)+10(16)=2+8+10+16=36(10)
1 Мбайт= 2^(10) Кбайт
6783/2^(10)=6783/1024=6.6240234375 Мбайт
Ответ:6,6240234375Мбайт
Const e=0.001;
var x,a,s:real; n,st,f:integer;
begin
write('x = ');
readln(x);
st:=1; f:=1; a:=x; s:=x; n:=0;
while abs(a)>e do
begin
n:=n+1;
st:=st*2;
f:=f*n;
a:=x*st/f;
s:=s+a;
end;
writeln('s = ',s:5:3);
end.
Пример:
<span>x = 1.5
s = 11.083</span>