128*128=16,384 пикс. 64 цвета = 6 бит.
но я точно не знаю
<span>Толстой Лев Николаевич (28 августа 1828 года, усадьба Ясная Поляна Тульской губернии - 7 ноября 1910 года, станция Астапово (ныне станция Лев Толстой) Рязано-Уральской ж. д.) - граф, русский писатель.
Родился в аристократической графской семье. Получил домашнее образование и воспитание. В 1844 году поступает в Казанский университет на факультет восточных языков, затем учится на юридическом факультете. В 1847, не окончив курс, уходит из университета и приезжает в Ясную Поляну, полученную им в собственность по разделу отцовского наследства. В 1851 осознав бесцельность своего существования и, глубоко презирая самого себя, отправился на Кавказ в действующую армию. Там он стал работать над своим первым романом "Детство. Отрочество. Юность". Через год, когда роман опубликовали, Толстой стал литературной знаменитостью. В 1862, 34 лет от роду, Толстой женился на Софье Берс, восемнадцатилетней девушке из дворянской семьи.В течение первых 10—12 лет после женитьбы он создает «Войну и мир» и «Анну Каренину». В 1879 начинает писать "Исповедь", где рассказывает о перевороте в своих взглядах, смысл которых он видел в разрыве с идеологией дворянского класса и переходе на сторону "простого трудового народа". В 1886 "Власть тьмы", в 1886 пьесу "Плоды просвещения", в 1899 году на свет выходит роман "Воскресенье", драма "Живой труп" 1900, повесть "Хаджи-Мурат" 1904. Осенью 1910 года, выполняя свое решение прожить последние годы соответственно своим взглядам, тайно покинул Ясную Поляну, отрекшись от «круга богатых и ученых». Заболев в пути, умер. Был похоронен в Ясной Поляне. надеюсь подойдёт
</span>
Написано на Паскале. Все работает, можешь сам проверить
<em>// PascalABC.NET 3.3, сборка 1573 от 04.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadInteger('Количество строк в матрице:');
var m:=9;
Writeln('*** Исходная матрица ***');
var a:=new real[n,m];
Randomize;
for var i:=0 to n-1 do
for var j:=0 to m-1 do
a[i,j]:=Random(-100,100)/10;
a.Println(5,1); Writeln(5*a.ColCount*'-');
var col:=1;
Write('Средние арифметические: ');
while col<=m-1 do begin
Write(a.Col(col).Average:0:2,' ');
col+=2
end;
Writeln
end.
<u>Пример</u>
Количество строк в матрице: 6
*** Исходная матрица ***
9.6 -4.5 0.2 -7.6 5.4 -4.8 -0.1 -8.6 9.3
-3.6 -3.3 -4.6 -4.6 -2.0 -7.3 5.4 5.1 -9.3
3.2 1.0 -8.1 -5.9 -6.1 9.8 -0.7 -2.5 -1.5
-3.0-10.0 -7.4 -6.7 9.6 -2.1 9.3 -4.6 -3.8
9.7 -7.8 3.1 0.9 -3.0 5.4 9.7 2.9 -9.6
-3.3 4.4 -1.7 -5.0 8.5 0.9 -3.9 -3.4 1.3
---------------------------------------------
Средние арифметические: -3.37 -4.82 0.32 -1.85
