Перемножим (100*100*100)2=1000000(2) мы видим, что получилась единица и шесть нулей в двоичной, а это легко перевести в десятичную, нужно просто возвести двойку в шестую степень(количество нулей)
Var a,b,c,n:integer; begin for a:=1 to 7 do for b:=a+1 to 8 do for c:=b+1 to 9 do begin n:=a*100+b*10+c; write(n:4) end; end.
var i,j,n:integer; a:array[1..4,1..5]of real; begin for i:=1 to 4 do begin for j:=1 to 5 do begin a[i,j]:=random*2-1; write(a[i,j]:20:15); if a[i,j]>=0 then n:=n+1; end; writeln; end; writeln('Количество неотрицательных: ',n); end.
var i,j,sum:integer; a:array[1..3,1..4]of integer; begin for i:=1 to 3 do for j:=1 to 4 do readln(a[i,j]); writeln('Массив:'); for i:=1 to 3 do begin for j:=1 to 4 do begin sum:=sum+a[i,j]; write(a[i,j]:4); end; writeln('sum=':8,sum); sum:=0; end; end.
V=K*i, где V – это информационный объём текстового сообщения; K – количество символов в сообщении, i – информационный вес одного символа.
Значит, V=K*i=67 символов (с учётом пробелов и знаков препинания) * 16 бит= 1072 бит или 134 байт.
И здесь у нас проблема. Мой ответ не совпадает ни с одним из возможных вариантов. Более-менее сходными с моим ответом являются варианты 2) 134 бит (у меня 134 бАЙт) и 4) 1027 бит (у меня 1072 бит). И тут есть вероятными три пути развития событий: а) я допустил ошибку в вычислениях, б) Вы допустили ошибку при написании вариантов ответа, в) ошибка кроется в самом задании.
Внимательно перечитайте задание, вдруг вы обнаружите, что случайно ошиблись.
Перемножим (100*100*100)2=1000000(2) мы видим, что получилась единица и шесть нулей в двоичной, а это легко перевести в десятичную, нужно просто возвести двойку в шестую степень(количество нулей)
2^6=64