4) значение арифметического выражения: 3∙16^8 – 4^5 + 3 записали в системе счисления с основанием 4. сколько цифр «3» содержится в этой записи?

3*16^8 = 3*(4^2)^8 = 3*4^16 - в четверичной системе записывается как тройка и 16 нулей. 4^5 - в четверичной системе - единица и 5 нулей при вычитании 3*4^16 - 4^5 старшая 3 превращается в 2, а все нули, кроме пяти последних - в 3. т.е. получившееся число записывается как 2, 11 троек и 5 нулей. +3 - вместо последнего 0 теперь 3. в итоге получается 12 троек в записи числа.

—говорите, я лохматый? мне причёсываться лень? не лохматый, а рогатый! и зовут (олень)

program xxx;

    var i, n : integer;

                      s : real;

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

begin

  writeln('введите размерность массива n=');

  readln(n);

  write('введите элементы массива а: ');

  for i: =1 to n do

        readln(a[i]);

  writeln('исходный массив а: ');

  for i: =1 to n do

        writeln(a[i]);

  s: =0;

  for i: =1 to n do

      if a[i]> 0 then s: =s+a[i];

  writeln('сумма положительных элементов =', s);

  readln

end.