Продолжите последовательность, записав следующее число 0, 2, 24, p.s: обьясните последовательность

0,2,24,252,3120! в степенях заковырка

0, 2, 24, 252,   3120! 1в первой степени-1=0 2 во второй степени-2=2 3в степени 3-3=24 4^4-4=256-4=252 5^5-5=3125-5=3120 ^- в степени

Var   k,n: integer; begin   n: =0;   writeln('введите последовательность целых чисел, завершающуюся нулем');   repeat       read(k);       if (n=0) and (k< 0) then n: =k   until k=0;   if n< 0 then writeln('первое отрицательное число равно ',n)   else writeln('последовательность не содержит отрицательных чисел') end.       тестовое решение введите последовательность целых чисел, завершающуюся нулем 5 11 17 3 -8 14 -6 3 0 первое отрицательное число равно -8

Используем соотношение 16 = 2⁴, которое позволяет кодировать каждую шестнадцатиричную цифру четырьмя двоичными (тетрадой). можно легко составить таблицу: 0 - 0000 1 - 0001 2 - 0010 3 - 0011 4 - 0100 5 - 0101 6 - 0110 7 - 0111 8 - 1000 9 - 1001 а - 1010 b - 1011 c - 1100 d - 1101 e - 1110 f - 1111 теперь легко сформулировать правило перевода "16⇒2": каждую шестнадцатиричную цифру заменить четырьмя двоичными. левые (незначащие) нули можно отбросить. пример: 162с₁₆ = 0001 0110 0010 1100₂ = 1011000101100₂ обратный перевод ("2⇒16") делается так же несложно. нужно разбить двоичное число на тетрады, производя это разбиение, в общем случае, влево и вправо от десятичной точки и затем каждую тетраду заменить шестнадцатиричной цифрой. если самая левая тетрада неполная, её слева дополнить нулями. если самая правая после точки тетрада неполная, её дополнить справа нулями. пример: 110011011.0110100101₂ = 1 1001 1011.0110 1001 01₂ = 0001 1001 1011.0110 1001 0100₂ = 19b.694₁₆