var A: array [1..N, 1..M] of integer; i, j, k: integer; s: real;
begin cls; k := 0; s := 0; randomize; for i := 1 to N do begin for j := 1 to M do begin A[i, j] := random(50) - 10; write(A[i, j]:6); s := s + A[i, j] //Сумма элементов end; writeln end; s := s / (N * M); //Среднее арифметическое (сумму делим на количество ВСЕХ чисел) writeln('Srednee ', s:0:3); for i := 1 to N do for j := 1 to M do if a[i, j] > s then k := k + 1; //Считаем элементы большие среднего writeln('Kolichestvo ', k) end.
1) 108х40х56х2=483840 количество байт на страницах, +18х28+14х28х2=1792 дополнительные страницы, складываем это все получается...483840+1792=485632, переводим в мегобайты 0,46 мегобайт. (если есть вопросы по решению пиши) 2)1-бит вес одного символа, 2 бита в юникоде. 96х32х56=17203248х8х6=2304 количество символов которые отсуствует из-за иллюстаций. 172032-2304=169728 количество символов. Каждый рисунок весит 1.5 килобайта=1536 байт. 1536х6=9216 байт весят рисунки. 169728+9216=178944 байт, переводим в килобайты= 174,75 килобайт.
s = 0
a = int(input())
for i in range(a + a % 2, 51):
s += i
print(s)