так как неопределенность знаний уменьшается в 8 раз, следовательно, она была равна 8, т.е. существовало 8 равновероятных событий. Сообщение о том, что произошло одно из них, несет 3 бита информации (8 = 2^3).Ответ: 3 бита.

0 0

4 года назад

Постройте таблицу истинности для выражения:A^-C\/C^(B\/-C)\/(A\/-B)^C

ваийня ваховск

F=A*¬C+C*(B+¬C)+(A+¬B)*C
F=A*¬C+C*(B+¬C+A+¬B)
F=A*¬C+C
F=A+C
--------------------------------------
A B C F
0 0 0 0
0 0 1 1
0 1 0 0
0 1 1 1
1 0 0 1
1 0 1 1
1 1 0 1
1 1 1 1

0 0

4 года назад

Вывести на экран значение функции у = sin (x), если 0≤x≤180 с шагом 1 градус. ПАСКАЛЬ

ваийня ваховск

===== PascalABC.NET =====

begin

for var x := 0 to 180 do

Writeln(x:3, Sin(DegToRad(x)):20:15)

end.

0 0

4 года назад

Выполнить в Паскале: Массив из 5 вещественных чисел вводится с клавиатуры. Найти среднее арифметическое, min и max элементов мас

Marvollo [42]

Var i,n:Integer;
A:Array[1..1000] of Real;
sum,srednee,max,min:Real;
Begin
Read(n);
for i:=1 to n do
Read(A[i]);
for i:=1 to n do
sum:=sum+A[i];
srednee:=sum/n;
max:=A[1];
min:=A[1];
for i:=1 to n do
begin
if (A[i]>max) then max:=A[i];
if (A[i]<min) then min:=A[i];
end;
Writeln('Srednee = ',srednee:0:2,' Min = ',min:0:2,' Max = ',max:0:2);
end.

0 0

4 года назад