Дан текстовый файл с именем input.txt в первой строке которого записано натуральное число n , а во второй строке n целых чисел. переписать в файл с именем a.dat числа, кратные 100 из исходного файла , а в файл с именем b.bat числа , кратные 11, в файл c.dat все остальные числа

Если программа нужна на паскале и если считать, что числа, кратные и 100 и 11 записываются в оба файла, то программа будет такой:
var t,t1,t2,t3:text;n,a,i:integer;
begin
Assign(t,'input.txt');reset(t);
Assign(t1,'a.txt');rewrite(t1);
Assign(t2,'b.txt');rewrite(t2);
Assign(t3,'c.txt');rewrite(t3);
readln(t,n);
for i:=1 to n do
 begin
 read(t,a);
 if a mod 100 = 0 then write(t1,a,' ');
 if a mod 11 = 0 then write(t2,a,' ');
 if (a mod 100<>0)and(a mod 11<>0) then write(t3,a,' ');
 end;
Close(t);Close(t1);Close(t2);Close(t3);
end.

ответ:

объяснение:

    используем формулу нахождения объема:

    i = m x n * i

    подсчитаем каждый сомножитель в формуле, стараясь числа к степеням двойки:

    m x n:

    160 * 160 = 20 * 2³ *   20 * 2³ = 400 * 26 =

    = 25 * 24 * 26

    нахождение глубины кодирования i:

    256 = 28

    т.е. 8 бит на пиксель   (из формулы кол-во цветов = 2i)

    находим объем:

    i = 25 * 24 * 26 * 23 = 25 * 213 - всего бит на всё изображение

    переводим в кбайты:

    (25 * 213) / 213 = 25 кбайт

ответ:

объяснение:

    используем формулу нахождения объема:

    i = m x n * i

    подсчитаем каждый сомножитель в формуле, стараясь числа к степеням двойки:

    m x n:

    160 * 160 = 20 * 2³ *   20 * 2³ = 400 * 26 =

    = 25 * 24 * 26

    нахождение глубины кодирования i:

    256 = 28

    т.е. 8 бит на пиксель   (из формулы кол-во цветов = 2i)

    находим объем:

    i = 25 * 24 * 26 * 23 = 25 * 213 - всего бит на всё изображение

    переводим в кбайты:

    (25 * 213) / 213 = 25 кбайт