Дано
N-128
<u>K - 20
</u>Найти i -?
I - ?
Решение:
Находим информационный вес символа по формуле N=2^i
i=7 бит
Теперь объем информации по формуле:
I=K*i
20*7=140 бит
А+B имеют приоритет, так как находятся в скобках, выполняем сначала дизъюнкцию:
10111
10011
--------
10111 - результат (А+В)
Теперь поразрядно умножаем (А+В) на С
10111
11010
--------
10010 - результат (А+В)&C
Переводим 10010 в десятичную: 2^4+2^1 = 18
Ну 20 строк и 5 столбцов но я не уверен на 100%
Измените тип переменных n и k на integer:
function Xfact(o: integer): integer;
var
factorial: longint;
i: integer;
begin
write('o = ');
readln(o);
factorial := 1;
for i := 2 to o do
factorial := factorial * i;
end;
var
c: real;
n,k:integer;
begin
writeln('Введите число n: ');
readln(n);
writeln('Введите число k: ');
readln(k);
c := Xfact(n) / Xfact(n - k) * Xfact(k);
writeln('C = ', c);
end.