Y=COS(2/B4)-2*SIN(1/B4)+1/B4
Если в ячейке В4 разместить Х
см. приложение
1100101(2) = 2^6+2^5+2^2+1=64+32+4+1=101(10)/
Function fac(a:integer):int64;
Var i,b:integer;
Begin
b:=1;
for i:= 1 to a do
b:=b*i;
fac:=b;
End;
Var
i,n:integer; s:real;
Begin
s:=1;
Write('Введите число n: ');
Readln(n);
for i:= 1 to 2*n do
s:=s+1/fac(i);
Write(s);
End.
<em>var a, b, n, i:integer;</em>
<em>begin</em>
<em> b:=-1;</em>
<em> for i:=1 to 10 do</em>
<em> begin</em>
<em> a:=a+b;</em>
<em> b:=b+3;</em>
<em> end;</em>
<em> writeln (a);</em>
<em>end.</em><span><em> </em></span>