Пусть каждый символ кодируется 16 битами, что составляет 16/8=2 байта.
Тогда каждая из первой половины страниц потребует для кодирования 2×64×48 = 2¹×2⁶×(3×2⁴) = 3×2×2¹⁰ байт = 6 Кбайт, а все эти страницы займут 6×6=36 Кбайт
Каждая из второй половины страниц потребует для кодирования 2×64×24 = 2¹×2⁶×(3×2³) = 3×2¹⁰ байт = 3 Кбайт, а все эти страницы займут 6×3=18 Кбайт.
Информационный объем реферата составит 36+18 = 54 Кбайта
Рекламная графика
Графическая часть рекламы имеет особое значение в формировании доминантных очагов повышенной возбудимости в коре (или подкорке) головного мозга на признаки рекламируемого товара. Как установили археологи, между первыми инструментами для материальной работы, изобретенными человеком (топор, ловушка и т.п.), и первыми инструментами для регистрации информационных образов (иероглифов, букв, цифр и др.) на камне, глиняных пластинках, кости и т.п. лежит промежуток почти в миллион лет. Другими словами, примерно 99% времени своего исторического развития люди имели дело в основном с материальными объектами. А весь период, в течение которого они пользовались и информационными образами (буквами, письмом), не составляет и 1% от всего возраста человеческой цивилизации [30, с. 11—12]. Следовательно, глубина творческой интуиции человека в сфере информационной деятельности значительно слабее, чем в сфере обработки графических изображений. Таким образом, абстрактные графические образы рекламы позволяют включить в процесс формирования доминантных очагов наиболее мощные области человеческой интуиции, которые были развиты за первые 99% времени эволюции человеческого интеллекта. Именно поэтому потенциальный покупатель за доли секунды и успевает воспринять графику рекламы, и если она (по очертаниям, форме) знакома ему, запоминает ее практически мгновенно и надолго. Нельзя не использовать в рекламе эту способность человека. К этому, собственно, и должно сводиться предназначение графической части рекламного сообщения.
max:=mas[0];
For i:=1 to N do
if ((mas[i] mod 2 <>0)and(max<mas[i]))then max:=mas[i];
Program qfdw;
uses crt;
Type
vershina=Record
Tochka:string;
X,Y:real;
end;
ps=File of vershina;
Var f:ps;
z,a,b,c:vershina;
i:integer;
Begin
assign(f,'1.dat');
rewrite(f);
writeln('Введите вершины треугольника и их координаты: ');
for i:=1 to 3 do
begin
writeln(i,'-я вершина');
write('буква: ');read(z.tochka);
write('X=');read(z.x);
write('Y=');read(z.y);
write(f,z);
end;
Close(f);
assign(f,'1.dat');
reset(f);
read(f,a);
read(f,b);
read(f,c);
close(f);
writeln('Cтороны треугольника:');
writeln(a.tochka,b.tochka,' = ',sqrt((a.x-b.x)*(a.x-b.x)+(a.y-b.y)*(a.y-b.y)):5:2);
writeln(c.tochka,b.tochka,' = ',sqrt((c.x-b.x)*(c.x-b.x)+(c.y-b.y)*(c.y-b.y)):5:2);
writeln(a.tochka,c.tochka,' = ',sqrt((a.x-c.x)*(a.x-c.x)+(a.y-c.y)*(a.y-c.y)):5:2);
end.