Сообщение о том, что произошло одно из двух равновероятныхсобытий, несет информации.а) 1 бит б) 2 бита в) 4 бита г) 5 бит
258
263
Ответы на вопрос:
Программа:
Pascal:
var
D: array[1..15] of integer;
pr, i: integer;
begin
pr := 1;
for i := 1 to 15 do begin
D[i] := random(0, 50);
if D[i] mod 2 = 0 then pr *= D[i];
end;
writeln(D, #10, 'Произведение чётных элементов: ', pr);
end.
Популярно: Информатика
-
яся7202.05.2022 10:00
-
ghi307.03.2023 15:44
-
gimnastikgirla09.01.2021 11:44
-
observatorshkip06tpd16.03.2021 20:11
-
ALEXIA2414.10.2022 21:08
-
милаш0623.11.2020 19:37
-
Ариэль160618.08.2022 20:10
-
23806435611.12.2020 08:13
-
Zavgorodnev0419.01.2022 07:08
-
ЕвгенийМатвеев15.01.2022 02:57