Procedure astSquare(n: integer);
var i, j: integer;
begin
for i := 1 to n do
begin
for j := 1 to n do
write('*');
writeln();
end;
end;
{
Для теста:
begin
astSquare(4);
end.
Программа выведет 16 звёздочек:
****
****
****
****
}
1.Сообщение несет 4 бита информации 2^4=N N=16 номеров полулюкс
16+36=52 всего
2. N=56 i=6 бит/1 символ
30*70*6*10= 126000 бит (15750 байт )
От слова рота к слову полк. рота , ____ , ____ , ____ , ____ , полк. бант , __ , __ , __ , __ , коса море , __ , __ , __ , __ ,
ИРИНА9997 [108]
<span>рота- роза- лоза- поза- пола- полк
бант- бунт- бурт- борт- корт- кора- нора
море- горе- гора- нора- нога- нуга- дуга- душа- суша
миг- маг- май- чай- час- чес- вес- век </span>
I(объем)=1008. k(количество)=1008. найдем i выразив из основной формулы I=k*i; i=I/k; i=1. N(мощность)=2^i => N=2.