1.Шаблон документа<span> — это файл с расширением .dot, в котором содержатся набор стилей, а также настройки меню, панелей инструментов и сочетаний клавиш, элементы автотекста и макросы. </span>Шаблон<span> может также включать текст, предназначенный для вставки в создаваемые на его основе </span>документы<span>.
2.</span>При оформлении официальных документов (шапка, заголовок, основное содержание)
Const
N = 3;
M = 4;
Var
A:array[1..N,1..M] of real;
i,j:integer;
Sr,B,C:real;
Begin
Randomize;
WriteLn('Исходная матрица:');
For i:= 1 to N do
Begin
For j:= 1 to M do
Begin
A[i,j]:=random()*13;
Write(A[i,j]:6:3,' ')
End;
WriteLn;
End;
WriteLn;
WriteLn('Сглаженная матрица:');
For i:= 1 to N do
Begin
B:=A[i,1];
C:=A[i,2];
A[i,1]:=(B+C)/2;
For j:= 2 to M-1 do
Begin
Sr:=(B+C+A[i,j+1])/3;
B:=A[i,j];
A[i,j]:=Sr;
End;
A[i,M]:=(B+A[i,M])/2
End;
For i:= 1 to N do
Begin
For j:= 1 to M do
Write(A[i,j]:6:3,' ');
WriteLn;
End
End.
1)50 а второе 166.Объясняю как получила:1)переводим из 2 в десятичную 00110010(2)=0*2(7)+0*2(6)+1*2(5)+1*2(4)+0*2(3)+0*2(2)+1*2(1)+0*2(0)=0+0+32+16+0+0+2+0=50(10)
2)Переводим из 2 в 10:10100110(2)=1*2(7)+0*2(6)+1*2(5)+0*2(4)+0*2(3)+1*2(2)+1*2(1)+0*2(0)=128+0+32+0+0+4+2+0=166(10), ну по крайне мере нас так учили!) ты получаешь это все в битах а потом просто переводишь в байты,в 1 байте=8 бит!)Желаю удачи!!)
Program reshenie;
var a,b:real;
begin
writeln('Введите длину и ширину прямоугольника:'); Readln(a); Readln(b);
if (a=b) then writeln('Прямоугольник является квадратом')
end.
32=2^6 => Для русского языка 1 символ несет 6 бит инфы.
26=2^i => i = log 26 по основанию 2 = 4,7 бит => Для фр. языка 1 символ несет 4,7 бит инфы.
V информации = 10 * 6 бит = 60 бит (для русского языка)
V информации = 10 * 4,7 бит = 47 бит (для фр. языка)
Значит для русского языка сообщение из 10 знаков несет больше информации.