Объяснение:
Вес текстовки:
N страниц × 2048 символов × 2 байта
Вес сканов:
N страниц × 1536 точек × 1024 точки × 3 байта (3 байта - это 24 бита, глубина цвета или цветовая палитра)
Вес сканов - Вес текстовки > 70 Мб
70 Мб = 70 × 1024 × 1024 = 73,400,320 байт
N×1536×1024×3 - N×2048×2 > 73,400,320
Решаем это неравенство:
N×(4,718,592 - 4096) > 73,400,320
N > 73,400,320 / (4,718,592 - 4096)
N > 15,57
Учитывая, что N - это целое число (количество страниц) можно заключить, что минимальное N, при котором разница между сканами и текстовкой окажется более 70 Мб, будет равно 16 (минимальное целое число, большее, чем 15,57)
Кисть, заливка, градиент, стёрка, блюр
из 0 к 21:
плюс 1,плюс 1,умножить на 2,плюс 1,умножить на 2,умножить на 2,плюс 1
из 0 к 25
плюс 1, плюс 1,плюс 1,умножить на 2,умножить на 2,умножить на 2,плюс 1
из 0 к 28
плюс 1,плюс 1,плюс 1,умножить на 2,плюс 1,умножить на 2,умножить на 2
Они хранятся в формате a) bmp
Var
a:array of array of integer;
n,m,i:integer;
begin
writeln('n, m:');
readln(n,m);
SetLength(a,n);
for i:=0 to n-1 do
SetLength(a[i],m);
for i:=0 to n*m-1 do
a[i div m,i mod m]:=(i div m)*(i mod m);
for i:=0 to n*m-1 do
begin
write(a[i div m,i mod m]:3);
if (i+1) mod m = 0 then writeln;
end;
end.
Пример:
n, m:
4 5
0 0 0 0 0
0 1 2 3 4
0 2 4 6 8
0 3 6 9 12