<em>Формула некорректна, поскольку при i=1 и k=1 знаменатель дроби обращается в ноль. Программа будет всегда возвращать "бесконечность".</em>
var
i,k,m,n,ik:integer;
si,sk,facti,factk:double;
begin
Write('Введите через пробел значения m и n: ');
Read(m,n);
sk:=0; factk:=1;
for k:=1 to m do
begin
si:=0; facti:=1; ik:=1; factk:=factk*k;
for i:=1 to n do
begin
ik:=-ik; facti:=facti*i;
si:=si+factk/(ik+facti)
end;
sk:=sk+si
end;
Writeln('Результат: ',sk)
end.
#include <iostream>
<span>using namespace std;
</span><span> </span><span>
</span>void sort_three_numbers(int &a, int &b, int &c)
<span> {
</span><span> if (b<a) swap(a,b);
</span><span> if (c<a) swap(a,c);
</span><span> if (b>c) swap(b,c);
</span><span> }
</span><span> </span><span>
</span>int main() {
<span> int a,b,c;
</span><span> cout<<"введите числа a b c через пробел ";
</span><span> cin>>a>>b>>c;
</span><span> sort_three_numbers(a,b,c);
</span><span> cout<<a<<" "<<b<<" "<<c<<endl;
</span><span> system("pause");
</span><span> return 0;
</span><span>}
</span><span>
</span>
Program abs;
var x,y,z:integer;
begin
readln(x);{первое число}
readln(y);{второе число}
z:=x+y;{их сумма}
if (z mod 3)=0 then
writeln(''Yes'')
else writeln(''NO'');
end.
N = 2^i, где
N - мощность алфавита;
I - количество бит на символ.
32 = 2^i.
I = 5 бит.
Ответ: 5 бит.