Дан натуральный ряд чисел 1, 2, 3, ...К, где К<200. Для нечетных членов ряда сформировать массив А, а для четных членов вычислить среднее арифмитическое. К=51

254₈ = 172₁₀ = АС₁₆

9F₁₆ = 159₁₀ = 237₈

Объяснение:

Переведите число 254₈ по схеме А8 → А10 → А16

254₈ = 2 * 8² + 5 * 8¹ + 4 * 8⁰ = 2 * 64 + 5 * 8 + 4 * 1 = 128 + 40 + 4 = 172₁₀

254₈ = 172₁₀

172 / 16 = 10 + остаток 12 (С)

10 / 16 = 0 + остаток 10 (А)

записываем остатки снизу вверх

В качестве цифр 16-ой системы счисления используются цифры от 0 до 9 и латинские буквы от A до F.

А = 10₁₀   B = 11₁₀   C = 12₁₀   D = 13₁₀   E = 14₁₀   F = 15₁₀

172₁₀ = АС₁₆

Переведите число 9F₁₆ по схеме А16 → А10 → А8

9F₁₆ = 9 * 16¹ + F * 16⁰ = 9 * 16 + 15 * 1 = 144 + 15 = 159₁₀

В качестве цифр 16-ой системы счисления используются цифры от 0 до 9 и латинские буквы от A до F.

А = 10₁₀   B = 11₁₀   C = 12₁₀   D = 13₁₀   E = 14₁₀   F = 15₁₀

9F₁₆ = 159₁₀

159 / 8 = 19 + остаток 7

19 / 8 = 2 + остаток 3

2 / 8 = 0 + остаток 2

записываем остатки снизу вверх

159₁₀ = 237₈

const

   handsfree = false;

   nmax = 10;

   random_min = -50;

   random_max = 50;

var

   a: array[0..nmax] of real;

   i, n: integer;

   sum, x: real;

begin

   {ввод массива}

   n := nmax;

   if handsfree then begin

       for i := 0 to n do

       begin

           a[i] := random(random_max - random_min) + random_min;

           write(a[i], ' ');

       end

   end

   else begin

       for i := 0 to n do

           readln(a[i]);

   end;

   writeln();

   

   {подсчет суммы}

   write('x = ');

   readln(x);

   

   sum := a[n];

   for i := n - 1 downto 0 do

       sum := sum * x + a[i];

   writeln('S = ', sqrt(sum));

end.