Сколько единиц в двоичной записи числа 8^2341 – 4^342 + 2^620 – 81?

2в двоичной записи единица и ноль 2^n это единица и n нулей. (2^n - 1) это n единиц ((2^n - 1) - 2) = (2^n - 3) это n-2 единицы, ноль и единица (n> =2 иначе всё плохо) 8 - единица и 3 нуля 8^n - единица и 3*n нулей последний шаг делайте сами. ответ: 1+ (1024 - 1) = 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.

 

 

1.

var n: integer; begin  cls;   for n: =1 to 10 do begin    write('n=',sqr(n)+5,' ');   end; end.

 

решить на паскале?