===== PascalABC.NET =====
begin
var a: array[1..9] of integer;
for var i := 0 to 2 do
begin
var j := 3 * i + 1;
a[j] := j + 2;
a[j + 1] := Random(50) mod a[j];
a[j + 2] := a[j] + a[ j + 1];
Print(a[j], a[j + 1], a[j + 2])
end
end.
А)M mod 2 = 0
Т.к. остаток деления четного числа на 2 должен равняться 0
<span>"Не ошибается тот, кто ничего не делает, хотя это и есть его основная ошибка. " - эта фраза содержит 76 символов (включая пробелы и знаки препинания). К</span>аждый символ кодируется одним байтом, значит <span>информационный объём этой фразы 76 байт.</span>
всего 86.
8 не любят, значит любят 78.
54 - квесты, 78-54=24.
62 - симуляторы, 78-62=16.
78-(24+16)=38 с одинаковым удовольствием играют и в квесты, и в симуляторы
Так как 1 символ = 1 бит, получается:
73 бит=9байт 1 бит