Находим значение информационной емкости одного символа. N=2^i, подставляя значение в формулу, получаем N=64, значит, i=6 бит-информационная емкость 1 символа, значит 5*6=30 бит.
2^x=256 => x=8
Производим необходимые расчёты: 2^8 * 2^8 / 1024 = 64 килобайт
1 - Надпись
2 - Эллипс
6 - Распылитель
10 - Масштаб
Var b:array[1..15] of real;
i:integer;
begin
for i:=1 to 15 do read(b[i]);
writeln;
for i:=1 to 15 do begin b[i]:=-1*b[i]; write (b[i],' '); end;
end.