Пользователь вводит текст со скоростью 90 знаков в минуту. какое количество информации будет содержать текст, который он набрал за 15 минут (используется компьютерный алфавит)?
Мощность компьютерного аофавита=256 символов. Определим вес одного символа i=8 бит (2 в 8 степени даст 256); количество информации определяется по формуле I=K*i K=U*t I=U*t*i I=90*15*8=10800 бит = 1350 байт
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.
количество информации определяется по формуле I=K*i
K=U*t
I=U*t*i
I=90*15*8=10800 бит = 1350 байт