Для хранения произвольного растрового изображения размером 256 × 640 пк отведено 160 Кбайт памяти без учёта размера заголовка файла. Для кодирования цвета каждого пикселя используется одинаковое количество битов, коды пикселей записываются в файл один за другим, без промежутков. Какое максимальное количество цветов можно использовать в изображении?

ответ на данный интересующий тебя

вопрос:1024

program xxx;

    var i, n : integer;

                a, d : real

                      s: array[1..20] of real;

begin

    write('введите n-');

    readln (n);

    write('введите а=');

    readln(a);

    write('введите d=');

    readln(d);

    s[1]: =a;

    for i: =2 to n do

        s[i]: =a+d;

    write('арифметическая прогрессия: ');  

    for i: =1 to n do

              write(s[i]);

end.

uses crt; var n: integer; beginread(n)n: =abs(n)-2; write(n); end.