Данный фрагмент программы определяет является ли число P палиндромом
Объяснение:
<u>while N <> 0 do</u>
<u>begin</u>
<u>K := K * 10 + N mod 10;</u>
<u>N := N div 10; </u>
<u>end;</u>
Этот цикл записывает в переменную K перевёрнутый вариант числа P
<u>if P = K then Writeln('да') else Writeln('нет');</u>
Это условие истинно, если исходный вариант числа равен перевёрнутому
DIM a(15, 15)
FOR i = 1 TO 15
FOR j = 1 TO 15
PRINT USING "\ \"; HEX$(i * j);
NEXT j
PRINT
NEXT i<span>
</span>
С основаниями 4 и 8
2- нет т.к в ней нет чисел 2,3
3 - нет т.к в ней нет чисел 3
28:2=14 пар по 2 лампочки
3 состояния это i, поэтому
14 в 3 степени = 2744 разных состояния