Function gcd(a,b: longint): longint;
{ Нахождение НОД }
var
i: longint;
begin
while b <> 0 do
begin
a := a mod b;
i := b; b := a; a := i
end;
gcd := a
end;
function lcm(a,b:longint):longint;
{ Нахождение НОК }
begin
lcm:=a*b div gcd(a,b)
end;
begin
Writeln('НОД(36;54;18;15)=',lcm(36,lcm(54,lcm(18,15))))
end.
Результат выполнения программы:
НОД(36;54;18;15)=540
N1 = 21 * 2 + 10 + 9 = 61 => i1 = 6 бит.
k1 = 15 * 6 / 8 = 11 * 1/4 => 12 байт.
N2 = 10 => i2 = 4 бит.
k2 = 4 * 4 / 8 = 16 / 8 = 2 байт.
K = 2 + 12 + 25 = 39 байт
Ответ: 39
Примерно так
Лови, что ли. так нужно было сделать?
<span>конечно Да. Понятие информация имеет контекстный смысл уже по тому, что в настоящее время не существует единого определения информации как научного термина. То есть данное понятие используется в различных науках (информатика\кибернетика\биология\физика и т. д.) неся за собой различный лексический смысл. Поэтому смысл слова "информация" определяется контекстом</span>
Предпоследний
И все..
Вроде!))