Два текста содержат одинаковое кол-во символов.первый текст составлен из символов алфавита мощностью 256 символов,второй-мощностью 16 символов.во сколько раз различаются информационые объемы этих текстов?
Чтобы закодировать 256 символов, нужно 8 бит, а на 16 символов - 4 бита. Значит объемы различаются в 2 раза.
Нужное количество бит определяем так: переводим количество возможных букв в двухзначное число. Например, 16 - это 10000. Из него нужно вычесть 1, т.к. последовательность бит "0000" тоже может быть задана одной из букв. Получается для первой буквы будет код "0000", а для 16-ой буквы - код "1111", значит хватает 4 бит (единиц или нулей для хранения буквы), та же ситуация с 256.
Var a, b: integer; var c: string; begin writeln('Введите 1 число.'); readln(a); writeln('Введите 2 число.'); readln(b); writeln('Знак операции.'); readln(c); if c='*' then writeln(a*b); if c='/' then writeln(a/b); if c='-' then writeln(a-b); if c='+' then writeln(a+b); end. 2 ЗАДАЧА var a, b: real; begin writeln('Зарабаток Пети:'); readln(a); writeln('Зарабаток Петрова:'); readln(b); if a>b then writeln('Петя заработал больше Петрова.') else if a=b then writeln('Петров и Петя заработали одинаково.') else writeln('Петров заработал больше Пети.'); writeln('Среднее: ', (a+b)/2); end.
begin; randomize; x:=windowwidth-300; y:=0; for i:=1 to 10 do begin; for j:=1 to 10 do begin; rectangle(x,y,x+a,y+a); x+=a; end; y+=a; x:=windowwidth-300; end; x:=random(1,10); y:=random(1,10); t:=0; while t<>10 do begin; readln(xt); readln(yt); if (xt<>x) and (yt<>y) then begin; xl:=windowwidth+xt*30-300; yl:=300-yt*30; cross(xl,yl,a); inc(t); end; if (xt=x) or (yt=y) then begin; xl:=windowwidth+xt*30-305; yl:=300-yt*30+4; floodfill(xl,yl,clBlue); inc(t); end; if (xt=x) and (yt=y) then begin; xl:=windowwidth+xt*30-305; yl:=300-yt*30+4; floodfill(xl,yl,clRed); writeln('Ты выиграл!'); break; end; end; if t=10 then begin; writeln('Ты проиграл!'); xl:=windowwidth+x*30-305; yl:=300-y*30+4; floodfill(xl,yl,clRed); end; end.
Нужное количество бит определяем так: переводим количество возможных букв в двухзначное число. Например, 16 - это 10000. Из него нужно вычесть 1, т.к. последовательность бит "0000" тоже может быть задана одной из букв. Получается для первой буквы будет код "0000", а для 16-ой буквы - код "1111", значит хватает 4 бит (единиц или нулей для хранения буквы), та же ситуация с 256.