Print('8 8 8')
print('8 8 8')
print('8 8 8')
print('8 8 8')
print('8 8 8')
Насколько знаю в интерпритаторе питона данные выводятся в строковом типе, по-этому такой ответ тоже правильный
Var A,S:real;
n:integer;
Begin
Write('n = ');
Read(n);
a:=10;
For n:= 1 to n do
Begin
a:=a*1.1;
S:=S+a
End;
WriteLn(S)
End.
Что такое информация - это философский вопрос. Информация - это физическая субстанция, которую можно померять. Информация тесно связана с таким понятием, как вероятность - вероятность события.
Информация - это всё новое, неизведанное, всё, что может быть использовано для осознанного действия - действяи по улудшению своего состояния в этом мире.
Информация пропорциональна вероятности того, что событие произойдёт. При чём, чем больше вероятность, темменьше информации.
Тоесть I~1/P
Но информация должна обладать эффектом аддитивности. Тоесть информация о суммарном событии должна быть равна сумме информация о каждом из (независимых!!!) событий:
I(Q1*Q2)= 1/P(Q1*Q2) = 1/(P(Q1) * P(Q2)) не равно I(Q1)+I(Q2)
Что бы добиться равинства, надо взять логорифм:
I(Q1*Q2) = I(Q1) + I(Q2) = log(1/(P(Q1) * P(Q2))) = log(1/P(Q1)) + log(1/P(Q2)) = -log(P(Q1)) - log(P(Q2))
Основание логорифма определяет единицу измерения информации. Если основание "2", то единица измерения "бит".
Таким образом мы определяем что такое 1 бит информации:
1 = log2(P(Q)) => P(Q) = 1/2
1 бит - это информация о событии, вероятность которого равна 1/2.
Для того что бы разместить информацию на дискейте (1,44) объемом (2048) понадобиться;
2048/1,44=1422