Var n,k,b : real;beginread (n);k:=0;b:=0;while n>0 do beginb:=(b+1)*(b+1);k:=k+b;n:=n-1;b:=sqrt(b);end;write (k);end.
Если на сайт, просто скопируй в паскаль
9 бит больше!!!!!!!!!!!!!!!!!
<span>ОБЛАДАЮТ СВОЙСТВОМ НАГЛЯДНОСТИ</span>
(I - информационный объем текста, K - кол-во символов, i - вес одного символа/бит на символ)
Дано:
K = 20 шт
i = 16 бит
I2 = 0.25 Кбайт = 256 байт
I1 - ?
Решение:
I = K * i = 20 * 16 бит = 320.0 бит
I1 - I2 = K * i = 20 * 16 бит = 320.0 бит = 40.0 байт
I1 = 40 байт + I2 = 40 байт + 256 байт = 296 байт
Ответ: 296 байт
Ответ : Страны на континенте америка